mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-21 09:58:13 +00:00
Code Issues Projects Releases Packages Wiki Activity

UPD: simplify Gif/Slide Modern Tool Bar Item Icon switching in ViewerForm on macOS base on the new version of Lazaurs

Browse source
This commit is contained in:
rich2014 2026-05-12 11:17:07 +08:00
commit 7851fb014f
1 changed files with 7 additions and 26 deletions
Download patch file Download diff file Expand all files Collapse all files

33
src/platform/unix/darwin/ucocoamodernformconfig_viewer.inc
View file

@ -429,6 +429,7 @@ const
title: 'Slide Show';
tips: 'Slide Show';
bordered: True;
alternateIconName: 'stop';
onAction: @viewerSlideAction;
showsIndicator: True;
@ -517,6 +518,8 @@ const
title: '';
tips: '';
bordered: True;
alternateIconName: 'pause.fill';
onAction: @viewerGifMoveAction;
);
@ -807,9 +810,6 @@ var
toolBar: NSToolBar;
item: NSToolBarItem;
moveImageName: String;
moveImage: NSImage;
begin
if vgsIsGif in states then begin
moveEnabled:= True;
@ -830,13 +830,7 @@ begin
item:= TCocoaToolBarUtils.findItemByIdentifier( toolBar , 'ViewerForm.GifMove');
item.setEnabled( moveEnabled );
if vgsPlaying in states then
moveImageName:= 'pause.fill'
else
moveImageName:= 'play.fill';
moveImage:= NSImage.imageWithSystemSymbolName_accessibilityDescription(
StringToNSString(moveImageName), nil );
item.setImage( moveImage );
TCocoaToolBarItem(item).lclSetState( vgsPlaying in states );
item:= TCocoaToolBarUtils.findItemByIdentifier( toolBar , 'ViewerForm.GifPrev');
item.setEnabled( prevEnabled );
@ -929,28 +923,15 @@ end;
procedure TCocoaViewerFormHandler.onSlideStateChanged(const viewer: TfrmViewer);
var
form: TfrmViewer;
item: NSToolBarItem;
imageName: String;
image: NSImage;
begin
form:= getCurrentViewerForm;
if NOT Assigned(form) then
Exit;
item:= TCocoaToolBarUtils.findItemByIdentifier( form, 'ViewerForm.Slide' );
item:= TCocoaToolBarUtils.findItemByIdentifier( viewer, 'ViewerForm.Slide' );
if item = nil then
Exit;
if form.btnSlideShow.Down then
imageName:= 'pause'
else
imageName:= 'play';
image:= NSImage.imageWithSystemSymbolName_accessibilityDescription(
StringToNSString(imageName), nil );
item.setImage( image );
TCocoaToolBarItem(item).lclSetState( viewer.btnSlideShow.Down );
form.TimerViewer.Enabled:= form.btnSlideShow.Down;
viewer.TimerViewer.Enabled:= viewer.btnSlideShow.Down;
end;
procedure TCocoaViewerFormHandler.onPenWidthChanged( Sender: TObject );