Botones de Accion Formulario MDI

[jilc1111]

Muchas gracias por tu respuesta.

Lo resolví creando los botones en el MDI Padre sin código en el evento OnClick y en el evento FormActivate de cada Formulario MDIChild asigno al evento OnClick de cada botón del Padre el evento del Child que quiero que ejecute.

Ejemplo MDI Child:

Código Delphi [-]
procedure TFormChild1.Mensaje;
begin
  ShowMessage(Self.Caption);
end;

procedure TFormChild1.FormActivate(Sender: TObject);
begin
  MainForm.btn1.OnClick := Self.Mensaje;
end;

Espero que sirva de guía para alguien mas con el mismo dilema.


Saludos.