Fórum Evitar Duplo Clique em Botões #511161
19/02/2015
0
Alguem sabe dizer se existe alguma propriedade que evite duplo cliques em botões. Imaginem a seguinte situação:
Temos uma rotina que faz lançamentos em estoque, e o usuario clica 2 vezes bem rapidamente, o sistema processa a informação 2 vezes devido ao segundo clique.
Obrigado desde já!
Junior
Araujo Junior.
Curtir tópico
+ 0Post mais votado
19/02/2015
procedure button1click(sender);
begin
// Se for 1, sai porque está executando
if button1.Tag = 1 then
exit;
// Muda para 1 quando for processar para evitar nova execução
button1.Tag := 1;
{
restante da procedure
.
.
.
}
// No Final, volta para zero para permitir nova execução
button1.Tag := 0;
end;
Renato Rubinho
Gostei + 1
Mais Posts
23/02/2015
Joel Rodrigues
Gostei + 1
23/02/2015
Araujo Junior.
Joel, antes de usar a alternativa do rrubinho, mas não funciona, pois quando é feito o duplo clique ele executa a ação mais rapido que o delphi inabilita o botao, e ficam 2 processamentos do mesmo jeito.
Obrigado a todos.
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)