Me adelante con que había resuelto el problema del espacio entre imágenes. Con el codigo:
Código:
with ListView1.Items.Add do
begin
ImageIndex := ListView1.Items.Count - 1;
Left := 100 * (ListView1.Items.Count - 1); //de 100 en 100 px.
end;
consigo que las imágenes se muestren de 100 en 100 px pero no selecciona correctamente la imagen.
Cuando hago click en algunas imágenes estas no se seleccionan como si conservara la posición por defecto de las imágenes a la hora de seleccionarlas. En cambio, cuando elimino la instrucción
Código:
// Left := 100 * (ListView1.Items.Count - 1); //de 100 en 100 px.
las imágenes se muestran muy separadas pero se seleccionan correctamente.
Código:
if ListView1.Selected <> nil then
Label1.Caption := IntToStr(ListView1.Selected.ImageIndex)
Lo curioso es que, cuando añado las imágenes, si las voy seleccionando desde la primera hasta la última, se seleccionan correctamente (desde la izquierda del ListView a la Derecha) pero el problema ocurre cuando selecciono una imagen anterior (una imagen a la izquierda de la última seleccionada).
¿Alguien me puede ayudar a resolver este problema?
Saludos...
Miguel Angel