Fórum Limpar e preencher de novo - Urgente!!!! #132429
03/02/2003
0
Estou com um pequeno problema: quando preencho os dados de um form e clico no botão Salvar, gostaria que ele gravasse a informação, limpasse o form e fosse para o primeiro DBEdit para que eu pudesse cadastrar novos dados, só que não sei como fazer isso... :cry:
Hermeson Menezes
Curtir tópico
+ 0
Responder
Posts
03/02/2003
Robsonismael
quando voce der o insert todos são limpos, bastando apenas do o foco.
dbedit3.setfocus;
dbedit3.setfocus;
Responder
Gostei + 0
25/06/2021
Wanderson Cardoso
QuerySelect.ExcecSql;
for I := 0 to Pred(Self.ComponentCount) do
begin
if (Self.Components[ I ] is TDBEdit) then
begin
TDBEdit(Self.Components[ I ]).text := ' ';
end;
end;
DBEdit1.SetFocus;
Caso tenha outros componentes que queira limpar é só complementar esse código!
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)