Caption perdido...
 

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 !!!!

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!