paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-21 05:01:50 +02:00
Code Issues Packages Projects Releases Wiki Activity

cocoa: passing the checkminmax value

Browse Source
This commit is contained in:
Dmitry Boyarintsev 2021-10-03 14:08:19 -04:00 committed by Maxim Ganetsky
parent 1bef01e030
commit e8614c81e9
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/interfaces/cocoa/cocoawsspin.pas
View File

@ -45,7 +45,7 @@ implementation
procedure UpdateControlLCLToCocoa(src: TCustomFloatSpinEdit; dst: TCocoaSpinEdit); procedure UpdateControlLCLToCocoa(src: TCustomFloatSpinEdit; dst: TCocoaSpinEdit);
begin begin
dst.UpdateControl(src.MinValue, src.MaxValue, src.Increment, src.Value, src.DecimalPlaces); dst.UpdateControl(src.MinValue, src.MaxValue, src.Increment, src.Value, src.DecimalPlaces, src.MinValue <> src.MaxValue);
end; end;
{ TCocoaWSCustomFloatSpinEdit } { TCocoaWSCustomFloatSpinEdit }