radiogroup alkatrész - studopediya
Telepítés gomb alatti ráírva a „Apply”. Minden terv elkészült, folytassa a programozó gombot. Ha még nem mentette a projekt egy új mappát, tegye meg most. Name tulajdonsága a forma, mint rendesen, adja meg a nevét FMAIN, a modul - csak Main, a teljes projekt - FormViewer.
Térjünk vissza a gombot. Kattintson duplán, hogy hozzon létre egy gombnyomással rutin.
Az eljárás a következő:
eljárás TfMain.Button1Click (Sender: TObject);
// fogantyú alkatrész BorderIcons
ha CheckBox1.Checked majd fMain.BorderIcons: = fMain.BorderIcons + [biSystemMenu]
mást fMain.BorderIcons: = fMain.BorderIcons - [biSystemMenu];
ha CheckBox2.Checked majd fMain.BorderIcons: = fMain.BorderIcons + [biMinimize]
mást fMain.BorderIcons: = fMain.BorderIcons - [biMinimize];
ha CheckBox3.Checked majd fMain.BorderIcons: = fMain.BorderIcons + [biMaximize]
mást fMain.BorderIcons: = fMain.BorderIcons - [biMaximize];
ha CheckBox4.Checked majd fMain.BorderIcons: = fMain.BorderIcons + [biHelp]
mást fMain.BorderIcons: = fMain.BorderIcons - [biHelp];
// fogantyú alkatrész BorderStyle
esetében RadioGroup1.ItemIndex a
0. fMain.BorderStyle: = bsSizeable;
1. fMain.BorderStyle: = bsDialog;
2. fMain.BorderStyle: = bsNone;
3. fMain.BorderStyle: = bsSingle;
4. fMain.BorderStyle: = bsSizeToolWin;
5. fMain.BorderStyle: = bsToolWindow;
Dolgunk kódot. Kezdetben dolgozzuk be a négyzetet, CheckBox:
ha CheckBox1.Checked majd fMain.BorderIcons: = fMain.BorderIcons + [biSystemMenu]
mást fMain.BorderIcons: = fMain.BorderIcons - [biSystemMenu];
Ha ez a jelző be van kapcsolva, akkor Checked tulajdonságát true értékkel tér vissza, és ha az állandó [biSystemMenu] hozzá kell adni az ingatlan alakja BorderIcons. Állandók, beleértve a beépített, később beszélünk. Eddig egy dolog fontos - ha hozzátesszük az állandó, akkor közé ezt az értéket BorderIcons tulajdon.
A példa venni a beágyazott Delphi könyvtárban. Helyezzük a villogó kurzor belsejében BorderIcons szót és nyomjuk
Ugyanígy bánunk másik három CheckBox komponens.
Ezután a feldolgozás megy RadioGroup panel. Mivel csak egy gomb lehet aktiválni, a panel ItemIndex ez a tulajdonság csak 6 értékeket, a számgombok 0-tól 5 Célszerű használni az esetben design. Értékétől függően szánunk az azonos nevű ItemIndex benne kulcs értékét ingatlan BorderStyle formában. Ez minden.
Mentsd meg a példát, fordítsd, és hogyan működik a program. Attól függően, hogy a kiválasztott értékek kattintás után az „Apply” gombra megjelenését módosítja formák. Bizonyos esetekben, a mérete lehet változtatni nyomva az egér, bizonyos - nem. Ha az érték egyenlő BorderStyle bsNone, és a gallér ablak eltűnik, és a felső sor szisztemikus formák. Kísérletet. Ez a segédprogram hasznos lehet a jövőben, ha azt szeretné, hogy előre látni, hogy milyen beállításokat kell kiválasztani, hogy az ablakot úgy néz ki. Például lehetetlen volt változtatni a méretét, hogy nem „Close” és a „Megnyitás” gomb stb