Extras din laborator
Aplicatia 2
Sa se adauge in formularul creat anterior un buton, cu aceleasi dimensiuni ca si butonul existent, dar sa fie amplasat in dreapta acestuia. Eticheta(caption) butonului sa fie « schimb » , iar actiunea la click sa fie inlocuirea etichetei primului buton din « iesire » in « sfarsit »
Pentru aceasta vom adauga urmatoarele la codul precedent :
1) pentru inserarea unui nou buton in form: geam.addobject([buton1],[altbuton])
2) Pentru definirea clasei altbuton, clasa derivata din butonul creat in aplicatia 1:
DEFINE CLASS altbuton as gata
caption=[schimb]
autosize=.t.
left=200
PROCEDURE click
thisform.buton.caption=[sfarsit]
ENDDEFINE
Observatie : clasa : “altbuton" s-a definit ca fiind derivata din clasa gata, pentru a prelua atributele clasei gata, redefinindu-se caption-ul si procedura click.
Dupa rularea programului va rezulta:
Daca facem click pe butonul 2, vom vedea ca butonul 1 isi va schimba eticheta din iesire in sfarsit, ca urmare a instructiununii :
thisform.buton.caption=[sfarsit]
Daca pasam butonul 1 form-ul dispare, ca urmare a executarii instructiunii : thisform.release.
Aplicatia 3
Sa se adauge intr-un formular o lista simpla care sa permita alegerea unei calitati pentru persoana al carei nume figureaza in intr-un camp de editare. Alegerea va fi confirmata cu ajutorul unui buton de comanda cu textul « accept » , iar informatia din lista va fi plasata intr-un camp din tabela deschisa. Dezactivarea formularului va avea loc la actionarea butonului OK.
Preview document
Conținut arhivă zip
- Laborator oop.doc