bloquear Crtl Delete no DBGRID
Pessoal,
alguem sabe como bloquear o Crtl+Delete num Dbgrid ?
Quero que impedir que os usuários excluam registros que são exibidos numa dbgrid.
alguem sabe como bloquear o Crtl+Delete num Dbgrid ?
Quero que impedir que os usuários excluam registros que são exibidos numa dbgrid.
Rodrigo Costa
Curtidas 0
Respostas
Koplin
19/09/2003
No evento OnKeyPress do DBGrid faça:
If (GetKeyState(VK_CONTROL)) and ($1000000)<>0 then
If key=#46 Then key:=0;
46=delete
0 tecla inexistente - não faz nada
If (GetKeyState(VK_CONTROL)) and ($1000000)<>0 then
If key=#46 Then key:=0;
46=delete
0 tecla inexistente - não faz nada
GOSTEI 0
Jc
19/09/2003
Se quiser algo mais facil tente isso (apenas uma linha):
// Colocar no evento OnKeyDown do DBGRID:
if (Shift = [ssCtrl]) and (Key = 46) Then KEY := 0;
// Colocar no evento OnKeyDown do DBGRID:
if (Shift = [ssCtrl]) and (Key = 46) Then KEY := 0;
GOSTEI 0