mirror of
https://github.com/doublecmd/doublecmd.git
synced 2026-06-21 09:58:13 +00:00
FIX: Error message box encoding
This commit is contained in:
parent
ce75dfe1e7
commit
0573dd6ea6
1 changed files with 2 additions and 2 deletions
|
|
@ -94,7 +94,7 @@ procedure OleCheckUTF8(Result: HResult);
|
|||
implementation
|
||||
|
||||
uses
|
||||
SysUtils, ShellApi, JwaShlGuid, ComObj, LazUTF8;
|
||||
SysUtils, ShellApi, JwaShlGuid, ComObj, LazUTF8, DCOSUtils;
|
||||
|
||||
function SHGetImageListFallback(iImageList: Integer; const riid: TGUID; var ImageList: HIMAGELIST): HRESULT; stdcall;
|
||||
var
|
||||
|
|
@ -273,7 +273,7 @@ end;
|
|||
|
||||
procedure OleErrorUTF8(ErrorCode: HResult);
|
||||
begin
|
||||
raise EOleError.Create(WinCPToUTF8(SysErrorMessage(ErrorCode)));
|
||||
raise EOleError.Create(mbSysErrorMessage(ErrorCode));
|
||||
end;
|
||||
|
||||
procedure OleCheckUTF8(Result: HResult);
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue