Páginas

quinta-feira, 30 de abril de 2009

Limpando Edits dinamicamente no Delphi

Muitas vezes precisamos limpar o conteudo de mais de um edit de tela e normalmente resolvemos o probelma da seguinte situação:

image

onde pegamos edit à edit e colocamos no evento no qual usaremos para zerar os edits, como exemplo um evento de botão Limpar ou Cancelar para podermos executar a operação no momento desejado.

Outra forma é adiconar todos os edits em algma função e usar a chamada no evento desejado.

Mas vai ai uma dica e uma das formas mais corretas de se executar esta função que é criando uma função chamando o tipo do componente que queremos limpar o seu conteúdo e no evento na qual iremos usar a função passar somente os campos que terão seu contéudo zerado apagado.

Por exemplo a função abaixo:

image 

Irá verificar se na Unit onde a mesma for chamada existe compontes do tipo TCustomEdit e irá zerar o conteúdo de todos os componentes da tela.

A figura abaixo demostra a utilização a função LimpaEdits passando como parametros os  3 edits usando no nosso exemplo:

image

Bom, espero ter ajudado, não sou nenhum expert em Delphi ou em Objetct Pascal, mas vai ai minha primeira dica em Delphi.