Einen TabSheet per Quelltext Caption zuweisen

[mlspider]

Hallo,

wieder so'ne dämliche Frage: Wie kann ich per Quelltext einen TabSheet aus der PageControl-Komponente einen Namen zuweisen?

Ich habe es wie folgt versucht:

Form4.TabSheet1.Caption:='Generally'; Leider erhalte ich eine Fehlermeldung.

[Bernhard Geyer]

Ich schau mal in die Zauberkugel....

In welchen Context wird der Code aufgerufen? Ist das Formular (und damit das Control) schon erzeugt?

[mr47]

hi mlSpider. Versuchs mal mit

pageControl1.Pages[1].Caption:='X'; .pages[1] ist also das zweite Tab.

// EDit: getestet: funktioniert

[mlspider]

Sorry. Hier mal die gesamte Procedure:

Delphi-Quellcode:

if vergleicheStringsN(Label11.Caption, Label12.Caption, 5)=True then begin
 Label2.Caption:='To X1';
 Label3.Caption:='To X2';
 Label4.Caption:='To X3';
 Label5.Caption:='Options';
 Label6.Caption:='Minimized';
 Label1.Caption:='Closed';
 Form4.TabSheet1.Caption:='Generally';
 end else begin
 Label2.Caption:='Zu X1';
 Form3.Label3.Caption:='Zu X2';
 Form3.Label4.Caption:='Zu X3';
 Form3.Label5.Caption:='Optionen';
 Form3.Label6.Caption:='Minimieren';
 Form3.Label1.Caption:='Beenden';
 Form4.TabSheet1.Caption:='Allgemein';
 end;

[mlspider]

Danke mr47. Du warst schneller

[mlspider]

Dein Code lößt bei mir einen Fehler aus


Edit: Und Dein Code funktioniert doch. habe mich nur im Form geirrt!