que evento se produce...?

[[Lepe]]

Si no quieres trabajar con ShowModal por alguna razón extraña, siempre puedes crearte tus propios eventos:

Código Delphi [-]
TElegido = procedure (Cliente:String; Codigo:Integer) of object;

Tform1 = ....
public
   Elegido :TElegido
end;

procedure TForm1.boton1Click;
begin
  if assigned(elegido) then // cuando se pulse el boton lanzamos el evento
    Elegido (edit1.text, spinEdit1.AsInteger);
end;


ahora en Tform2 (el que llamará a Form1)

Tform2 = ...

   private
     procedure ElElegido(Cliente:String; Codigo:Integer);
           // declaramos el procedimiento que recoge el evento de Form1
           // por supuesto tiene que llevar los mismos parámetros; 
           // el nombre le ponemos el que más corage nos dé.

procedure form2Create(..)
begin
  form2 := Tform2.Create(application);
  form2.Elegido := ElElegido // asignamos el evento de Form2 con la rutina 
//                   ElElegido, para que nos llegue a esta última la información
end;

procedure Tform2.ElElegido(Cliente:String; Codigo:Integer);
begin
//  En form2 se pulsó el boton1, y ejecutamos lo que queramos.
  ShowMessage(cliente);
end;

saludos