Obtener información de los controles de un formulario

[MadRoberto]

Hola.

Me gustaría saber como puedo recorrer los controles de un formulario e ir obteniendo las propiedades de cada uno.

Tengo un ejemplo que realice en Visual Basic, y quiero aplicar lo mismo en Delphi, espero sirva de algo.

Gracias.


//Ejemplo
For Each MiObjeto In Me
If TypeOf MiObjeto Is CommandButton Then 'COMMANDBUTTON
'Instruccion
ElseIf TypeOf MiObjeto Is CheckBox Then 'CHECKBOX
'Instruccion
ElseIf TypeOf MiObjeto Is ComboBox Then 'COMBOBOX
'Instruccion
ElseIf TypeOf MiObjeto Is Frame Then 'FRAME
'Instruccion
End If
Next

[vtdeleon]

Saludos
Me gustaría saber como puedo recorrer los controles de un formulario e ir obteniendo las propiedades de cada uno.Las propiedades o el tipo de objeto (o componente) que es?:confused:
Para recorrer los componentes que un form tiene:

var
n:Integer;
begin
for n:= 0 to Form1.ComponentCount-1 do
begin
ShowMessage(Components[n].ClassName);
end;

end;Suerte

[ContraVeneno]

Y una vez que sepas de que clase es, para las propiedades harías algo así como:

For .... etc
if (Components[i] is TEdit) then begin
TEdit(Components[i]).Text:='';
end; //if component is edit
end; //for

[MadRoberto]

Gracias.

:)

[Neftali [Germán.Estévez]]

Otra opción puede ser utilizar RTTI; Aquí (http://neftali.clubdelphi.com/delphi_tips.html#Acceder_a_las_propiedades_de_un) tienes la función para hacerlo,