Tema: recorrer componentes
Ver Mensaje Individual
  #4  
Antiguo 08-12-2007
Avatar de jachguate
jachguate jachguate is offline
Miembro
  
Registrado: may 2003
Ubicación: Guatemala
Posts: 6.254
Reputación: 28
jachguate Va por buen camino
En delphi, así:

Código Delphi [-]
for I:= 0 to Panel1.ControlCount - 1 do
  if Panel1.Controls[i].Name = 'Edit1' then
    TEdit(Panel1.Controls[i]).Text := 'Hola'
  else if copy(Panel1.Controls[i].Name, 1, 5' = 'Boton') then
    TButton(Panel1.Controls[i]).OnClick := Button7Click;

Hasta luego.

__________________
Juan Antonio Castillo Hernández (jachguate)
Guía de Estilo | Etiqueta CODE | Búsca antes de preguntar | blog de jachguate
Responder Con Cita