Hola _CALI.
No sé si entendí muy bien tu planteo, pero a ver si es esto...
Supongamos que tenemos dos forms: FMain y FChild, con sus propiedades
FormStyle en
fsMDIForm y
fsMDIChild respectivamente asignadas.
En FMain tenemos un
TEdit y en FChild un
TButton que al presionarlo le manda un texto al
TEdit ubicado en FMain.
Una forma es que FChild incluya en la clausua
uses a FMain y de ese modo podríamos usar al
TEdit de FMain. (referencia circular)
Con un ejemplo:
FMain:
Código Delphi
[-]
...
type
TFMain = class(TForm)
Edit1: TEdit;
procedure FormShow(Sender: TObject);
private
public
end;
var
FMain: TFMain;
implementation {$R *.dfm}
uses Unit2;
procedure TFMain.FormShow(Sender: TObject);
begin
TFChild.Mostrar;
end;
...
FChild:
Código Delphi
[-]
...
type
TFChild = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
public
class procedure Mostrar;
end;
var
FChild: TFChild;
implementation {$R *.dfm}
uses Unit1;
class procedure TFChild.Mostrar;
begin
if not Assigned(FChild) then
FChild:= TFChild.Create(nil);
end;
procedure TFChild.Button1Click(Sender: TObject);
begin
FMain.Edit1.Text:= 'Hola FMain...';
end;
...
Saludos.