MDIChild Probleme

[XzibiT]

An dieser MDI application könnte ich verzweifeln

folgendes Problem:

MDIForm = Frm_Hauptformular
MDIChild = Frm_MDIChild

auf Frm_MDIChild sind unter anderem ein RichEdit Feld

mein Programm erzeugt nun beim Start lustig seine MDIChild fenster ... und nun muss ich in einem bestimmten MDIChild in deren RichEdit Feld Text hineinschreiben.

so habe folgende Funktion:

function TFrm_Hauptformular.MDINumber(Name: string):integer;
var
return : integer;
i : byte;
begin
return := -1;
For i:=0 to Frm_Hauptformular.MDIChildCount-1 do
if (MDIChildren[i].Caption = Name) then return := i;
MDINumber := return;
end;

diese Funktion liefert mich [also hoffentlich macht sie das ] den Wert des MDIChildes das ich brauche.

Mein Problem ist aber ich weiss nicht wie ich nun das RichEdit Feld auf diesem MDIchild ansprechen kann ...

weil mit MDIChildren[return] ... damit kann ich nicht auf die Componenten auf dem Formular zugreifen ...

hoffe mir kann jemand helfen

XzibiT

[CalganX]

Wenn ich dich richtig verstanden habe, müsste es so gehen:

Delphi-Quellcode:

var
  ID: integer;
begin
  {Mach' was du willst...}
  ID := ...; // dieser Rückgabewert
  (MDIChildren[ID] as Frm_MDIChild).RichEdit.Lines.Clear;
end;

Was dieser Schnipsel macht, dürfte klar sein.

Chris

PS: Source untested, should be work...

[XzibiT]

hm

also so änlich müsste es gehen .. da nach MDIChild das hilfe Menü aufgeht und ich dann auf die andern componenten zugreifen kann ...

nur beim compilieren kommt der fehler :

Operator not applicable to this operand types :/

XzibiT

[XzibiT]

Zitat von Chakotay1308:

Wenn ich dich richtig verstanden habe, müsste es so gehen:

Delphi-Quellcode:

var
  ID: integer;
begin
  {Mach' was du willst...}
  ID := ...; // dieser Rückgabewert
  (MDIChildren[ID] as [color=#ff0022]T[/color]Frm_MDIChild).RichEdit.Lines.Clear;
end;

Was dieser Schnipsel macht, dürfte klar sein.

Chris

PS: Source untested, should be work...

das T hatte gefehlt

THX