@BUG: Ich weiß das, aber er macht ja kein Sleep.
also
Delphi-Quellcode:
// Starte den Song
Tick := GetTickCount;
while PlayingSong do
begin
//Weiterlaufen bis die 16.tel Note (Pause) abgelaufen ist
{while GetTickCount < Tick + TempoWait do
Winprocessmessages;}
X := TempoWait - (Integer(GetTickCount) - Tick);
if X > 0 then Sleep(X);
Tick := GetTickCount;
PlayNotes;
DrawGraphics(WinHandle);
hsi.nPos := StartX + XSizeMid;
SetScrollInfo(WinHandle, SB_HORZ, hsi, True);
end;
TempoWait und Tick sind ebenfalls Integer
Ich habe es gemacht
Und ich glaube dir auch.
Es bringt mir keinen vorteil.
Glaube es mir
Ich versuche es nochmal mit deiner neuen Variante
EDIT:
Nop mit deiner letzten version kann ich gar nichts mehr machen.
Kein Fenster verschieben keinen Button drücken nur noch den Taskmanager verwenden zum beenden.
gruss