Sign in Join
Wiki copytemporary

TCheckGroup/de: what changed

Revision 0 to 1. Removed lines have a minus sign; added lines have a plus sign.

Title: TCheckGroup/de

OldNewLine
1+Diese Seite erklärt, wie man die [[doc:lcl/extctrls/tcheckgroup.html|TCheckGroup]] Komponente verwendet. Auf etwas klicken bedeutet immer ein Linksklick, ein Rechtsklick wird explizit erwähnt.
2+
3+## Beschreibung
4+
5+Eine Gruppe CheckBoxen, die der Benutzer anwählen kann. Die Komponente ist wie eine [[TGroupBox/de|TGroupBox]] mit integrierten [[TCheckBox/de|TCheckBoxen]].
6+
7+<figure>
8+<img src="Comp_Standard_TCheckGroup.png" title="Comp_Standard_TCheckGroup.png" />
9+<figcaption>Comp_Standard_TCheckGroup.png</figcaption>
10+</figure>
11+
12+## Verwendung
13+
14+Um eine [[doc:lcl/extctrls/tcheckgroup.html|TCheckGroup]] auf einem [[TForm/de|Formular]] zu nutzen, kann man sie einfach auf der Komponentenpalette *Standard* auswählen und, mit einem Klick auf das Formular, platzieren.\
15+
16+#### Kleines Beispiel
17+
18+Es wird die Hintergrundfarbe eines Formulars geändert. Diese Farbe wird per Addition der einzelnen Farbanteilen bestimmt:
19+
20+- erstellen Sie eine neue Anwendung und platzieren Sie ein TCheckGroup auf Ihrem Formular
21+- ändern Sie im Objektinspektor die Eigenschaft Name von *CheckGroup1* zu *cgRed* und Caption zu *Red*
22+- fügen Sie die Checkboxen für *cgRed* hinzu:
23+ - wählen Sie im Objektinspektor die Eigenschaft *Items* von *cgRed*
24+ - klicken Sie auf den Button \[...\], der Zeichenketteneditor öffnet sich
25+ - schreiben Sie untereinander *1 2 4 8 16 32 64 128* und beenden Sie die Eingabe mit Button *OK*
26+- kopieren Sie diese TCheckGroup, indem Sie *cgRed* im Formular rechtsklicken und auf *Kopieren* klicken
27+- rechtsklicken Sie das Formular und klicken Sie auf *Einfügen*, die TCheckGroup mit dem Namen *cgRed1* wird erstellt
28+- ändern Sie nun den Namen von *cgRed1* zu *cgGreen* und Caption zu *Green*
29+- fügen Sie noch eine TCheckGroup ein und ändern Sie den Namen zu *cgBlue* und Caption zu *Blue*
30+- immer wenn eine CheckBox geklickt wird, soll sich die Farbe ändern:
31+ - erstellen Sie den *OnItemClick* Eventhandler von *cgRed*, indem Sie im Objektinspektor unter Ereignisse den Button \[...\] neben dem Ereignis *OnItemClick* klicken
32+ - wählen Sie für *cgGreen* und *cgBlue* ebenfalls diesen Eventhandler, indem Sie jeweils neben dem Ereignis *OnItemClick* in der ComboBox *cgRedItemClick* auswählen
33+ - schreiben Sie folgenden Code in den Eventhandler:
34+
35+``` pascal
36+procedure TForm1.cgRedItemClick(Sender: TObject; Index: integer);
37+var
38+ i, c: Integer;
39+begin
40+ c := $000000; // Ausgangsfarbe ist Schwarz
41+ for i:=0 to 7 do begin // Frage Items 0..7 aller Checkgroups ab
42+ if cgRed.Checked[i] then c := c + 1 shl i; // Rotanteil $000000..$0000FF
43+ if cgGreen.Checked[i] then c := c + 1 shl (i + 8); // Grünanteil $000000..$00FF00
44+ if cgBlue.Checked[i] then c := c + 1 shl (i + 16); // Blauanteil $000000..$FF0000
45+ end;
46+ Color := c;
47+end;
48+```
49+
50+- starten Sie Ihre Anwendung, so könnte sie aussehen:
51+
52+<figure>
53+<img src="ExampleTCheckGroup.png" title="ExampleTCheckGroup.png" />
54+<figcaption>ExampleTCheckGroup.png</figcaption>
55+</figure>
56+
57+## Siehe auch
58+
59+[[TCheckBox/de|TCheckBox]]\
60+[[TGroupBox/de|TGroupBox]]\
61+
62+---
63+*From the Free Pascal wiki, page "TCheckGroup/de", as it stood on 2020-02-29 after a change by Trev, out of the wiki's dump of 2024-05-26. Copyright stays with the author who wrote it, according to the old wiki's [[Licensing]] page. If you have concerns about this material, [message the admin](/wiki-contact).*

Back to history