Caption perdido...

[Xianto]

Muy buenas, como puedo saber el caption de un formulario...
Pregunta simple verdad ???

Pues resulta que me da siempre "" y no se que hago mal...

He aquí el código de creación:

Código Delphi [-]
procedure TMainForm.CreateMDIChild(const Name: string);
var
  Child: TmEditor;
begin
  Child := TmEditor.Create(Application);
  Child.Caption := Name;
  if FileExists(Name) then Child.Memo1.Lines.LoadFromFile(Name);
end;

Y aquí el código del formulario en cuestión:

Código Delphi [-]
procedure TmEditor.ToolButton1Click(Sender: TObject);
begin
  MessageDlg('Caption: '+mEditor.Caption, mtWarning, [mbOK], 0);
end;

Pues la respuesta es siempre: "Caption: "

Como sino tuviera nombre... pero en realidad lo tiene... tiene el path + nombre de archivo que le doy cuando lo creo.

Seguro es alguna tonteria que no veo.

Bue, saludetes !!!!

[delphi.com.ar]

Aparentemente nunca has cargado la variable mEditor.

Igualmente, como estas escribiendo código en la implementación de la clase, puedes acceder directamente a la propiedad:

Código Delphi [-]
procedure TmEditor.ToolButton1Click(Sender: TObject);
begin
  MessageDlg('Caption: ' + Caption, mtWarning, [mbOK], 0);
end;

Saludos!