ich will ja aber in einem editfeld die bpm eingeben und dann einfach start drücken, damit die datei blop.wav in diesem abstand (edit1) abgespielt wird.
muss ich alles bei var oben reinschreiben??
also:
Delphi-Quellcode:
var
Form1: TForm1;
TimeBetweenTicks: Integer; // TimeBetweenTicks in ms
Abort: Boolean;
Freq, Start, Stop: Int64;
Frequency, TicksPerMinute: Int64;
QueryPerformanceFrequency(Frequency);
TicksPerMinute := Frequency * 60; // Frequency ist in Hz angegeben == Ticks pro Sekunde
bpmTicks: Int64;
bpmTicks := TicksPerMinute div Deine_bpm_Zahl;