Ver Mensaje Individual
  #4  
Antiguo 10-02-2004
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
 
Registrado: may 2003
Posts: 7.424
Reputación: 29
Lepe Va por buen camino
Cita:
Empezado por maruenda
mira , yo hago eso pero cuando pulso intro sobre el registro que busco.
en el evento keydown del tdbgrid
IF(INTTOSTR(KEY)='13') THEN // pulsacion de intro
begin
empresabuscada:=strtoint( REJILLAempresas.Fields[0].ASSTRING);

end;

el valor devuelto, empresabuscada, se lo paso al otro form, y con ese valor en un tquery hago una consulta, y obtengo los datos.
Ya que delphi tiene mapeada con constantes todas las teclas del teclado, podemos poner lo mismo de forma distinta:

Código:
 IF key = VK_RETURN THEN // pulsacion de intro
mirar en la ayuda sobre "virtual key code" para un listado de constantes.

Es igual pero no es lo mismo
Saludos.
Responder Con Cita