https://winscp.net/tracker/2161 Source commit: 729ab5694089154a9f3f79c1f51a909011214f75
@@ -675,6 +675,7 @@ var
IsSpecialExt: Boolean;
TypeName: string;
begin
+ CoInitialize(nil); // needed for SHGetFileInfo
if Assigned(FOwner.TopItem) then FIndex := FOwner.TopItem.Index
else FIndex := 0;