Controlul Calendar poate fi inclus în formular, astfel încât utilizatorul să poată selecta o valoare a câmpului Date / Time, mai degrabă decât să introducă manual data.
Pentru a activa controlul Calendar pe un formular:
- Deschideți formularul din vizualizarea Design.
- Faceți clic pe meniul Inserare, elementul ActiveX (Inserare, controale ActiveX), care se deschide caseta de dialog Inserare de control ActiveX (ActiveX Control Insert), cu o listă cu toate controalele ActiveX înregistrate în sistem.
- Selectați Control List 10.0 (Calendar Control 10.0) din listă (Figura 15.37) și faceți clic pe OK.
Fig. 15,37. Caseta de dialog Insert ActiveX
Apoi, puteți configura acest element utilizând proprietățile acestuia. Spre deosebire de alte controale, în acest caz proprietățile au:
- Controlul formularului ActiveX (fereastra de proprietăți este identică cu celelalte controale și formularul însuși);
- Obiectul Calendar care este implementat de acest control.
În exemplul nostru, creați un nou formular în vizualizarea Design. Adăugați controlul Calendar la acesta i, după cum este descris mai sus. Deschideți caseta de dialog pentru proprietățile controlerului ActiveX. Notați proprietatea Clasă care definește clasa controlului ActiveX. Valoarea acestei proprietăți a fost setată automat: MSCAL.Calendar.7. Definiți numele elementului: ocxCalendar și dimensiunile "aproximativ 8x6 cm.
Pentru a vizualiza proprietățile obiectului Calendar:
- Plasați indicatorul mouse-ului peste calendar și faceți clic dreapta pentru a obține meniul contextual pentru controlul formularului.
- În meniul care apare, faceți clic pe butonul de control al obiectului Calendar, iar meniul de obiecte se deschide (consultați Figura 15.38). Selectați Proprietăți din meniu. Se afișează caseta de dialog Proprietăți pentru obiectul Calendar.
Fig. 15,38. Meniul de context pentru controalele ActiveX
- În mod prestabilit, fereastra Proprietăți se deschide în fila General, unde puteți seta anumite proprietăți comune ale controlului Calendar. Extindeți fila Fonturi din caseta de dialog Proprietăți.
- Pentru postul DayFont din lista Proprietăților (Property Name) de pe fila Font (Font) setați fontul Arial Cyr, într-un grup de atribute (Font Style) se va verifica cu caractere aldine (Bold), setați dimensiunea fontului "10" și faceți clic pe butonul Apply (Aplicare). Element coloană Calendar Size restricționează dimensiunea fontului în valoare de puncte DayFont 9,75 (Fig. 15,39).
Fig. 15,39. Fila Font din caseta de dialog Proprietăți: Calendar
- Se repetă procesul de selectare a fontului descris în etapa anterioară, pentru proprietățile GridFont (font - Arial Cyr, marca - bold, dimensiune - 9) și TitleFont (Font - Arial Cyr, marca - bold, dimensiune - 12).
- Extindeți fila Colours din caseta de dialog proprietăți. Această filă oferă posibilitatea de a schimba oricare dintre cele 16 culori standard (sau culoarea Windows System) de culoare de fundal (BackColor), daynames font (DayFontColor), data de font (GridFontColor), fontul din titlu (TitleFontColor) și liniile de grilă (GridLinesColor) (Fig. 15,40).
- Faceți clic pe OK pentru a închide fereastra cu proprietățile obiectului. Deschide fereastra de proprietăți a formularului. Set Niciuna (Niciuna) barele de defilare (valoarea proprietății) și barele de derulare Nu (nr) ca valoarea proprietăților butoanelor de tranziție (NavigationButtons) și cadru de selecție (RecordSelectors).
- Schimbați formularul cu calendarul încorporat pentru a forma modul. Forma controlului Calendar în vizualizarea Form este prezentată în Fig. 15.41. Pentru a schimba anul sau luna, puteți utiliza listele derulante în antetul calendarului.
- Reveniți la modul Designer. Acum vom examina modul în care puteți utiliza metodele din elementul Calendar.
Fig. 15.40. Fila Culoare a casetei de dialog Proprietăți: Calendar
Fig. 15.41. Formați cu controlul calendarului cu liste derulante din lună și an
Pentru a vă familiariza cu toate proprietățile, metodele și evenimentele oricărui control ActiveX încorporat în formular, deschideți fereastra de proprietăți a acestui obiect și faceți clic pe butonul Ajutor.
- În partea dreaptă a calendarului, plasați șase butoane pe verticală. Denumiți-le după cum se arată în Fig. 15.42: Săptămâna viitoare, Săptămâna anterioară, Următoarea lună, Luna anterioară, Anul următor, Anul precedent.
- Creați un câmp de text sub calendar. Acest câmp afișează data selectată în calendar. Setați proprietatea Nume a acestui câmp la Data și proprietatea Valoare implicită la Data.
- Acum scrieți câteva proceduri pentru tratarea evenimentelor. În primul rând, trebuie să afișați data curentă când deschideți formularul din calendar. Pentru a face acest lucru, trebuie să creați o procedură pentru manipularea evenimentului Încărcare al formularului. Mai jos este textul acestei proceduri.
Fig. 15.42. Vizualizarea finală a formularului care conține controlul Calendar din vizualizarea Design
- Când selectați o dată, câmpul de dată trebuie să se modifice în calendar. Prin urmare, trebuie să scrieți procedura de procesare a evenimentului AfterUpdate după controlul Calendar. La fel ca cea precedentă, această procedură constă într-un singur operator. Cu toate acestea, indică faptul că nu este necesar să utilizați proprietatea valorii pentru a se referi la valoarea elementului Calendar.
- Alte șase proceduri trebuie să se ocupe de evenimentul Click pentru fiecare dintre cele șase butoane. În aceste proceduri, se folosesc șase metode ale obiectului Calendar:
- Începând cu un an și o lună poate fi acum schimbate cu ajutorul butoanelor, puteți elimina din antetul calendar listele drop-down, care fila General (General) din proprietățile obiectului caseta de dialog și debifați alegerea lunii și a anului (lună / an Selectori).
- Salvați formularul dându-i numele "Calendar". Forma finală este prezentată în Fig. 15.43.
Fig. 15.43. Vizualizarea formei finale cu controlul Calendar