Crtl del no dbgrid
Olá pessoal, como titulo já fala tudo o que eu quero..
Como faço para usar comando ou ativar o CTRL+DEL no dbgrid
Como faço para usar comando ou ativar o CTRL+DEL no dbgrid
Tecnofine
Curtidas 0
Respostas
Danielrsanches
01/07/2009
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if ssCtrl in Shift then if key = 46 then showmessage(´Ctrl+Del´); end;
abraços !!!
GOSTEI 0
Osocram
01/07/2009
Não é necessario fazer nada....
Isso ja é do dbgrid.
Isso ja é do dbgrid.
Olá pessoal, como titulo já fala tudo o que eu quero..
Como faço para usar comando ou ativar o CTRL+DEL no dbgrid
GOSTEI 0
Tecnofine
01/07/2009
Deu certo!!! Obrigada
Surgiu outra dúvida:
Como faço para traduzir essa mensagem quando deleto a linha no dbgrid
´Delete Record ? ´
Surgiu outra dúvida:
Como faço para traduzir essa mensagem quando deleto a linha no dbgrid
´Delete Record ? ´
GOSTEI 0
Danielrsanches
01/07/2009
não havia reparado que era no DBGrid...
como nosso amigo osocram disse, é nativo do DBGrid essa função !!
abraço!!
como nosso amigo osocram disse, é nativo do DBGrid essa função !!
abraço!!
GOSTEI 0
Tecnofine
01/07/2009
Desculpe, mas deu certo pela metade....
vou explicar melhor e com mais detalhes que eu havia esquecido
tenho 1º dbgrid que contem o valor total do 2º dbgrid
o que eu quero é quando uso ctrl+del no 2ºdbgrid é que ele atualize o
valor total do 1º dbgrid.
vou explicar melhor e com mais detalhes que eu havia esquecido
tenho 1º dbgrid que contem o valor total do 2º dbgrid
o que eu quero é quando uso ctrl+del no 2ºdbgrid é que ele atualize o
valor total do 1º dbgrid.
GOSTEI 0
Tecnofine
01/07/2009
Resolvi o problema ao atualizar o valor usando esse comando do evento onkeydown do dbgrid
begin
if ssCtrl in Shift then
if key = 46 then
begin
//coloquei os comandos aqui
end;
end;
begin
if ssCtrl in Shift then
if key = 46 then
begin
//coloquei os comandos aqui
end;
end;
GOSTEI 0
Tecnofine
01/07/2009
Agora só falta saber como traduzir essa perguntar:
´Record delete ? ´
´Record delete ? ´
GOSTEI 0
Danielrsanches
01/07/2009
quanto a tradução das mensagens, qual o Delphi está utilizando ??
eu tenho a tradução do Delphi6 e 7 ... se precisar, me mande um e-mail solicitando ...
danielrsanches@gmail.com
abraços !!
eu tenho a tradução do Delphi6 e 7 ... se precisar, me mande um e-mail solicitando ...
danielrsanches@gmail.com
abraços !!
GOSTEI 0
Osocram
01/07/2009
Eu acho melhor vc usar o evento AfterDelete do dataset ligado no seu dbgrid2.
assim não importa como o usuario removeu.... e sim q ele removeu.
assim não importa como o usuario removeu.... e sim q ele removeu.
Resolvi o problema ao atualizar o valor usando esse comando do evento onkeydown do dbgrid
begin
if ssCtrl in Shift then
if key = 46 then
begin
//coloquei os comandos aqui
end;
end; ´
GOSTEI 0