alsooo, ich hab grad noch in Erfahrung gebracht, dass die Form Owner _aller_ Komponenten sein muss, damit findcomponent funktioniert.
Das ist ja schon mal nicht der Fall.
Ich werd das Ganze morgen mal entsprechen umbauen.
Gruss KH
zugriff von aussen
-
- Beiträge: 489
- Registriert: Sa 5. Apr 2008, 09:37
- OS, Lazarus, FPC: Win Vista,Win 7 (L 0.9.29 FPC 2.4.1)
- CPU-Target: 32Bit /64 Bit
- Wohnort: Nähe Freiburg i.Br.
hallo zusammen,
alsoo
ich bin das ganze grad nochmal in Ruhe durchgegangen und hab den Fehler gefunden
ich hatte beim Erstellen des Label den Fehler begangen self zu übergeben
myLabel := TLabel.create(self);
richtig muss mypage übergeben werden
myLabel := TLabel.create(myPage);
somit funktioniert jetzt folgendes Konstrukt fehlerlos:
TPage(MyNotebook.FindComponent('Seite1')).caption:='hallo Seite xxl';
Tlabel(MyNotebook.page[0].FindComponent('myLabel1')).caption:='hallo Label';
und damit funktionieren wohl auch die Konstrukte die mit Assigned
die Fehler abfangen.
Ich danke euch für eure Bemühungen und Hilfen.
Was wäre ich ohne dieses Forum!!!
Gruss KH
alsoo
ich bin das ganze grad nochmal in Ruhe durchgegangen und hab den Fehler gefunden

ich hatte beim Erstellen des Label den Fehler begangen self zu übergeben
myLabel := TLabel.create(self);
richtig muss mypage übergeben werden
myLabel := TLabel.create(myPage);
somit funktioniert jetzt folgendes Konstrukt fehlerlos:
TPage(MyNotebook.FindComponent('Seite1')).caption:='hallo Seite xxl';
Tlabel(MyNotebook.page[0].FindComponent('myLabel1')).caption:='hallo Label';
und damit funktionieren wohl auch die Konstrukte die mit Assigned
die Fehler abfangen.
Ich danke euch für eure Bemühungen und Hilfen.
Was wäre ich ohne dieses Forum!!!
Gruss KH