Pro Radiobutton ein Panel

[hans ditter]

Hey und herzlich Willkommen in der DP !

Zu dem PageControl. Du ziehst die Komponente PageControl auf deine Form, stellst in den Eigenschaften des PageControl TabVisible auf false und fügst beliebig viele TabSheets hinzu (ebenfalls machbar über die Einstellungen). Auf den Tabsheets kannst du dann Komponenten platzieren.

Wenn dann ein RadioButton angeklickt wirt, kannst du über dein PageControl das entsprechende TabSheet anzeigen lassen. Den genauen Befehl weiß ich grad nicht aus dem Kopf, lässt sich aber schnell herausfinden...

Alles andere siehst du, wenn du auf F9 drückst!

Viel Glück und Spaß!
hans ditter

[KHW]

Das klingt machbar , vielen vielen Dank.

Mach mich gleich mal dran

[hathor]

Delphi-Quellcode:

if RadioButton1.checked:=true then PageControl1.ActivePage:= TabSheet1;
if RadioButton2.checked:=true then PageControl1.ActivePage:= TabSheet2;
usw.

[Darlo]

Nur mal aus dem Kopf raus:

Code:

for i := 1 to anzahlTabSheet do
  if TRadioButton(FindComponent('RadioButton'+inttostr(i))).checked then
    begin
      pageControl1.ActivePage := TTabSheet(FindComponent('TabSheet'+inttostr(i)));
      break;
    end;

[DeddyH]

Schau doch einfach in mein Beispielprojekt, da steht doch kaum Code drin. Entscheidend ist die Methode

Delphi-Quellcode:

procedure TfrmMain.rgChoosePageClick(Sender: TObject);
begin
  pcPages.ActivePageIndex := rgChoosePage.ItemIndex;
end;

Dabei ist rgChoosePage die Radiogroup und pcPages das PageControl.

[yörsch]

Wir haben ne ganze menge solcher Fubktionalität..
also
Anwenderauswahl dann Zeig was anderes an...
Die Anwender auswahl ist da mal ein RadioButton, eine ein bestimmter Zahlen Wert...

Wenn immer es möglich ist, hab wir das was angezeigt werden soll, auf Frames drauf geschoben.
Das mit den Frames hat den Vorteil, das das ganze Kapseln kann und das Frame gut wiederverwenden kann

Jetzt kann ich entscheiden ob und wo und wie das ganze Angezeigt werden. #
Im Fenster , als Teil in einer TNodeBook, TPageControl, etc.

Oder was wir auch machen : Oberflächen voll Dynamich aufbauen... Das ist aber etwas zu aufändig für kleinere Sachen..

Was die aber keine abnehmen kann ist eine wie auch immer gearetetes Maping

was heißt:
Bedingung erfüllt = Erzeuge / Zeige an

[KHW]

Ich hab herausgefundenm dass ich auf die Pagecntrol keine Komponente setzen kann (button, label,edit)
oder ich mach was falsch...somit nutzt mir dieses nichts