Forum: Win32/Win64 API (native code)
by hanspeter,
23. Jan 2013
Also um das Thema abzuschließen.
timeSetEvent funktioniert unter XE2 und W8 nicht.
Nach ca. 1500 Zyklen tritt ein Stack-Überlauf auf.
timeSetEvent wollte ich nutzen um einen Takt für eine Steuerung 1ms/10ms/100ms zu erzeugen.
Mit 2 Opensource Highres Timern trat das gleiche Problem auf.
Irgendwo hier im Forum wird erwähnt das timeSetEvent veraltert ist und besser CreateTimerQueueTimer...
Forum: Win32/Win64 API (native code)
by hanspeter,
22. Jan 2013
Ic hatte im Beispiel vergessen die Parameter (aus dem Interfaceteil anzugeben)
Hier der Nachtrag.
procedure TimeCallBack(TimerID, Msg: Uint; dwUser, dw1, dw2: DWORD);
Im Schweizer Forum ist ein Beispiel für den Multimedia Timer.
Dieses zeigt den gleichen Fehler. Nach etwa 6000 Zyklen kommt ein Stacküberlauf.
Ich gehe jetzt davon aus, dass das ein Delphi Fehler ist und der Timer unter XE2...
Forum: Win32/Win64 API (native code)
by hanspeter,
22. Jan 2013
Hallo,
ich versuche über einen Multimedia Timer einen Zeittakt von 1 ms zu erzeugen.
Das funktioniert auch aber nach ca. 1 min stüzt das Programm mit einen Stack overflow ab.
Aufruf :
TimeSetEvent(1, 0, @TimeCallBack, 0, TIME_PERIODIC);
und die Callback Procedure: