mirror of
https://github.com/doublecmd/doublecmd.git
synced 2026-06-21 09:58:13 +00:00
ADD: actions to the Resize Modern ToolBar Items in ViewerForm on macOS 11+
This commit is contained in:
parent
bbb0653d14
commit
e4931b1235
1 changed files with 10 additions and 1 deletions
|
|
@ -293,6 +293,15 @@ begin
|
|||
form.btnPenColor.Click;
|
||||
end;
|
||||
|
||||
procedure viewerResizeAction( const Sender: id );
|
||||
var
|
||||
form: TfrmViewer;
|
||||
begin
|
||||
form:= getCurrentViewerForm;
|
||||
if Assigned(form) then
|
||||
form.btnResizeClick( nil );
|
||||
end;
|
||||
|
||||
procedure onViewerGetPenWidthMenu( const menu: TMenu );
|
||||
var
|
||||
i: Integer;
|
||||
|
|
@ -605,7 +614,7 @@ const
|
|||
title: 'Resize';
|
||||
tips: 'Resize';
|
||||
bordered: True;
|
||||
onAction: nil;
|
||||
onAction: @viewerResizeAction;
|
||||
);
|
||||
|
||||
viewerSlideItemConfig: TCocoaConfigToolBarItem = (
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue