3 botones para acceder a un mismo formulario.

[VRO]

Hola que hay??, os explico cual es mi duda ya que no la he dejado muy clara en el titulo,

tengo 4 formularios (Form1, Form2, form3,Form4) y en los 3 primeros tengo 3 botones, 1 en cada uno de ellos, atraves de ellos accedo al formulario 4.

Ahora viene el tema, segun cual de los botones pulse en el formulario 4 hago una cosa distinta y su resultado se desemboca en cada uno de los formulario que le han llamado, yo para resolver esto siempre lo he hecho con variables globales, en los 3 formulario declero una variable(a1,a2,a3) y en el Form4 hago :

Código Delphi [-]

if form1.a1=1 then
  //hago aqui las cosas
end;

if form2.a2=1 then
 //hago las cosas
end;

  ..............

Me parece muy feo hacerlo de esta forma. Si alguien sabe otra forma mas professional de hacerlos, ruego me lo digan.

Gracias por prestarme su tiempo.