Mann sollte im
PSDK auch bis zum Ende lesen

, das hier funktioniert aber auch:
Delphi-Quellcode:
var
SHFileInfo: TSHFileInfo;
begin
SHGetFileInfo('*.htm', FILE_ATTRIBUTE_NORMAL or FILE_ATTRIBUTE_ARCHIVE, SHFileInfo, SizeOf(SHFileInfo),
SHGFI_ICON or SHGFI_USEFILEATTRIBUTES);
// Zeigt das Bild in einem TImage an
Image1.Picture.Icon.Handle := SHFileInfo.hIcon;
end;

Zitat von
Daniel B:
Der Nachfolger von 2000 wird dann 2004/2005 kommen und dann LongHorn heissen.
Wäre Longhorn dann nicht der Nachfolger von Windows XP?
Soviel Spionage hat 2000 ja auch nicht betrieben.