Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi Einen TabSheet per Quelltext Caption zuweisen (https://www.delphipraxis.net/39569-einen-tabsheet-per-quelltext-caption-zuweisen.html)

mlspider 4. Feb 2005 15:40


Einen TabSheet per Quelltext Caption zuweisen
 
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:

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

Bernhard Geyer 4. Feb 2005 15:44

Re: Einen TabSheet per Quelltext Caption zuweisen
 
Ich schau mal in die Zauberkugel....

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

mr47 4. Feb 2005 15:48

Re: Einen TabSheet per Quelltext Caption zuweisen
 
hi mlSpider. Versuchs mal mit

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

// EDit: getestet: funktioniert

mlspider 4. Feb 2005 15:50

Re: Einen TabSheet per Quelltext Caption zuweisen
 
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 4. Feb 2005 15:51

Re: Einen TabSheet per Quelltext Caption zuweisen
 
Danke mr47. Du warst schneller

mlspider 4. Feb 2005 15:59

Re: Einen TabSheet per Quelltext Caption zuweisen
 
Dein Code lößt bei mir einen Fehler aus


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


Alle Zeitangaben in WEZ +1. Es ist jetzt 01:05 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz