No meu programa eu tenho vários botões para o usuário usar (Gravar, Limpar, Excluir, Imprimir etc). O botão Limpar zera tudo na tela para uma nova entrada de dados. E ele também faz uns cálculos para um determinado campo (vamos chamá-lo de Txt_Valor), para esta nova entrada de dados.

Sempre que o usuário clica em Gravar ou Excluir, após todo o processo destes botões no fim eu chamo Cmd_Limpar_click para zerar a tela aproveitando assim o código do botão. Só que eu só quero que ele faça os cálculos do Txt_Valor se o usuário clicar em Cmd_Limpar. Portanto quando vier de outro botão pelo Cmd_Limpar_Click eu gostaria de saber que não foi clicado o Cmd_Limpar e evitar de fazer os cálculos para o Txt_Valor.

Declara uma variavel (não local)

Private teste as integer

 

Dentro do botão Gravar e Excluir faça algo +- assim :

teste = 1

E dentro do botão cmd_limpar_click você começa com um if...

If teste = 1 then

     executa a funcao limpar

     teste = 0

else

     não executa

end if

 

Não sei se fui claro....se quiser manda o trecho do código que eu do uma olhada.

 

 

Valeu

Caro Perk o form tem uma propriedade tag insira uma linha +- assim em cada botao

frmCalcula.tag="cmdGravar" se for button gravar

ai onde vc verifica if frmCalcula.tag <>"cmdLimpar then

                                      executa sua rotina

                             else

                             end if

Gostei da dica Ama.

 

Só uma dúvida, isto carrega na memória como se fosse uma variável ?

 

Ex: fmrCalcula = "cmdGrvar"

 

Pq são vários forms e vários botões, não queria ter inúmeras variáveis entulhando a memória.

vai ter somente uma variável no form onde for utilizado!!!

Perk,

 

para não ficar atolado de variaveis sem uso,

depois de fazer a verificação que o AMA explicou zera ela

 

if frmCalcula.tag <>"cmdLimpar then