|
Registriert seit: 10. Apr 2006
4 Beiträge
|
Re: Fenster Form immer aktiv????
10. Apr 2006, 13:11
OK, also das stayontop funktioniert soweit.
procedure TForm1.FormCreate(Sender: TObject);
begin
Timer1.Interval := _IDLETIME;
Edit1.MaxLength := _PINLENGTH;
OutPort(_PORT,_OFF);
Form1.FormStyle := fsStayOnTop;
end;
Zur Erklärung, der Timer macht einen _Port, 5 Sekunden auf und dann wieder zu.
Dies geschieht nachdem eine Eingabe in Edit1 erfolgt ist und ne Berchnung TRUE war.
Kann mann nicht beim Ereigniss:OnDeactivate einfach wieder irgendwas sagen dass
das Fenster wieder aktiv werden soll. Also nicht nur onTop sonder auch "bereit zur Eingabe"?
Ich kann gern mal die ganzen Units Posten wenns hilft.
mfg, André!
|