Ver Mensaje Individual
  #2  
Antiguo 06-02-2004
__cadetill __cadetill is offline
Miembro
 
Registrado: may 2003
Posts: 3.387
Reputación: 25
__cadetill Va por buen camino
Exactamente igual que VB no se puede (que yo sepa), pero lo que sí puedes hacer es poner los nombre estilo MiComponente1, MiComponente2,.... y luego con FindComponent('MiComponente' + IntToStr(Indice)) acceder a él haciendo un casteo al tipo de componente.

Un ejemplo:

Suponemos que tenemos 4 TEdits llamados MiEdit1, MiEdit2, MiEdit3 y MiEdit4

podemos hacer un bucle para ponerlos a blanco estilo.....

Código:
for i := 1 to 4 do
  TEdit(FindComponent('MiEdit' + IntToStr(i))).Text := '';
Espero te sirva
Responder Con Cita