MDI: Auf Komponente des Childs zugreifen

[Yan]

Hi @all!

Mal wieder eine MDI-Frage. Ich hab' leider in der Suche nicht gefunden. Also:

Wie kann ich von der Haupt-Form auf eine Komponente zugreifen, die auf dem MDI-Child liegt?

Mit ActiveMDIChild komme ich ja an das aktive Fenster. Zumindest der OH nach zu schließen. Aber wie komme ich jetzt an die Komponente?

Vielen Dank schonmal,

[Muetze1]

Moin!

Da ActiveMDIChild vom Typ TForm ist, musst du erstmal einen typecast auf die Klasse deines MDI Childs machen, diese kennt dann auch deine Komponenten.

MfG
Muetze1

[Yan]

Aah ja...

Und was heißt das, ich meine das Typecasting?
Könntest du mir das kurz erklären?

Vielen Dank,

[franktron]

Ganz einfach

Delphi-Quellcode:

  (ActiveMDIChild.FindComponent('Button1') AS TButton).Click;

müssen noch abfragen ob gefunden und so rein.

[Yan]

Danke! Das hilft mir schon eher weiter. :thumb:

[EDIT]Mein 100ster Beitrag!! :-D[/EDIT]

[bigg]

Warum rufst du in deinem Beispiel FindComponent auf?

Code:

var Button: TButton;
begin 

if Self.MDiChildCount > 0 then
Button := (Self.ActiveMDIChild as TForm2).Button1;

end;

Bei bedarf kann man hier auch noch auf nil prüfen.

[Die Muhkuh]

Oder:

Delphi-Quellcode:

TMDIFormName(ActiveMDIChild).Button1Click;

@bigg

ich weis. Es ist ja nur der reine Code.

Man kanns auch so machen:

Delphi-Quellcode:

if ActiveMDIChild is TMDIFormName then
  TMDIFormName(AcitveMDIChild).Button1Click;

[bigg]

Und was ist wenn gar kein Child geöffnet ist?
dann bekommst du nämlich so rote Fehlermeldungen.

PS: Button ist in meinem Beispiel nur ein Zeiger auf TButton :zwinker: