Deletar registro em DBGrid com coluna Lookup

Delphi

08/12/2005

Olá,

Estou tentando usar a tecla delete para apagar em um DBGrid.
O caso é o seguinte: no grid tenho uma única coluna com um TIBlookupCombo que busca nomes de fornecedores.
QUando eu digito Del ele apaga o texto do lookup. Para apagar o registro só se eu clicar no ponteiro do Grid. Gostaria que quando o lookup estivesse ´vazio´ e eu digitasse Del novamente ele apagasse o registro... sem eu precisar clicar no Grid.
Alguém tem uma dica sobre isso?

Desde já agradeco...

Susana Cardoso
:)


Susi

Susi

Curtidas 0

Respostas

Edilcimar

Edilcimar

08/12/2005

um chute, não testei
no onkeydown do form coloque
if key = vk_delete then
if TIBlookupCombo = ´´ then
apague o registro


GOSTEI 0
Susi

Susi

08/12/2005

Olá, Edilcimar,

Valeu pela dica. Fiz o teste: quando pressiono a tecla DEL ele primeiro apaga o texto. Se pressiono DEL novamente ele deleta o registro. Porém,
ele foca o registro seguinte e já deleta o texto, deixando o campo em branco... Tens alguma idéia do que pode estar acontecendo?

Fico no aguardo de sugestões...

Grata,

Susana :D


GOSTEI 0
Jairroberto

Jairroberto

08/12/2005

Olá, Susana!

Usando a mesma dica do Edilcimar:

if key = vk_delete then
  if TIBlookupCombo = ´´ then
    //apague o registro
    Key := 0;
  end;
end;


Um abraço,
Jair


GOSTEI 0
Susi

Susi

08/12/2005

Olá, Jair ROberto,


Era isto mesmo que faltava....
Eu tinha imaginado isso, mas não sabia como mudar a key...
Sou novata, mas vou aprender muito...

Valeu mesmo, a vc e ao Edilcimar...

Um abraço

Susana


GOSTEI 0
POSTAR