Ver Mensaje Individual
  #6  
Antiguo 24-04-2007
Avatar de RONPABLO
[RONPABLO] RONPABLO is offline
Miembro Premium
 
Registrado: oct 2004
Posts: 1.514
Reputación: 21
RONPABLO Va por buen camino
con Components... algo asi como esto:

Código Delphi [-]
var i : Integer;
Componente  : TComponet;
...
...
...
ifForm1.ComponentCount > 0 then
begin
   for i := 0 to Form1.ComponentCount - 1 do
   begin
     Componente := Form1.Components[ i ];
     if Componente is TEdit then
     begin
        TEdit(Component).Text:='Hola mundo';
     end
     else if Componente is TButton then
     begin
        TButton (Componente).Click;
     end;
   end;
end;
Responder Con Cita