Cum de a face forma activă

Cum de a face forma de active?

Buna! Ajutor, cum să vă asigurați că aplicația mea a fost în mod continuu activă? Multumesc anticipat.

De ce? Aici spun - de ce este necesar?

Imaginați - aveți pe calculator atârnă un program care întotdeauna ascensiuni obraznic și că este menținut atenția de intrare. Pentru a lucra cu alte programe a devenit practic imposibil.

Ei bine spus, bine, cel puțin puteți face la un anumit vryamya programul devine activ?

Nu este cel mai bun, dar cel mai simplu mod - verifica timpul de pe contorul de timp și apoi Application.BringToFront.

> In anumite vryamya

Înțeles timpul de sistem?

Am făcut această piesă una eșecuri tovarischu- sistem simulator, glumă de protecție de la vecin enervant caracteristică lansat de pornire nu apar în panoul, și după un timp, un mesaj de eroare, psevdovindovskie după ce a trimis sistemul de 4-5 pentru a reporni, vecin acesta a explicat că mașina este buggy, este timpul pentru a rearanja pentru Windows, iar acum stai poldvenadtsatogo să nu funcționeze. Pe scurt, mesajul am ținut la suprafață, după cum urmează:
# XA0;
SetWindowPos (Form1.Handle, hwnd_TopMost, 100200500100, SWP_NOMOVE);

Coordonatele și dimensiunea - detaliile, am fost variabilă, în funcție de mesajul și selectați parametrii funcției de ajutor „și există multe opțiuni, am venit destul de redus.
Am funcționa în prima versiune numită periodic de un cronometru, și apoi a început să se ocupe de aplicatii OnDeactivate:

Procedura TForm1.FormCreate (Expeditor: TObject);
începe
Application.OnDeactivate: = AppDeactivate;
se încheie;

Procedura TForm1.AppDeactivate (Expeditor: TObject); # XA0; //
începe
# XA0; # XA0; SetWindowPos (Form1.Handle, hwnd_TopMost,
# XA0; # XA0; # XA0; # XA0; 100200500100, SWP_NOMOVE);
se încheie;

În acest exemplu de realizare, este întotdeauna pe partea de sus, dar fără să se concentreze de intrare pentru prisos. Smecheria, cred, același lucru este de a câștiga.

CHDelphiPack
componentă CHForm
proprietate OnTopMode

Da, mai bine să facă cel mai de sus,
activați fereastra (focalizare) pe timer-ul