| Zitat: |
Mein Prog ist im Vordergrund, und jede Sekunde schiebt sichs erneut in den Vordergrund.
|
ja, so ein Programm würde mir auch gefallen
mal mit formstyle-stayontop probiert?
ansonsten schau dir Application.Onactivate (onactivate der Applicvation, nicht der Form!) an
Quelltext
1: 2: 3: 4: 5: 6: 7: 8:
| procedure TForm1.proc_Appactivate; begin edit1.setfocus; end; procedure Tform1.Formcreate begin Application.Onactivate := proc_Appactivate; end; |
proc_activate in den private-abschnitt der Form aufnehmen
bzw. wenn du das Fenster aller sek in den vordergrund holst, dann schreib edit1.setfoucs in dein timer ereignis
Frank