UPD: Use current dir instead "c:\" because it may not exists

This commit is contained in:
Alexander Koblov 2009-07-18 08:53:10 +00:00
commit 222cdbee6c

View file

@ -540,7 +540,7 @@ end;
constructor TPixMapManager.Create;
{$IFDEF MSWINDOWS}
var
FileInfo : TSHFileInfo;
FileInfo : TSHFileInfoW;
iIconSize : Integer;
{$ENDIF}
begin
@ -558,7 +558,7 @@ begin
else
iIconSize := SHGFI_LARGEICON;
FSysImgList := SHGetFileInfo('C:\',
FSysImgList := SHGetFileInfoW(PWideChar(UTF8Decode(mbGetCurrentDir)),
0,
FileInfo,
SizeOf(FileInfo),