Cambiar Nombre del objeto

[emeritos]

Hola dilpheros.

Tengo varios objetos TImage cada uno con su nombre: I201, I202, I203....., tambien tengo una tabla donde el valor de uno de sus campos (nombre) es 201, 202, 203..... Pues bien necesito en tiempo de ejecucion hacer referencia a ese objeto de tal manera que combinando I + tabla['nombre'] (deberia de salir I201 o I202 o I203....), me lleve a ese objeto y asi hacer referencia por ejemplo a I201.Picture. No se si me he explicado bien.

Muchas gracias

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

Haz una búsqueda en los foros sobre la función FindComponent (http://docwiki.embarcadero.com/CodeExamples/Tokyo/en/FindComponent_(Delphi))de Delphi, que sirve justo para eso; Acceder a un componente a partir de su nombre.

[emeritos]

Ya lo he solucionado haciendo;

nombreobjeto := 'I'+ tabla['nombre'];
TImage(FindComponent(nombreobjeto)).Picture := Iincipuesta.Picture;



Gracias

[ElKurgan]

Gracias por compartir la solución

Saludos