Hola,
Recuerda usar las etiquetas adecuadas para publicar código, tal como he hecho en tu mensaje.
En cuanto a la duda, considera que puedes asignar al evento OnClick de un objeto un método de
otro objeto:
Código Delphi
[-]
type
TForm1 = class(TForm)
public
procedure Form2Click(Sender: TObject);
end;
implementation
procedure TForm1.Form2Click(Sender: TObject);
begin
end;
La asignación podrías hacerla en el constructor del segundo formulario:
Código Delphi
[-]
type
TForm1 = class(TForm)
public
procedure FormCreate(Sender: TObject);
end;
implementation
uses Unit1;
procedure TForm2.FormCreate(Sender: TObject);
begin
OnClick := Form1.Form2Click;
end;
No es, quizá, la manera más limpia de hacerlo, pero puede servir
LineComment Saludos