未完成でした ファイルが不正です

diff --git a/wav_proj.dpr b/wav_proj.dpr
index 013d40a..17bfa24 100644 (file)
--- a/wav_proj.dpr
+++ b/wav_proj.dpr
@@ -28,12 +28,12 @@ begin
       result := -1;
       break;
     end;
-    Writeln(c[0], ',', c[1]);
+    Writeln(c[0], ' : ', c[1]);
     inc(i);
   end;
 end;
 
-function effect16BitWav(fpIn, fpOut: TFileStream; sizeOfData: integer)
+function effect16BitWav(fpIn, fpOut: TFileStream; sizeOfData: Word)
   : integer;
 var
   i: integer;
@@ -53,7 +53,7 @@ begin
       result := -1;
       break;
     end;
-    Writeln(c[0], ',', c[1]);
+    Writeln(c[0], ' : ', c[1]);
     inc(i);
   end;
 end;

diff --git a/wav_proj.dproj b/wav_proj.dproj
index a426c71..4f5b9c2 100644 (file)
--- a/wav_proj.dproj
+++ b/wav_proj.dproj
@@ -127,7 +127,7 @@
         <DCC_RemoteDebug>true</DCC_RemoteDebug>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Cfg_1_Win32)'!=''">
-        <Debugger_RunParams>toujyo.wav effect.wav</Debugger_RunParams>
+        <Debugger_RunParams>easy.wav effect.wav</Debugger_RunParams>
         <DCC_RemoteDebug>false</DCC_RemoteDebug>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Cfg_1_Win64)'!=''">