AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein GUI-Design mit VCL / FireMonkey / Common Controls Delphi VCL Form design, Captions von anderer Form erhalten

VCL Form design, Captions von anderer Form erhalten

Ein Thema von NoGAD · begonnen am 5. Mai 2021 · letzter Beitrag vom 6. Mai 2021
Antwort Antwort
Benutzerbild von NoGAD
NoGAD

Registriert seit: 31. Jan 2006
Ort: Erfurt
199 Beiträge
 
Delphi 10.4 Sydney
 
#1

VCL Form design, Captions von anderer Form erhalten

  Alt 5. Mai 2021, 23:24
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
Mathias
Ich vergesse einfach zu viel.
  Mit Zitat antworten Zitat
Benutzerbild von KodeZwerg
KodeZwerg

Registriert seit: 1. Feb 2018
3.047 Beiträge
 
Delphi 10.3 Rio
 
#2

AW: VCL Form design, Captions von anderer Form erhalten

  Alt 5. Mai 2021, 23:46
*entfernt*
Gruß vom KodeZwerg
  Mit Zitat antworten Zitat
Neumann

Registriert seit: 6. Feb 2006
Ort: Moers
503 Beiträge
 
Delphi 10.4 Sydney
 
#3

AW: VCL Form design, Captions von anderer Form erhalten

  Alt 6. Mai 2021, 00:20
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.
Ralf
Gruß vom Niederrhein
  Mit Zitat antworten Zitat
Benutzerbild von NoGAD
NoGAD

Registriert seit: 31. Jan 2006
Ort: Erfurt
199 Beiträge
 
Delphi 10.4 Sydney
 
#4

AW: VCL Form design, Captions von anderer Form erhalten

  Alt 6. Mai 2021, 00:23
Dankeschön

LG Mathias
Mathias
Ich vergesse einfach zu viel.
  Mit Zitat antworten Zitat
Benutzerbild von KodeZwerg
KodeZwerg

Registriert seit: 1. Feb 2018
3.047 Beiträge
 
Delphi 10.3 Rio
 
#5

AW: VCL Form design, Captions von anderer Form erhalten

  Alt 6. Mai 2021, 00:33
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.
Man kommt da relativ einfach dran vorbei.
Delphi-Quellcode:
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;
so würden alle panels einer form eine caption erhalten.
nur so als vorschlag.
Gruß vom KodeZwerg

Geändert von KodeZwerg ( 6. Mai 2021 um 00:35 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von NoGAD
NoGAD

Registriert seit: 31. Jan 2006
Ort: Erfurt
199 Beiträge
 
Delphi 10.4 Sydney
 
#6

AW: VCL Form design, Captions von anderer Form erhalten

  Alt 6. Mai 2021, 00:38
so würden alle panels einer form eine caption erhalten.
nur so als vorschlag.
Huhu und danke. Daran hatte ich überhaupt nicht mehr gedacht.

Ich schau mir das mal an, habe da schon eine Idee

LG Mathias
Mathias
Ich vergesse einfach zu viel.
  Mit Zitat antworten Zitat
Benutzerbild von KodeZwerg
KodeZwerg

Registriert seit: 1. Feb 2018
3.047 Beiträge
 
Delphi 10.3 Rio
 
#7

AW: VCL Form design, Captions von anderer Form erhalten

  Alt 6. Mai 2021, 00:50
so würden alle panels einer form eine caption erhalten.
nur so als vorschlag.
1. Huhu und danke.
2. Daran hatte ich überhaupt nicht mehr gedacht.
3. Ich schau mir das mal an, habe da schon eine Idee
4. LG Mathias
1. sehr gerne!
2. dafür gibts uns ja
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!
Gruß vom KodeZwerg
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +2. Es ist jetzt 05:30 Uhr.
Powered by vBulletin® Copyright ©2000 - 2021, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2021 by Daniel R. Wolf