Meniuri și bare de unelte pe baza acțiunii la Delfi, Delfi, componenta Delfi, sursa delphi
Meniuri și bare de unelte pe baza de acțiune în Delphi
Acum, creați un set de acțiuni. Pentru a face acest lucru, faceți dublu clic pe ActionManager componente. și veți vedea o fereastră. Pentru a crea o acțiune nouă, trebuie să faceți clic pe butonul Add. element nou Actioni apare în lista de acțiuni. Selectați-l și uita-te la inspectorul de obiect. Aici ne interesează în următoarele proprietăți:
a creat două elemente de meniu. Dacă acum te uiți la meniul File, veți vedea că toate elementele sunt în serie, deși este de dorit să se facă un separator pentru a separa Exit. În acest scop trageți pentru a crea buton Separatoare, care este situat în partea de jos a crea seturi. Ia acest buton și trageți pe meniul Fișier când meniul se extinde pentru a seta mouse-ul între Delete și Escape. Când faceți clic pe meniul Fișier, puteți vedea rezultatul prezentat în Fig. 11.46.
Încercați acum pentru a rula programul și veți vedea că toate elementele care nu sunt disponibile. Acest lucru se datorează faptului că nu este un handler onExecute evenimente pentru aceste articole. Evenimentul în sine este declanșat atunci când utilizatorul selectează elementul de meniu kakoy- ca un eveniment # 111; nClicați. Din nou ne întoarcem la fereastra pentru crearea unui set de acțiuni. Creați toate evenimentele elementele handler onExecute. Pentru aceste rutine de tratare nu dispar atunci când compilați și de a salva proiectul, nu se poate scrie un cod, sau pur și simplu a pus un comentariu // semn. Dacă executați proiectul, dar acum toate elementele sunt deja disponibile.
În această fereastră, înființat două element ActionBar. Una dintre ele este asociat cu meniul ActionMainMenuBar1. iar al doilea - cu butoane pe panoul ActionToolBar1. Selectați a doua dintre ele și setați proprietatea autosize este setată la false. După aceea, panoul cu butoanele din dreapta jos va fi un mic buton cu o săgeată în jos. Apăsând acest buton, utilizatorul poate regla butoanele pe care ar trebui să fie afișate pe panoul, și care nu sunt. Mai curând posibil, în cazul în care NumeFișier proprietate din componenta ActionManager a numelui fișierului. În acest caz, componenta va fi stocată automat în informațiile de fișier despre butoanele sau placi de meniu, precum și pentru a le restaura după repornire.
Acum, selectați a doua linie (ActionBar-> ActionTooiBar1) și dublu-clic pe elementele de proprietate. Înainte de a deschide o altă fereastră cu numele butoanelor care sunt create pe panou. Nu este nevoie de a aloca nimic. Doar faceți clic pe butonul din stânga al mouse-ului fereastra pentru a selecta proprietățile ferestrei, nu kako- oricărui element. Găsiți captionOptions proprietate și setați-l la coNone. Dupa aceasta, toate butoanele anteturi dispar.
Același lucru ar putea fi realizat un alt mod - dublu click pe componenta și selectați panoul fila secvențial ActionManager Toolbars și stabilite pentru fiecare dintre ele în Opțiuni pentru subtitrări valoare Niciuna.
Încercați să executați proba și selectați personaliza din meniul Tools. Înainte de a deschide o fereastră similară cu crearea de seturi de acțiuni. Doar aici nu poate crea nimic nou, dar aveți posibilitatea să glisați butonul de pe panoul pentru a crea un buton nou, sau eliminați disponibile prin glisarea și fixarea butoanelor înapoi la fereastra (nu poți nici măcar pe fereastră, și în orice loc, ca și în cazul în care decolează butoane). Se pare că, fără a scris chiar și o singură linie de cod, am creat un panou editabil.
Rămâne de a face doar un mic bar. Selectați o ActionManager și NumeFișier proprietate componentă, specificați orice nume de fișier (lăsați-l să fie toolbar.dat). Acest fișier va salva automat toate butoanele panoului de setări, precum și orice modificări efectuate în modul de rulare, de ex., E. în timpul programului. Prin specificarea unui fișier, apoi reporniți instanța. Rețineți că butonul săgeată în jos de pe bara de buton nu este disponibil. Acest lucru se datorează faptului că toolbar.dat fișier nu există. Închideți programul. În timpul închiderii acestuia își păstrează toate statele buton, și creează un fișier de configurare. Rulați din nou programul, acum totul este accesibil și funcționează pentru că toolbar.dat acolo.
ATENȚIE. Dacă specificați un fișier în care ar trebui să fie salvat setările, apoi amintiți-vă că proiectantul schimbă poziția butoanelor (pentru a adăuga sau elimina existente), în timpul executării acest lucru nu se va reflecta, pentru că nu există nici o informație cu privire la modificările toolbar.dat fișier. Pentru a schimba peste, trebuie să ștergeți fișierul, sau la momentul rulării pentru a face aceleași modificări prin apelarea opțiunii Personalizare din meniul Instrumente.
Acesta este cel mai simplu mod, am creat un set de acțiuni. Fiecare acțiune creează o tratare a evenimentului evenimente onExecute. în care este necesar pentru a efectua acțiunea. Numai apoi trageți acțiuni la panoul de meniu sau butonul.
Pentru evenimente onExecute scrie următorul cod:
Procedura TForm1.MenuShadowActionExecute (Expeditor: TObject);
Rulați programul și a vedea cum se va schimba meniul principal într-un stat punct de umbră diferit.
Foarte interesant este proprietatea componentei stil ActionManager. Încearcă să-l schimbe și să vedem rezultatul. În Delphi 7 are o nouă componentă pe fila Win32 xPManifest. Pur și simplu puneți-l pe formular, și toate butoanele și comenzile din WindowsXP vor avea stilul XP.