OSDN Git Service

リング変調
[sample-delphi/sample-DELPHI.git] / spWav.pas
index b465e72..cd91c99 100644 (file)
--- a/spWav.pas
+++ b/spWav.pas
@@ -41,7 +41,11 @@ type
     channels: Byte;
     bytesPerSec: LongWord;
     posOfData: LongInt;
-    startpos, endpos: LongInt;
+    startpos: LongInt;
+    endpos: LongInt;
+    cycleuSec: LongInt;
+    pWav: Pointer;
+    cyclicSec: integer;
   end;
 
 const