mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-21 09:58:13 +00:00
Code Issues Projects Releases Packages Wiki Activity

ADD: Show error message if libunrar not found

Browse source
This commit is contained in:
Alexander Koblov 2014-07-19 16:12:52 +00:00
commit d0602bc3db
1 changed files with 5 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

5
plugins/wcx/unrar/src/unrarfunc.pas
View file

@ -698,6 +698,11 @@ end;
procedure ExtensionInitialize(StartupInfo: PExtensionStartupInfo); dcpcall;
begin
ExtensionStartupInfo := StartupInfo^;
if ModuleHandle = NilHandle then
begin
ExtensionStartupInfo.MessageBox('Cannot load library ' + _unrar + '! Please check your installation.',
nil, MB_OK or MB_ICONERROR);
end;
end;
finalization