Timing problem

[alfold]

Ich weiss es ist nonVcl! Vom Prinzip her nichts anderes!
Aber warum machst du es Dir selber schwerer als es sein muss?
In VCL würde ich einen Timer nehmen und dann nicht while benutzen sondern
If songplay then usw.
Vorteil liegt klar auf der Hand, Du hast keine while schleife in der Du nun festhängst!
CPU last würde damit auch nach unten gehen.
Wie man einen Timer in nonVCL schreibt mh.. muss ich passen.

Soll ja auch nur als Anregung dienen!

alfold

[DeddyH]

Zitat von alfold:

Wie man einen Timer in nonVCL schreibt mh.. muss ich passen.

Das ist recht überschaubar: http://msdn.microsoft.com/de-de/library/ee503884.aspx

[EWeiss]

Zitat von alfold:

Ich weiss es ist nonVcl! Vom Prinzip her nichts anderes!
Aber warum machst du es Dir selber schwerer als es sein muss?
In VCL würde ich einen Timer nehmen und dann nicht while benutzen sondern
If songplay then usw.
Vorteil liegt klar auf der Hand, Du hast keine while schleife in der Du nun festhängst!
CPU last würde damit auch nach unten gehen.
Wie man einen Timer in nonVCL schreibt mh.. muss ich passen.

Soll ja auch nur als Anregung dienen!

alfold

Ich habe kein Problem einen Timer zu erstellen das sind zwei Zeilen
SetTimer und KillTimer das ist alles.

Das problem ist aber nicht der Timer selbst sondern er muss auch warten wenn eine andere Aktion ausgeführt wird.
Das soll er auch .. Aber das geht nur über einen eigenen Thread bzw einer Callback.

Ich habe meinen Timer und der wartet auch..
Muss mal sehen ob ich damit bessere Karten habe.

Delphi-Quellcode:

function MySetWaitableTimer(hTimer: THandle;
                            var lpDueTime: TLargeInteger;
                            lPeriod: longint;
                            pfnCompletionRoutine: TFNTimerAPCRoutine;
                            lpArgToCompletionRoutine: Pointer;
                            fResume: BOOL): BOOL;
                            stdcall; external 'kernel32.dll' name 'SetWaitableTimer';

Zitat:

Wenn dein Programm tatsächlich permanent etwas tut, dann wirst du auch nicht um die 100% CPU-Auslastung herumkommen...

Na ja hab 25% aber dann ackert er auch..
Denke damit kann ich leben ..

Bei normalen Grafik Operationen sind es 0%

Zitat:

PS: Ich werde dein Programm erst dann wieder runterladen, wenn Grund zur Annahme besteht,
dass das Problem, das bei mir den Start verhindert, behoben ist

Kann ich ganz und voll verstehen nur wie soll ich das beheben wenn der Download gleich 0 ist.
Macht es dann Sinn den Quelltext noch hochzuladen ?

gruss

[alfold]

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

[EWeiss]

Zitat:

PlayNotes;//<--wobei das evtl hier im Timer nicht wichtig ist?

Darauf baut sich alles auf.
Wie kommst du darauf das es nicht wichtig sein soll ?
Ohne dem Spielt einfach kein Ton.

Der Grafik ist das nicht egal denn das Grid verwaltet nun mal die noten
Und diese werden eingelesen abhängig von den Balken (Abtastbar) wie lange sie sich über einer Noten befindet.
Und die kann ganz lang sein.

Also eine kombination zwichen Grafik Timing und der länge der noten (was wiederum mit dem Timing zu tun hat).
Werde es nachher mal mit meinem Timer versuchen der auf die Events wartet.

gruss

[alfold]

Missvertändniss! Playnotes meine ich im Timer evtl überflüssig! Weil Du damit nur "die Melodie" spielst, hat aber mit der Anzeige im eigentlichen nichts zu tun
Denn abspielen kannst Du auch ohne graphic das meint ich damit!

alfold

[EWeiss]

Zitat von alfold:

Missvertändniss! Playnotes meine ich im Timer evtl überflüssig! Weil Du damit nur "die Melodie" spielst, hat aber mit der Anzeige im eigentlichen nichts zu tun
Denn abspielen kannst Du auch ohne graphic das meint ich damit!

alfold

Nein .. Ohne Grafik geht gar nichts das Programm ist so aufgebaut das x,y Koordinaten mit der AbtastLeiste
aufgenommen werden und mit einem array verglichen werden wo einmal der erste eintrag für die Spur von 0..7 steht
und der zweite 0..1000 für die maximale eingabe an noten pro Spur.

gruss

[alfold]

Da hast Du dir aber selbst das Problem gebaut!
Nenne mal Qauntisierung, ist reine Mathematik bei MIDI.
Die Graphic selber dient mir ja nur um evtl die Note genauer zuplatzieren. Taktanfang zb. oder wenn ich sie zu kurz gespielt habe ebend mal zu verlängern von 1/8 auf 1/4 zb ist also nur Hilfsmittel bei MIDI.
Das Du das Problem Lösen wirst da hab ich volles Vertrauen, nur der Ansatz, die Graphic in den Vordergrund zu setzen, anstatt auf das Eigentlich die MIDIEEVENTS (MIDIFILE)für den Aufbau der Graphic zu nutzen, halte ich nicht für gut!

Gruss alfold