Como limpar todos os TEdit´s quando a propriedade Tab for

Delphi

29/01/2004

Salve pessoal

Estou com a seguinte duvida .. Tenho um form que tem 15 Edit´s e apos realizar certa operação eu quero limpar apenas os edit´s que tem como valor 2 a propriedade Tag.

Tem como fazer isto?


Valewwwww


Marcelo Bh

Marcelo Bh

Curtidas 0

Respostas

Rômulo Barros

Rômulo Barros

29/01/2004

...
Var
  C : Byte;
Begin
   For C := 0 To Formulario.ComponentCount - 1 Do
   Begin
      If(Components[C] Is TEdit)Then
         If(TEdit(Components[C]).Tag = 2)Then
            (Components[C] As TEdit).Clear;
   End;
End;

....
...


GOSTEI 0
POSTAR