Entwickler-Ecke
Sonstiges (Delphi) - OnIdle
D. Annies - Do 26.05.05 15:11
Titel: OnIdle
Hi, Delpher,
danke für eure bisherige Hilfe, um zeitgesteuert eine Prozedur aufrufen zu können.
Ich bin jetzt soweit, dass die "Stoppuhr" anfängt zu laufen, wenn die Maus
untätig ist - und sich resettet, wenn eine Mausaktion war, aber nur, wenn die Maus über dem Formular schwebt, und nicht etwa über Groupboxen, dann läuft sie einfach weiter und resettet sich nicht, wenn eine Mausaktion war. Beim Übergang von Formular zu einer Groupbox wird auch resettet.
Wie komme ich an einer einzigen Stelle an diese Ereignisse heran, ich brauche sie für
die gesamte Anwendung (für das ganze Formular).
Was muss ich da noch veranlassen?
Code:
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: 17: 18: 19: 20: 21: 22: 23: 24: 25: 26:
| private:
procedure CheckTimeOutHandler(sender:Tobject; var done:Boolean);
var lastEventTimestamp : TDateTime;
procedure TForm1.CheckTimeOutHandler(sender:Tobject; var done:Boolean); begin label60.caption := timetostr(now - lasteventtimestamp); if (now - lastEventTimestamp > 5*60*1000) then begin showmessage('Neuanmeldung ist fällig'); image1dblclick(self) end; end;
procedure TForm1.FormCreate(Sender: TObject); begin windowstate := wsmaximized; home := getcurrentdir; BorderIcons := BorderIcons - [biSystemMenu]; Forms.Application.OnIdle := CheckTimeoutHandler; End;
procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); begin lasteventTimestamp := now; end; |
Vielen Dank für Hilfe,
Detlef Annies
Moderiert von
Christian S.: Delphi-Tags repariert
KidPaddle - Do 26.05.05 16:43
Ich glaube, da wirst Du eine Mouse-Hook verwenden müßen. Diese bekommt alle Nachrichten in einer Anwendung / System und dort kannst Du dann deine Abfrage einbauen. Eine andere Möglichkeit fällt mir zur Zeit nicht ein.
Gruß
KidPaddle
D. Annies - Do 26.05.05 18:30
Danke, KidPaddle,
für deine Antwort - quer durch Deutschland. Dann werde ich mal versuchen, heraus zu bekommen, was ein Mouse-Hook ist ... 8)
Detlef Annies
D. Annies - So 29.05.05 11:08
Hi, KidPaddle,
weiteres Beißen ergab ...
Vielen Dank für deinen Tipp mit dem Mouse-HOOK - das war der Bringer. Es gibt auch einen Tastatur-HOOK und beide zusammen machen genau das, was ich brauchte!
Bis dann, Detlef Annies
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2025 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!