Holas
Para mostrar eso que quieres hacer, te recomiendo que uses el "ImagesViewer" de las librerias
JEDI que anda muy bien.
Lo único que en vez de tomarte las imagenes desde una base de datos, te las toma desde un directorio. Supongo que te será sencillo adaptarlo a este componente.
Para usarlo solamente tienes que especificar en la propiedad "Directory" el directorio de las imagenes y listo.
Despues para actualizar las imagenes:
Código Delphi
[-]ImagesViewer1.LoadImages;
Despues tambien te dejo algo de codigo para que te des una idea de como trabajan:
Código Delphi
[-]
procedure TfPropiedades.btnBorrarImagenSelecPropClick(Sender: TObject);
begin
inherited;
if (ImagesViewer1.Count > 0) and (ImagesViewer1.SelectedIndex >= 0) then begin
DeleteFile(ImagesViewer1.Items[ImagesViewer1.SelectedIndex].FileName);
ImagesViewer1.LoadImages;
end;
end;
Y siguiendo el ejemplo haces lo que tu quieras.
Espero que te sirva.
Mucha suerte!