Wenn dies Ihr erster Besuch hier ist,
lesen Sie bitte zuerst die Hilfe - Häufig gestellte Fragen
durch. Sie müssen sich vermutlich registrieren,
bevor Sie Beiträge verfassen können. Klicken Sie oben auf 'Registrieren', um den Registrierungsprozess zu
starten. Sie können auch jetzt schon Beiträge lesen. Suchen Sie sich einfach das Forum aus, das Sie am meisten
interessiert.
<p>Hallo Michael,<br>
<br>
die Einträge einer DBRadioGroup oder einer RadioGroup, werden über die Eigenschaft <b>Items</b> verwaltet.<br>
Mit der Eigenschaft <b>ItemIndex</b> kann man einen Eintrag in Items zum aktuellen machen.<br>
<br>
Wie schrieb Andreas Kosch als Antwort in einer Diskussion: Es rentiert sich manchmal,<br>in der Delphi-Hilfe zu lesen. Deshalb ein Beispiel aus Ebendieser:<br>
<br>
<pre>
procedure TForm1.FormCreate(Sender: TObject);
begin
RadioGroup1.Items.Add('Vertikal');
RadioGroup1.Items.Add('Horizontal');
RadioGroup1.ItemIndex := 0; // Vertikal als aktiver Eintrag
end;
procedure TForm1.RadioGroup1Click(Sender: TObject);
begin
if RadioGroup1.Items[RadioGroup1.ItemIndex] = 'Vertikal' then
ScrollBar1.Kind := sbVertical;
if RadioGroup1.Items[RadioGroup1.ItemIndex] = 'Horizontal' then
ScrollBar1.Kind := sbHorizontal;
end;
</pre>
<br>
Gruß Thomas</p>
Comment