Asignar imágenes a ImageList en tiempo de ejecución

[ecfisa]

Estoy haciendo pruebas con distintas imágenes y muchas no me las saca bien

No me quiso mostrar una foto, pero como era de mi señora y siendo Delphi tán lógico y considerado.... no le dí mayor importancia.

Hablando en serio, si me pasó con una imágen, pero realmente no sé a que se debe. Seguramente sea por el formato
(Como dato adicional la muestra en un TImage, pero no funciona StretchDraw.)

Saludos.