Forum: Win32/Win64 API (native code)
Delphi
by Mazel,
11. Mär 2008
Keiner eine Idee woran das liegen könnte?
Kann jemand eventuell einen der beiden Codes testen oder in ein kleines Programm setzen und mir zum Test übergeben?
Würde schon gern den Grund erfahren wollen, warum die Icons von *.msc Dateien nicht angezeigt werden.
Forum: Win32/Win64 API (native code)
Delphi
by Mazel,
10. Mär 2008
Hallo Jens,
ich habe deine Prozedur einfach jetzt so übernommen, doch leider auch hier das selbe Problem. Es wird nicht das richtige Dateiicon zurückgegeben. Ich verstehe nicht voran das liegen soll. Wie gesagt, in der alten Anwendung, von der ich nur noch ein paar Codereste habe, habe ich die eine Prozedur genommen und in die neue Anwendung gesetzt. Bei allen Dateien geht es, bis auf die...
Forum: Win32/Win64 API (native code)
Delphi
by Mazel,
9. Mär 2008
Hallo,
normal kann und habe ich Dateiicons immer so auslesen können:
procedure TForm1.Button1Click(Sender: TObject);
var
SHFileInfo: TSHFileInfo;
begin
SHGetFileInfo(PChar('C:\WINDOWS\explorer.exe'), 0, SHFileInfo, SizeOf(SHFileInfo), SHGFI_ICON or SHGFI_SMALLICON);