Hola estimado amigo
Una vez asignado el objeto puedes hacer
Código Delphi
[-]
Lista := TStringList.Create;
Imagen := TImage.Create(nil);
Imagen.Picture.LoadFromFile('D:\TEMP\1.JPG');
Lista.AddObject('IMAGEN1', TObject(Imagen));
TImage(Lista.Objects[0]).Parent := Self;
Image1.Picture.Assign(TImage(Lista.Objects[0]).Picture);
Para referirte al objeto imagen almacenado, usa el moldeo
TImage(Lista.Objects[n]).
Otro ejemplo similar que asigna una imagen cargada en un
TStringList a un
TImage creado en tiempo de diseño:
Código Delphi
[-]
var
pic: TPicture;
Lista: TStringList;
begin
Lista := TStringList.Create;
pic := TPicture.Create;
Lista.AddObject('Imagen1', TObject(pic));
TPicture(Lista.Objects[0]).LoadFromFile('C:\TMP\IMAGEN.JPG');
Image1.Picture.Assign(TPicture(Lista.Objects[0]));
...
Saludos