![]() |
VCL Form design, Captions von anderer Form erhalten
Hallo,
ich mal wieder mit einer Anfängerfrage. Bisher habe ich, um einer anderen Form die Beschriftungen von Captions (z.B.) immer von der Hauptform/aufzurufenden Form aus die Beschriftungen angepasst: Form2.Panel_Vorname.Caption := ...; Ich würde das lieber über Propertys machen. Wenn ich aber nun z.B. 20 verschiedene Panel beschriften muss, dann das ganze noch mit Labels, Buttons usw., muss ich ja für jedes Element (.Caption, .Hint, .Text (TEdit)), wenn es vordefiniert sein soll, eine extra Procedure schreiben. Ist das ein gängiger Weg oder geht das einfacher über einen Record, den ich einfach fülle und bei Aufruf dann im Form2.OnShow entsprechend setze? LG Mathias |
AW: VCL Form design, Captions von anderer Form erhalten
*entfernt*
|
AW: VCL Form design, Captions von anderer Form erhalten
Da gibt es viele Möglichkeiten.
An dem Form2.Panel_Vorname.Caption := ...; kann man allerdings schwer vorbeikommen. Die Texte kann man z.B. in einer Liste vorhalten, einem Dictionary, einem Clientdataset, einem JSON-Array, einer Datenbanktabelle usw Ich denke mal ein Dictionary wäre hier das richtige: DTexte=TDictionary<string,string> Füllen: Dtexte.add('FormCaption',mainform.caption); Dtexte.add('KdName',Kunde.name); Verwenden DTexte.trygetvalue('KdName',Form2.Panel_Vorname.Ca ption); So kann man auch das "Form2.Panel_Vorname.Caption := ...;" sparen. Mehr dazu findet man in der Hilfe. |
AW: VCL Form design, Captions von anderer Form erhalten
Dankeschön :-)
LG Mathias |
AW: VCL Form design, Captions von anderer Form erhalten
Zitat:
Delphi-Quellcode:
so würden alle panels einer form eine caption erhalten.
oncreate-event oder so...
var i: integer; begin for i := 0 to {formname.}ComponentCount -1 do if {formname.}Components[i] is TPanel then TPanel({formname.}Components[i]).Caption := 'eine caption'; end; nur so als vorschlag. |
AW: VCL Form design, Captions von anderer Form erhalten
Zitat:
Ich schau mir das mal an, habe da schon eine Idee :-) LG Mathias |
AW: VCL Form design, Captions von anderer Form erhalten
Zitat:
2. dafür gibts uns ja :P 3. tu dies, ich auch, mal sehen was bei dir rauskommt, ansonsten poste ich meine "generic" version (hat was mit TObject am hut, als kleiner hinweis^^) 4. grüße zurück! |
Alle Zeitangaben in WEZ +1. Es ist jetzt 17:41 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz