Como consultar informaciòn de una tabla con una tecla de funcion

[Zeta]

a ver si entendí

cuando quiero buscar una persona por ejemplo presiono F3 y aparece o una pantallita con la búsqueda o hago foco en un textbox para la búsqueda

Tenés que poner en el evento keydown del formulario:

procedure TfrmMiFormulario.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if (key = VK_ESCAPE) then Close;//Ejemplo: cierro el form;
  if (Key = VK_F1) then ...;//Ejemplo: abro la ayuda;
  if (Key = VK_F3) then ...;// Ejemplo: abro la búsqueda;
end;

Y poner la propiedad del form "Key Preview" a "TRUE" para que funcione cuando se aprete una tecla

Para otras teclas buscá la ayuda sobre las "Virtual key codes"

Esto es por lo de las teclas, lo demás es trabajar sobre la base de datos con búsquedas, que creo que algo te contestó Sotrono (no lo leí completo, ni analizé)

Saludos

[[Lepe]]

Una forma de "ordenar" esas cosas es mediante un TActionList, a cada uno de los Taction le asignas una tecla Rápida, (puede ser una tecla de función o una combinación de teclas), despues asignas el Action a cada botón por separado.

Un Taction es simplemente un procedure que se ejecuta, bien cuando hace clic en un botón que está enlazado, o bien cuando se pulsa su tecla rápida (ShortCut)

El cliente escribe "rodriguez" en la ventana de pedidos y pulsa F3, en esa ventana tienes un Taction que al pulsar F3:

Crea la ventana de búsqueda en forma Modal (frmbusqueda.ShowModal), permite escribir el nombre, apellido, etc, se hace la búsqueda y muestra los resultados; el usuario hace clic en un resultado y pulsa Intro. La ventana devuelve el código del cliente y se cierra.

Como la ventana se mostró de forma modal, la ventana de pedidos se queda esperando justo en el mismo punto que llamaba a frmbusqueda.ShowModal, ahora recoges el código que ha devuelto frmBusqueda y rellenas la caja de texto en la ventana de pedidos.

Más o menos es la lógica.

Saludos

[maravert]

Muchas gracias a todos por responderme, voy a probar y a empezar con el programa, gracias, nunca dejare de formar parte de este foro, enhorabuena por los creadores.

Alemar