Formularul este interfaţa de lucru, a proiectului �n dezvoltare, cu utilizatorul.
-> Porniţi Delphi!
-> Aduceţi pe formular patru butoane (de tip TButton) pe care le plasaţi �n cele patru colţuri ale formularului!
-> Selectaţi ca parametru al proprietăţii ActiveControl, a formularului, butonul al doilea şi rulaţi programul!
-> Se
observă care este butonul focalizat:
-> Se opreşte execuţia, se modifică ActiveControl pe butonul al treilea şi se rulează din nou programul! Care este concluzia?
-> �n timp ce programul rulează se trage de colţul dreapta jos a ferestrei aplicaţiei şi se redimensionează �n sensul micşorării acesteia.
-> Se observă că apar barele de defilare.
-> Se opreşte execuţia programului!
-> Se trece proprietatea AutoScroll a formularului pe False şi se rulează din nou programul!
-> Se micşorează din nou figura şi se observă lipsa barelor de defilare.
-> Se opreşte execuţia programului!
-> Se execută dublu click pe numele proprietăţii BorderIcons din inspectorul de obiecte! Ce se observă?
-> Se modifică pe r�nd cele patru sub-proprietăţi şi se rulează, pentru fiecare modificare �n parte, programul. Ce se observă?
-> Se reactivează toate �napoi!
-> Se rulează programul pentru fiecare dintre variante şi se observă caracteristicile din tabelul următor:
Valoare |
Semnificaţie |
bsDialog |
Chenar neredimensionabil; chenarul standard al ferestrelor de dialog |
bsSingle |
Chenar neredimensionabil, desenat cu o linie simplă. |
biNone |
Chenar neredimensionabil, desenat cu linie invizibilă. |
bsSizeable |
Chenar redimensionabil standard. |
bsToolWindow |
Similar cu bsSingle, dar este prevăzut cu un mic titlu. |
bsSizeToolWin |
Similar cu bsSizeable, dar este prevăzut cu un mic titlu. |
-> Se trece �napoi pe bsSizeable.
-> Se introduce �n dreptul proprietăţii Caption textul: �Aceasta este aplicatia mea�
-> Se merge la linia de meniu la File/CloseAll��� -nu se salvează!
-> Se merge la File/NewApplication
-> Se aduce pe formular un ScrollBar
-> Se modifică proprietatea Max a scrollbar-ului la 255
-> Se face dublu click �n dreptul evenimentului OnChange al scrollbar-ului
-> Se completează procedura creată cu codul:
form1.Color:=longint(scrollBar1.Position);
-> Se rulează programul! Ce se �nt�mplă la mişcarea scrollbar-ului?
-> Se pot alege diferite valori din inspectorul de obiecte pentru această proprietate.
-> Se revine la valoarea clBtnFace.
->�n timp ce aplicaţia este oprită se modifică dimensiunea formularului.
->Se observă ce se �nt�mplă cu valorile celor două proprietăţi.
-> Se �ncearcă execuţia programului cu diferite tipuri de cursoare selectate �n dreptul acestei proprietăţi.
-> Se aduce un buton (de tip TButton) pe formular, se creează evenimentul OnClick corespunzător acestuia.
-> Se completează codul procedurii nou create cu codul:
����������� showmessage('Fereastra este activa!');
-> Se rulează programul; se observă mesajul la apăsarea butonului.
-> Se opreşte execuţia.
-> Se trece proprietatea Enabled a formularului pe False.
-> Se rulează din nou programul; se observă efectul.
-> Se trece Enabled pe True, �napoi.
-> Se
selectează proprietatea Font a formularului şi se observă �n
dreapta acesteia simbolul:
-> Se face click pe acest simbol.
-> Se pot modifica proprietăţile fonturilor formularului.
-> Se trece proprietatea ShowHint a formularului pe True.
-> Se introduce la Hint:���� Neata!
-> Se rulează programul.
-> �n timp ce aplicaţia este oprită se modifică poziţia formularului pe ecran.
-> Se observă valorile celor două proprietăţi.
Proprietate |
Descriere |
Increment (valoare 1 � 32767, cea implicită este 8) |
Stabileşte distanţa de deplasare a imaginii din formă �n mo-mentul �n care utilizatorul efectuează un clic pe unul din bu-toanele cu săgeţi situate �n extremităţile barelor de defilare. |
Margin (de tip word, valoarea implicită este 0) |
Stabileşte momentul de afişare a barei de defilare. Ea determină numărul minim de puncte care separă componentele formei şi muchia formei. �n execuţie, dacă o componenta ajunge să fie la o distanţă mai mică dec�t Margin puncte de la muchie, şi dacă proprietatea Visible are valoarea True, atunci se afişează o bară de defilare. |
Position (de tip integer, valoarea implicită este 0) |
Comunică poziţia actuală a cursorului glisant al barei de defilare. Această valoare este actualizată automat �n execuţie, �n funcţie de defilare. |
Range
(de tip integer, valoarea implicita este 0) |
Dimensiunea maximă de defilare, exprimată �n puncte. La bara de defilare verticală această valoare trebuie sa fie mai mare dec�t valoarea proprietăţii Height (�n caz contrar bara verticală este invizibilă). La bara de defilare orizontală această valoare trebuie sa fie mai mare dec�t valoarea proprietăţii ClientWidth (�n caz contrar bara orizontală este invizibilă). De exemplu, dacă proprietatea Range a unei bare orizontale conţine valoarea 500, lăţimea formei este 200, atunci valorile proprietăţii Position pot fi �n intervalul [0, 300] |
Tracking
(de tip Boolean, av�nd valoarea implicită False) |
Dacă se alege valoarea True, imaginea din formă se deplasează �mpreună cu butonul de glisare tras de utilizator. Dacă se alege valoarea False, imaginea răm�ne statică at�ta timp c�t utilizatorul trage butonul de glisare, deci actualizarea imaginii defilate va avea loc numai �n momentul eliberării butonului glisant al barei de defilare. |
Visible
(de tip Boolean, av�nd valoarea implicită True) |
Se referă la vizibilitatea barei de defilare. Dacă se alege valoarea True, şi dacă componenta se află la o distanţa mai mică dec�t Margin puncte de muchia formei, atunci bara de defilare devine vizibilă. |
-> Se selectează File/CloseAll�� nu se salvează;
-> Se selectează File/NewApplication;
-> Se aduce un buton pe formular;
-> Se generează evenimentul OnClick al butonului;
-> Se completează procedura nou creată cu codul:
Form1.Visible:=False;
showmessage('Forma este invizibila');
Form1.Visible:=True;
-> Se execută Run/ProgramReset!
-> Se selectează File/CloseAll�� nu se salvează;
-> Se selectează File/NewApplication;
Valoare |
Semnificaţie |
wsNormal |
Forma este afişată �n stare normală (nici minimizată, nici maximizată). Valoare implicită. |
wsMinimized |
Forma este afişată �n stare minimizată. |
wsMaximized |
Forma este afişată �n stare maximizată |
-> Se creează c�te o procedură pentru următoarele evenimente ale formularului:
OnActivate, OnClose, OnCloseQuery, OnCreate, OnDblClick, OnDeactivate, OnKeyUp, OnPaint, OnResize, OnShow.
-> Se completează fiecare procedură creată cu instrucţiunea:
����������������������� showmessage('���� ');
iar �ntre apostrofuri se trece c�te un mesaj sugestiv (care să oglindească tipul de eveniment).
-> Se rulează programul şi se remarcă ordinea apariţiei evenimentelor şi modul de manifestare.