exibição de dblookupcombobox
Pessoal,
tenho um dblookupcombobox, que me exibe as cidades do minha tabela..
estou gravando os registros, queria que qdo clicasse enter
limpasse o valor que está no dblookup..
ou seja, no meu registro seleciono São Paulo, qdo clicar no botão ele vai fazer minha validação e queria que o dblookup voltasse a ficar em branco para mim selecionar outra cidade..
tem como fazer isso??
valeu
João Marcelo
tenho um dblookupcombobox, que me exibe as cidades do minha tabela..
estou gravando os registros, queria que qdo clicasse enter
limpasse o valor que está no dblookup..
ou seja, no meu registro seleciono São Paulo, qdo clicar no botão ele vai fazer minha validação e queria que o dblookup voltasse a ficar em branco para mim selecionar outra cidade..
tem como fazer isso??
valeu
João Marcelo
Jm
Curtidas 0
Respostas
Helderjr
30/11/2005
procedure TForm.dblookupcombobox1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if (Key = VK_SPACE) or (Key = VK_DELETE) then
dblookupcombobox.KeyValue := 0; ou dblookupcombobox.KeyValue := ´´;
end;
Se o Keyfield for string = ´´ ou = 0 qdo. integer
Shift: TShiftState);
begin
if (Key = VK_SPACE) or (Key = VK_DELETE) then
dblookupcombobox.KeyValue := 0; ou dblookupcombobox.KeyValue := ´´;
end;
Se o Keyfield for string = ´´ ou = 0 qdo. integer
GOSTEI 0