Una de mis principales frustraciones antes de escribir dicho truco era mi incapacidad de reconocer formatos estándares que para Delphi no lo eran así (png, gif, jpeg, etc.) y con mi clásico desacuerdo al uso de componentes debía encontrar una solución. Una vez probada la interfaz IExtractImage noté que también podía crear vistas en miniatura de una amplia gama de formatos no gráficos a una velocidad considerablemente superior a otras pruebas realizadas, el problema que describes me pareció algo secundario y obviamente lo deje pasar.
Ahora no tengo en mente alguna propiedad de alguna interfaz que pueda ser de utilidad para el caso, pero suponiendo que estas utilizando las vistas en miniatura en tu proyecto de gráficos te doy una alternativa igualmente nativa; prueba el siguiente código utilizando
ésta unidad y me cuentas
Código Delphi
[-]...
uses Viewer;
{$r *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var Image: TBitmap;
begin
Image := GetImage('ClubDelphi.png');
if Assigned(Image) then
begin
Image1.Picture.Assign(Image);
Image.Destroy;
end;
end;
Notarás que no necesitamos Delphi2009 o un montón de componentes para reconocer un buen numero de formatos de imágenes
Saludos