Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by Sir Rufo,
12. Nov 2015
Das mit dem Self lässt sehr leicht aufklären, wenn man weiß, dass Delphi in Methoden dieses Self in den Scope nimmt und dieses hier
If TCheckBox(FindComponent(Test)).Checked = true then
ShowMessage('Ergebnis : True')
ELSE
ShowMessage('Ergebnis : False') ;
intern so
If TCheckBox( Self.FindComponent( Test ) ).Checked = true then
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by Sir Rufo,
12. Nov 2015
Oder eben ohne dieses Zusammengebaue (s. Anhang Source + EXE zum Herumspielen)
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by Sir Rufo,
12. Nov 2015
Da diese Erzeugung zur Laufzeit insgesamt sehr statisch aussieht, würde sich sogar die Verwendung von einem Frame anbieten. Dann wird nur das Frame zur Laufzeit erzeugt und dort ist alles enthalten. :stupid:
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by Sir Rufo,
12. Nov 2015
Zum eigentlichen Thema:
Die Dokumentation zu TComponent.FindComponent sagt
Du fragst (ich vermute mal) die Form, ob es dort so einen Komponente gibt. Die Form ist aber gar nicht der Besitzer (Owner) der gesuchten Komponente und darum kannst du die so auch nicht finden.
Häng deine Komponenten an einen Owner und dann frage diesen Owner nach den gesuchten Komponenten ab.
Alternativ...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by Sir Rufo,
12. Nov 2015
Es wäre sehr freundlich, wenn du deinen Delphi-Quellcode mit den Delphi-Tags umschließen würdest, dann sieht der Quelltext gleich lesbarer aus.
Aus
procedure foo;
begin
DoBar();
end;