Extraer Imagenes

[Toni-2006]

Bueno ya he conseguido que no hayan errores al compilar, pero al pulsar el botón para acceder al fichero del que quiero ver la imagen tengo este error de sistema:

Violación de acceso en la dirección......

La línea donde parece que está el error es:

if LongBool(Folder.ParseDisplayName(0, nil, lpFileName, PDWORD(0)^, ItemIDList, PDWORD(0)^)) then Exit;

Y lo que le digo yo para que extraiga la imagen:

Image1.Picture.Assign(GetThumbnail('c:\wingsxp2\designs\06pdb001.ngs', 'c:\06pdb001.jpg', 96, 96));