UPD: ExtensionInitialize - pass absolute plugin path

This commit is contained in:
Alexander Koblov 2019-11-23 16:38:53 +00:00
commit 3f546cd49c
2 changed files with 2 additions and 2 deletions

View file

@ -480,7 +480,7 @@ begin
with StartupInfo do
begin
StructSize:= SizeOf(TExtensionStartupInfo);
PluginDir:= ExtractFilePath(sName);
PluginDir:= ExtractFilePath(mbExpandFileName(sName));
PluginConfDir:= gpCfgDir;
InputBox:= @fDialogBox.InputBox;
MessageBox:= @fDialogBox.MessageBox;

View file

@ -677,7 +677,7 @@ begin
with StartupInfo do
begin
StructSize:= SizeOf(TExtensionStartupInfo);
PluginDir:= ExtractFilePath(FModuleFileName);
PluginDir:= ExtractFilePath(mbExpandFileName(FModuleFileName));
PluginConfDir:= gpCfgDir;
InputBox:= @fDialogBox.InputBox;
MessageBox:= @fDialogBox.MessageBox;