mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-28 10:02:14 +00:00
Code Issues Projects Releases Packages Wiki Activity

ADD: Viewer plugins - itm_center and itm_wrap support

Browse source
This commit is contained in:
Alexander Koblov 2022-04-02 19:38:04 +03:00
commit 3972b94de8
1 changed files with 9 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

10
src/fviewer.pas
View file

@ -1153,7 +1153,15 @@ end;
procedure TfrmViewer.WMCommand(var Message: TLMCommand); procedure TfrmViewer.WMCommand(var Message: TLMCommand);
begin begin
case Message.NotifyCode of case Message.NotifyCode of
itm_next: if Message.ItemID = 0 then cm_LoadNextFile([]); itm_center:
miCenter.Checked:= Boolean(Message.ItemID);
itm_next: begin
if Message.ItemID = 0 then cm_LoadNextFile([]);
end;
itm_wrap: begin
gViewerWrapText:= Boolean(Message.ItemID);
actWrapText.Checked:= gViewerWrapText;
end;
end; end;
end; end;