[dape]

hola amigos, estoy tratando de averiguar con que botón se ha llamado a una form, para eso utilizo el siguiente código:

Código Delphi [-]
procedure form1.create(sender: tobject)
begin
    if sender = form2.boton1 then
       {ejecutar código 1}
    if sender = form3.boton2 then
      {ejecutar código 2}
    {realiza el resto}
end;

como lo habrán notado al form1 puedo llamarlo desde el form2 o el form3, para esto realizo una evaluación en el oncreate del form1 para saber quién lo ha llamado para poder ejecutar un pequeño código específico para cada botón, el caso es que al ejecutar el programa me sale un error de violación de acceso si no recuerdo mal, ejecuta el programa paso a paso y el error salta al hacer el llamado del form1 y evaluar el primer if, al aceptar el error el programa continua pero no evalúa los if, ¡se los pasa de largo olímpicamente como si no hubiera presionado ningún botón para llamar al form1!.

¿Es correcta mi forma de utilizar el sender? ¿existe alguna otra manera de saber quién llamó al form1?.

Desde ya gracias por la ayuda que puedan brindarme.

Saludos desde Tacna - Perú

David