-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by Marco Steinebach,
18. Jul 2021
Huhu,
Was konntest du dir nicht verkneifen?
with FLabel do // erstellt den Label
with Items do // bezieht sich auf die Combobox bzw. auf deren Items.
Das sind doch zwei völlig verschiedene Baustellen, wenn auch in der gleichen Methode?
Herzlich grüßt
Moo
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by Marco Steinebach,
16. Jul 2021
Hallo,
Mir ein bißchen Arbeit sparen.
Ich brauche ein TLabel, sagen wir:
Geburtsdatum
und rechts daneben, die Combobox. Das soll, wenn wir es zum Laufen kriegen, dann auch für die Kombi
TLabel mit TEdit
gehen.
Bislang hab ich halt, ganz normal ein TLabel erzeugt, beschriftet, dann das TEdit erzeugt. Da mein Projekt aber ziemlich viele solcher Felder hat dachte ich, ich könnte es...
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by Marco Steinebach,
16. Jul 2021
Hallo zusammen und herzlichen Dank für eure Geduld,
Habs jetzt umgesetzt, ist aber immeernoch nix zu sehen.
Sagt mal: woher weiß der Label eigentlich, welche Caption er nehmen soll, das hab ich nämlich nicht drin.
Denn ich sage ja, was ich inzwischen entfernt habe:
caption := '';
und gleich danach:
fLabel.caption := self.caption; // sprich auch: '';
Toll! ;-)
D.h. ich müßte doch irgendwo,...
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by Marco Steinebach,
16. Jul 2021
Hallo zusammen,
Aaaalso:
fLabel.parent := self.parent;
geht, wie Himitsu schon geschrieben hat, im onCreate nicht, wird ja von setParent übernommen.
Blöde frage: laut meinem Code wird der Label an der Position, wie das Edit, erstellt, und, anschliessend, wird das Edit um 120 nach rechts verschoben (Scalierung und co kriegen wir, denke ich, später, wenn das Ding überhaupt zu sehen ist....
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by Marco Steinebach,
16. Jul 2021
Hallo Himitsu,
Erstmal Danke für deine Hilfe.
Fehlermeldungsfrei, aber das Label ist immernoch nicht zu sehen.
protected
{ Protected-Deklarationen }
procedure setParent (aParent: TWinControl); override;
.....
constructor TMsDatumCombo.create (aOwner: TComponent);
begin
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by Marco Steinebach,
16. Jul 2021
Hallo Zusammen,
Doch, doch, das meine Komponente Owner des Labels ist, ist völlig in Ordnung, ich bin nur nicht darauf gekommen das es geht.
Also heißt es bei mir jetzt:
constructor TMsDatumCombo.create (aOwner: TComponent);
begin
inherited create (aOwner);
fOwner := aOwner;
fShowLabel := true;
fCaption := '';
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by Marco Steinebach,
15. Jul 2021
Huhu Stahli,
Bringt leider nichts...
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by Marco Steinebach,
15. Jul 2021
Hallo Zusammen,
@Stali: toll, das After Create hilft zwar hier nicht, aber das ist alle mal besser, als es mit einem Timer zu lösen - super, jetzt wird die Nacht noch länger.
Zu meinem eigentlichen Problem (TLabeledEdit) hab ich in meinem Uralt-Delphi leider noch nicht:
constructor TMsDatumCombo.create (aOwner: TComponent);
begin
inherited create (aOwner);
fOwner := aOwner;
...
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by Marco Steinebach,
15. Jul 2021
Hallo zusammen,
Ich habe eine von TEdit abgeleitete Klasse. Die soll ein TLabel auf die Form bringen, wenn man sie benutzt.
Auf Deutsch: in das TEdit sollen Datumswerte hinein, und ich hätte gern, dass daneben, erzeugt von meiner abgeleiteten Klasse, ein TLabel erzeugt wird, in dem der zugehörige Wochentag erscheint.
Schreibe ich im onCreate meines TEdits
fLabel := TLabel.create (fOwner);
...