Ver la Versión Completa : pregunta sencilla
valentine
17-06-2004, 17:27:02
Sé que para saber si he pulsado la tecla de intro es:
if key=#13 then
pero y si pulso el tabulador??
Gracias
delphi.com.ar
17-06-2004, 17:29:32
#9
PD: No es difícil averiguarlo, solo poniendo un breakpoint y evaluando el valor de la variable Key lo verás!
valentine
17-06-2004, 17:39:45
cierto, gracias, pero a estas horas ya no pienso mucho
ctronx
17-06-2004, 18:33:07
saludos, yo utilizó algo asi:
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
17-06-2004, 18:55:56
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
procedure Tform2.Edit1KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
if Key = VK_RETURN then
...
Saludos!
ctronx
17-06-2004, 20:11:00
lo de las constantes es bueno , pero cuando las quiero utilizar en una aplicacion clx no funciona por eso uso
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
17-06-2004, 20:37:40
En CLX tienes las constantes Key_Return y Key_Enter pertenecientes a la unit Qt.
Saludos!
ctronx
17-06-2004, 21:17:40
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_ ????
vBulletin v3.6.8, Derechos ©2000-2024, Jelsoft Enterprises Ltd.