Einzelnen Beitrag anzeigen

alfold

Registriert seit: 29. Jun 2010
Ort: Neustrelitz
393 Beiträge
 
Delphi 7 Enterprise
 
#48

AW: Timing problem

  Alt 8. Apr 2011, 16:44
hab mich vielleicht blöd ausgedrückt: unabhängig von nonVCL oder VCl bitte. Nur im Prinzip!

Delphi-Quellcode:
TForm1.Timer1Timer(sender: Tobject)
begin
    if Playsong then
    begin
        PlayNotes;//<--wobei das evtl hier im Timer nicht wichtig ist?
        DrawGraphics(WinHandle);
        hsi.nPos := StartX + XSizeMid;
        SetScrollInfo(WinHandle, SB_HORZ, hsi, True);
    end;
end;
Ich weiss es ist nicht so einfach wie oben geschrieben, ist ja nur ne Überlegung.
Worauf soll Dein Timer warten? WEnn ich dich richtig verstehe geht es darum Die note/Pause abzuspielen, dabei gleichzeitig die graphik zu aktuallisieren.

Zumal die Aktuallisierung der Graphic ja nur vom Tempo wichtig ist. Ob Du da 8tel 16tel oder 32tel darstellen tust ist der Graphic egal. Wichtig ist die sychronisation!
Also evtl trennen, siehe im Timer!

alfold
  Mit Zitat antworten Zitat