AL DOILEA TIMP, ETAPA II
Programul Cronometru în sine este un exemplu interesant al unui program, dar de fapt nu face nimic util. Pentru a utiliza cronometrul, aveți nevoie de capacitatea de ao controla. Este timpul să adăugați comenzi: butoanele Start / Stop, Interval (Lap) și Reset (Resetare). Înainte de a începe toate acestea, selectați componenta Timer și schimbați proprietatea Enabled la Falsă, deoarece dorim ca cronometrul nostru să fie dezactivat când programul este pornit. Apoi selectați componenta Buton din paleta de componente și plasați cele trei butoane sub liniile care afișează ora din formular. Utilizați instrumentele de aliniere și redimensionare pentru a seta butoanele oriunde doriți.
Pornirea și oprirea cronometrului
Faceți clic pe primul buton, etichetat „Buttonl“, apoi utilizați Object Inspector pentru a schimba proprietatea Nume la StartBtn, iar proprietatea sa de legenda de la „Start“, apoi de la pagina de evenimente, faceți clic pe evenimentul OnClick și fantă dublă / șoarece ggek la dreapta lui pentru a crea un handler de evenimente OnClick. Editați codul în fereastra Unitate așa cum este prezentat în Lista 5.2.
LISTING 5.2 Handlerul evenimentului OnClick al butonului Start
procedura TForml.StartBtnClick (expeditor: TObject); începe În cazul în care este activat Timer1 Apoi începe Timerl Enabled: = False,
StartBtn.Caption: = 'SStart'; capăt
Rutina evenimentului in listingul 5.2 simuleaza butonul de pornire / oprire (pornire / oprire) pe cronometrul reale, pornirea și oprirea cronometrului Când cronometrul este pornit (proprietatea Enabled a cronometrului - Adevărat), apoi de tratare a evenimentelor se oprește cronometrul și de a schimba butonul Legendă pe butonul „Start“. Dacă cronometrul nu funcționează, atunci acest cod pornește temporizatorul prin setarea proprietății Enabled la True și schimbă legenda butonului la "Stop". Dacă doriți, puteți să apăsați acum F9 și să experimentați pornirea și oprirea cronometrului.
Pentru a număra intervalele de timp, trebuie să cunoaștem timpul contorizat curent, precum și timpul de încheiere al intervalului anterior. De exemplu, dacă economisiți timp pentru un sfert de mile pentru cineva care rulează o milă, rezultatele dvs. vor arăta ca cele din Tabelul 5.2.
Desigur, dacă măsurați timpul unei curse de mile, timpul va fi oarecum diferit, dar vom continua această discuție la un moment dat.
Fiecare interval de timp este diferența dintre timpul curent, timpul scurs și timpul de încheiere al intervalului precedent. Prin urmare, temporizatorul nostru trebuie să monitorizeze timpul scurs de la sfârșitul intervalului anterior, astfel încât acesta să poată calcula timpul intervalului curent.
Pentru a adăuga această caracteristică cronometrului, faceți clic pe al doilea buton pe care l-ați introdus în formular, modificați proprietatea Nume în "LapBtn" și modificați proprietatea Caption la "Lap". Apoi creați un handler de evenimente OnClick pentru acest buton și editați-l astfel încât să pară ca Listing 5.3.
Programarea în mediul Delphi
Cartea, scrisă de trei experți despre Delphi, este una dintre cele mai bune expuneri ale acestui mediu fundamental de dezvoltare. Cititorul va găsi în el o interpretare unică a programării orientate pe obiecte. Cartea oferă instrucțiuni pas cu pas pentru crearea de aplicații comerciale care utilizează baze de date. Cartea poate fi folosită ca un instrument de instruire și referință pentru profesori, studenți, dezvoltatori de software.