Evento ao pressionar tecla

Delphi

27/06/2003

Pessoal tenho no evento onKeyPress de um dbGrid o seguinte codigo:

if KEY = #127 then
   begin
      if MessageBox(0,´Confirma a exclusão desse item?´,´Exclusão´, mb_YesNo + mb_IconError) = idYes then
          dtm_Dados.adq_Itens.Delete;
    end;


Minha intenção é que ao pressionar delete a linha do dbgrid seja excluída.

Esse código funciona se eu mudar a tecla, tanto que estou usando com enter para teste.

Na tabela ASCII que tenho delete = 127, me corrijam se estiver enganada, se não como faço para funcionar com delete?

Grata,
Daniela


Nyan

Nyan

Curtidas 0

Respostas

Zacca

Zacca

27/06/2003

E ai cara blz, o codigo do delete é 27 tente que deve funcionar....

falow t+


GOSTEI 0
Midas

Midas

27/06/2003

asc 27 ou #27 não seria o ESC


GOSTEI 0
Nyan

Nyan

27/06/2003

27 é o ESC sim.

Grata,
Daaniela


GOSTEI 0
Tap_pedroso

Tap_pedroso

27/06/2003

Olha eu sempre uso da seguinte maneira:

no evendo onkeydown do dbgrid coloque

if key=vk_delete then
begin
<condiçao>
end;

exemplo:

if key=vk_delete then
begin
table1.delete;
end;

tente que irá dar certo.


GOSTEI 0
Nyan

Nyan

27/06/2003

Perfeito!

Obrigada.
Daniela


Olha eu sempre uso da seguinte maneira: no evendo onkeydown do dbgrid coloque if key=vk_delete then begin <condiçao> end; exemplo: if key=vk_delete then begin table1.delete; end; tente que irá dar certo.



GOSTEI 0
Legraca

Legraca

27/06/2003

Só uma observação, o DBGrid já tem uma opção automática de ao digitar CTRL + DELETE ele excluir o registro.


GOSTEI 0
Tap_pedroso

Tap_pedroso

27/06/2003

de nada.

qualquer dúvida pode perguntar tap_pedroso@yahoo.com.br
tap_pedroso@hotmail.com[/code]


GOSTEI 0
POSTAR