Problem mit Shellicons...

[Marco Haffner]

Delphi-Quellcode:

var
  SHFileInfo: TSHFileInfo;
const
  FullPath = 'D:\Eigene Dateien\Internet\HTML\Startseite\startseite.htm';
begin
  SHGetFileInfo(FullPath, 0, SHFileInfo, SizeOf(SHFileInfo), SHGFI_ICON);
  Image1.Picture.Icon.Handle := SHFileInfo.hIcon;
end;

zeigt bei mir das html Icon an, aber nur wenn bei FullPath auch ein vollständiger Dateiname (incl. Pfad) angegeben wurde, *.htm alleine reicht nicht.

Zitat von flomei:

Zitat von FriFra:

XP Home, XP pro und Win 2003

Win2003 Hab ich was verpasst oder meinst du Win2k (2000)

Nein er meint wirklich Windows 2003. Heißt aber glaub' ich komplett Windows Server 2003