maruenda
15-01-2004, 19:37:30
buenaaaaassss. ahi va mi pregunta. quiero evitar que al pulsar determinadas teclas estas se reflejen en el dbedit que tiene el foco.
uso el evento keydown y tengo la propiedad keypreview del form a true
aunque pongo a cero key, no funciona. sugerencias ? gracias.
procedure Tfclientes.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
case key of
vk_add: begin // aqui me pongo en modo insercion, siempre
// que tenga el form en blanco. si tengo un registro
//visualizandolo quiero ignorar la pulsacion
key:=0;
botoninsertar.click;
end;
end;
uso el evento keydown y tengo la propiedad keypreview del form a true
aunque pongo a cero key, no funciona. sugerencias ? gracias.
procedure Tfclientes.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
case key of
vk_add: begin // aqui me pongo en modo insercion, siempre
// que tenga el form en blanco. si tengo un registro
//visualizandolo quiero ignorar la pulsacion
key:=0;
botoninsertar.click;
end;
end;