2 replies to this topic

[ZiriusB]

Buenas;
Estoy haciendo una aplicacion en la cual quiero tener un FORMULARIO DE BUSQUEDA donde introducire CODIGO DEL TRABAJADOR y al hacer clic en Buscar este me abra otro formulario en donde me cargue el nombre del trabajador, mes actual, etc (por dar algunos ejemplos) como puedo hacer esto...
Espero sus respuestas y gracias por la ayuda!

[felipe]

Hola,
¿tu consulta es por parámetros?

De ser así simplemente pasas ese valor y al momento de abrir tu formulario sería algo como esto:

delphi

MiFormulario := TMiFormulario.Create(Self);
MiQuery.Open;

Así, creas tu formulario y despues ejecutas la consulta.


Saludos!

[razadi]

Saludos Amigo, bienvenido al foro, yo lo haría de la siguiente manera:

Tengo dos Forms Form1 y Form2 donde Form1 tiene el query y un grid relacionado al query, por supuesto, al presionar una tecla en mi caso "F3" se abre el form2 quien tiene una propiedad de tipo dataset donde relaciono el query qwue tengo en el form1 lo llamo asi:

delphi

{Cuando presiono el F3, puede ser en un Action o directamente en el KeyDown del form del form1}
...
form2 := Tform2.create(nil);
try
  if form2.busca=mrOK then begin
    query.params[0].AsString=ValRegresado;
    ...
  end;
finally
  form2.Free;
end;
 
{esto es en el form2}
var
  ValRegresado: string;
 
function busca: integer;
begin
  Result := ShowModal;
  if ModalREsult=mrOK then
    ValRegresado := 'Valor a Regresar';
end;

De esta manera al momneto de darle aceptar a tu form2 lo liberas y regresa lo que se haya consultado para filtrar tu grid, o lo que necesites, saludos.