Fórum Inicializar Edits ComBox #228402

27/04/2004

0

Oi . . .
Tenho em um form, 40 entradas, entre Edits, ComboBox e DateEdit.
Como inicia-los sem fazer individualmente?
Sobre o form, como definir sua posição na tela, ao executar independentemente de sua posição em tempo de desenvolvimento? Como impedir seu deslocamento pelo usuário em tempo de execução?
{}
Fabiana


Fab

Fab

Responder

Posts

28/04/2004

Lucas Silva

Oi . . . Tenho em um form, 40 entradas, entre Edits, ComboBox e DateEdit. Como inicia-los sem fazer individualmente?


Mude o tag destes componentes p/ dois.
var i: integer;
...
for i:= 0 to componentCount -1 do
 if components[i].tag = 2 then
   begin
     
     if Components[i] as TComboBox then 
      (Components is TCombobox).O_método_que_você_quiser.
     if Components[i] as TEdit then 
      .... 
     // e assim vai...
   end;



Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar