FIX: Quick view panel crash (fixes #2011)

(cherry picked from commit f0f2b02c53)
This commit is contained in:
Alexander Koblov 2024-12-14 16:18:50 +03:00
commit fd15280abd

View file

@ -2120,6 +2120,7 @@ begin
pmStatusBar.Items.Add(miEncoding);
pmStatusBar.Items.Add(miImage);
end;
actExitViewer.Enabled:= not bQuickView;
HMViewer := HotMan.Register(Self, HotkeysCategory);
HMViewer.RegisterActionList(actionList);
@ -3884,7 +3885,7 @@ end;
procedure TfrmViewer.cm_ExitViewer(const Params: array of string);
begin
Close;
if not bQuickView then Close;
end;
procedure TfrmViewer.cm_Print(const Params: array of string);