timer delphi Component

parametru numeric Arbitrare

Pune componenta Delphi Timer forma. Punerea în proprietatea Interval de intervalul de timp dorit (măsurat în milisecunde). Mergeți la fila Evenimente, și a vedea singurul eveniment susținut de componente Delphi Timer: OnTimer. Efectuarea pe ea Făcând clic pe efectuarea unui dublu clic dublu sau, de asemenea, pe cele mai componentă, vom obține în mediul de tratare a evenimentului generat Delphi, în cazul în care vom introduce un cod care prevede executarea anumitor acțiuni.

Deoarece soystvo activate implicit setat la True. în program, după o perioadă de timp în proprietatea Interval a lucrărilor timer, atunci nu va da eveniment OnTimer. vor fi luate măsurile adecvate. Uneori, cu toate acestea, acțiunile planificate nu ar trebui să se întâmple în mod automat atunci când porniți programul, și în îndeplinirea oricărei alte acțiuni. În acest caz, proprietatea activat în Object Inspector setat la False. Apoi, în timpul necesar necesar pentru a executa comanda:

Rețineți că, în timp ce Timer1.Enabled egal Adevărat. Componentele OnTimer continuă să genereze evenimentul de la expirarea fiecărui interval de timp egal cu valoarea svoyctva Interval. Prin urmare, dacă aveți nevoie doar de o singură operațiune, timer-ul trebuie să fie oprit, și dintr-o dată la fel:

În cazul în care programul „Off“, după timer-ul în programul de acțiune pentru suficient de mici în comparație cu durata de acțiune necesară valoarea proprietății Interval timer-ul funcționează din nou, și poate interfera cu cursul programului.

Delphi Cronometrul nu este foarte precisă și nu este potrivit pentru măsurarea intervale scurte de timp. Precizia sa este de ordinul a 50 de milisecunde. Ca un exemplu, un program simplu care afișează ora curentă.

Pe formularul va numai componenta Label și, de fapt, componenta noastră Delphi Timer. caracteristica temporizator poate fi lăsată la 1000, dar mai devreme pe computere mai lente a trebuit să afișeze ora, de mai multe ori pe secundă, datorită influenței altor ieșire din proces-calculator executabil o dată a doua lectură să „plutească“, care a fost în mod clar vizibile cu ochiul liber. dimensiunea fontului ia mai mult - 50, și va ridica mai buna, am luat Bell MT. Întinde pe întregul formular: Align = alClient. Ei bine, de fapt, codul:

Procedura TForm1.Timer1Timer (Expeditor: TObject);
începe
Label1.Caption: = TimeToStr (acum);
se încheie;

Asta este! Delphi acum - este o funcție de sistem care returnează data curentă, ora în formatul TDateTime corespunzător. Dacă transforma într-o funcție TimeToStr șir. acesta va returna ora curentă, în cazul în care DateToStr. data curentă. Dacă vrem să se afișeze în programul nostru și data, de asemenea, este suficient pentru a pune mai mult de o componentă a etichetei. și o funcție pentru ao DateToStr data transmite. Puteți descărca proiectul.