Dateiicon ermitteln schlägt fehl

[toms]

Hallo, du musst noch CoInitialize aufrufen dann wird das richtige Icon extrahiert.

Delphi-Quellcode:

initialization
  CoInitialize(nil);

finalization
  CoUnInitialize;