Problema para pasar datos entre 2 formas
Hola, muchas gracias por responderme y con mucho gusto aquí está el código:
procedure TFFacturacion.SpeedButton1Click(Sender: TObject);
var
FBusquedas:TFBusquedas;
begin
FBusquedas:=TFBusquedas.Create(self);
FBusquedas.ShowModal;
end;
Es el código de la primera forma en donde se manda llamar a la otra de donde se supone voy a extraer los datos.
En la siguiente forma a través de un botón voy a regresar los datos.
procedure TFBusquedas.SpeedButton1Click(Sender: TObject);
begin
FFacturacion.Edit1.Text:=DBGrid1.Fields[1].Text; -- Aquí marca error--
close;
end;
Al momento de hacer esto la forma no se cierra, se queda activa después de mandar el mensaje y tampoco me asigna los datos al objeto de la forma anterior.
Gracias por tu ayuda.
|