pregunta sencilla

[valentine]

Sé que para saber si he pulsado la tecla de intro es:

Código Delphi [-]
if key=#13 then

pero y si pulso el tabulador??

Gracias

[delphi.com.ar]

#9

PD: No es difícil averiguarlo, solo poniendo un breakpoint y evaluando el valor de la variable Key lo verás!

[valentine]

cierto, gracias, pero a estas horas ya no pienso mucho

[ctronx]

saludos, yo utilizó algo asi:

Código Delphi [-]
procedure Tform2.Edit1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
var I:integer;
begin
if Key =4100 then begin
//codigo

en donde el 4100 es el valor de la tecla enter, en este mismo codigo intente utilizar #13 y me marca un error creo que es por la variable Key la cual aqui es de tipo Word, en fin puedes utilizar el mismo consejo anterior para saber cual es el valor de la tecla tab para usarlo en este codigo.

p.d. si alguien sabe cual metodo es mejor ó cual es la diferencia entre key=#13 y key=4100

creo que varias personas lo agradeceremos.

[delphi.com.ar]

Cuando un número lo precede el caracter #, estas hablando de la representación ascii del número que lo sucede. Es prácticamente como usar la función Chr.
Por otro lado, te recomendaría utilizar las constantes predefinidas, por ejemplo

Código Delphi [-]
procedure Tform2.Edit1KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
  if Key = VK_RETURN then 
    ...

Saludos!

[ctronx]

lo de las constantes es bueno , pero cuando las quiero utilizar en una aplicacion clx no funciona por eso uso

Código Delphi [-]
procedure Tfrmventas.Edit4KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
var I:integer;
begin
if Key=4100 begin
//codigo

es esto correcto, ó hay otra forma?

[delphi.com.ar]

En CLX tienes las constantes Key_Return y Key_Enter pertenecientes a la unit Qt.

Saludos!

[ctronx]

gracias, tienes razon con Key_Return y unit Qt.
dichas constantes son iguales a las que inician con VK_??
solo hay que cambiar el inicio VK_ por Key_ ????