Forum: Programmieren allgemein
by DeddyH,
19. Nov 2010
Der erste Punkt lag mir auch schon auf der Seele. Ich persönlich würde aus der Funktion ja eine Prozedur machen, die das zu befüllende Icon entgegennimmt.
procedure GetFileIcon(const FileName: String; aIcon: TIcon);
var FileInfo: TSHFileInfo;
begin
Assert(Assigned(aIcon));
FillChar(FileInfo, SizeOf(FileInfo), #0);
if SHGetFileInfo(PChar(FileName), 0, FileInfo, SizeOf(FileInfo),...
Forum: Programmieren allgemein
by DeddyH,
19. Nov 2010
Bist Du sicher, dass das an der Funktion liegt? Oder lädst Du die Dinger evtl. in Images, in denen bereits das "Nicht zugeordnet"-Icon geladen wurde?