diff options
Diffstat (limited to 'USearch.pas')
| -rw-r--r-- | USearch.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/USearch.pas b/USearch.pas index 732bcdb..3ae35f9 100644 --- a/USearch.pas +++ b/USearch.pas @@ -601,7 +601,7 @@ begin AEngine := TLocalTreeEngine.Create; b := True; end; - if b then FMain.EditViewFileInternal(Self, string(PDataItem(FileList.Selected.AsPointer(0))^.FDisplayName), AEngine, True, False) + if b then FMain.EditViewFileInternal(string(PDataItem(FileList.Selected.AsPointer(0))^.FDisplayName), AEngine, True, False) else Application.MessageBox(Format(LANGCannotLoadFile, [string(PDataItem(FileList.Selected.AsPointer(0))^.FDisplayName)]), [mbOK], mbError, mbNone, mbOK); if AEngine is TVFSEngine then (AEngine as TVFSEngine).VFSClose(nil); |