TAB, fácil mas não funciona!!!!
QUERO PRESSIONAR A TECLA TAB EM DBEDIT E SALVAR A TABELA.
Já tentei isso e não foi:
if Key = VK_TAB Then
table1.post;
edit1.setfocus;
nos eventos onkeydown,onkeyup, onkeypress no form o keypreview esta true, quando eu pressiono qualquer tecla ele pula para para o edit1 .
Já tentei isso e não foi:
if Key = VK_TAB Then
table1.post;
edit1.setfocus;
nos eventos onkeydown,onkeyup, onkeypress no form o keypreview esta true, quando eu pressiono qualquer tecla ele pula para para o edit1 .
Norotico
Curtidas 0
Respostas
Einstein
21/11/2003
if Key = VK_TAB Then begin
table1.post;
edit1.setfocus;
end
table1.post;
edit1.setfocus;
end
GOSTEI 0
Vanius
21/11/2003
pq vc nao coloca o codigo de gravar, no evento OnExit
procedure TForm1.Edit1Exit(Sender: TObject);
begin
Table1.post;
end;
Abraços,
Vanius
vaniusg@terra.com.br
procedure TForm1.Edit1Exit(Sender: TObject);
begin
Table1.post;
end;
Abraços,
Vanius
vaniusg@terra.com.br
GOSTEI 0
Norotico
21/11/2003
preciso usar a tecla tab., othen begin também não funcionou!!!!!
GOSTEI 0