Buenos días:
En una aplicación que estamos desarrollando, creamos una serie de objetos TImage dinámicamente, ya que no sabemos de antemano cuántas deben crearse.
Lo hacemos mediante el siguiente código, una vez hemos encontrado en la base de datos las imágenes necesarias:
Código PHP:
while (datages.tadeposito.Eof = false) do
begin
imagen:= Trim(datages.tadepositoBODEPO.Value) + 'deposito' + Trim(datages.tadepositoCLADEPO.Value) + '.bmp';
imag:= TImage.Create(Self);
imag.Parent:= Self;
imag.Name:= 'deposito' + Trim(datages.tadepositoCLADEPO.Value);
imag.Top:= datages.tadepositoYDEPO.Value;
imag.Left:= datages.tadepositoXDEPO.Value;
imag.Picture.LoadFromFile(ExtractFilePath(Application.ExeName) + 'imagenes/depositos/' + imagen);
datages.tadeposito.Next;
end;
El problema está en que el usuario puede repetir la operación, con lo que aparecen nombres duplicados, con su correspondiente error. ¿Cómo puedo hacer para poder hacer referencia a dichas imágenes creadas para destruirlas antes de realizar la nueva consulta?
Gracias
David Rguez.