Einzelnen Beitrag anzeigen

Benutzerbild von xZise
xZise

Registriert seit: 3. Mär 2006
Ort: Waldbronn
4.303 Beiträge
 
Delphi 2009 Professional
 
#1

Übergruppe verschiedene Komponenten

  Alt 30. Jul 2006, 19:26
Ich habe
ein xiPanel,
ein xiButton
und eine xiTrackbar
in einer GroupBox (gbExample).

Nun möchte ich, je nachdem welche RadioBox gewählt wurde das passende anzeigen (visible := true) und die anderen ausblenden.
Jetzt benötige ich die Obergruppe von diesen Komponenten... (von Panel, Button, TrackBar), welche Visible unterstützt:
Delphi-Quellcode:
(gbExample.Components.FindComponent('xiExample' + Copy((Sender as TRadioButton).Name, 7, 1)) as {das möchte ich}).Visible := true;
for i := 0 to gbExample.ComponentCount do begin
  if not (gbExample.Components[i] as {auch hier}).Visible then
    (gbExample.Components[i] as {auch hier}).Visible := false;
end;
Fabian
Eigentlich hat MS Windows ab Vista den Hang zur Selbstzerstörung abgewöhnt – mkinzler
  Mit Zitat antworten Zitat