paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-14 10:59:14 +02:00
Code Issues Packages Projects Releases Wiki Activity

SynEdit: fix ppi sizing for fold gutter

Browse Source 
git-svn-id: trunk@58496 -
This commit is contained in:
martin 2018-07-12 08:55:36 +00:00
parent 940d696a66
commit 3af5473c5e
1 changed files with 0 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
components/synedit/synguttercodefolding.pp
View File

@ -105,7 +105,6 @@ type
function DoHandleMouseAction(AnAction: TSynEditMouseAction; function DoHandleMouseAction(AnAction: TSynEditMouseAction;
var AnInfo: TSynEditMouseActionInfo): Boolean; override; var AnInfo: TSynEditMouseActionInfo): Boolean; override;
procedure ResetMouseActions; override; // set mouse-actions according to current Options / may clear them procedure ResetMouseActions; override; // set mouse-actions according to current Options / may clear them
procedure ScalePPI(const AScaleFactor: Double); override;
published published
property MarkupInfo; property MarkupInfo;
property MouseActionsExpanded: TSynEditMouseActions property MouseActionsExpanded: TSynEditMouseActions
@ -510,12 +509,6 @@ begin
FMouseActionsCollapsed.ResetUserActions; FMouseActionsCollapsed.ResetUserActions;
end; end;
procedure TSynGutterCodeFolding.ScalePPI(const AScaleFactor: Double);
begin
AutoSize := False;
inherited ScalePPI(AScaleFactor);
end;
procedure TSynGutterCodeFolding.DrawNodeSymbol(Canvas: TCanvas; Rect: TRect; procedure TSynGutterCodeFolding.DrawNodeSymbol(Canvas: TCanvas; Rect: TRect;
NodeType: TSynEditFoldLineCapability; SubType: TDrawNodeSymbolOptions); NodeType: TSynEditFoldLineCapability; SubType: TDrawNodeSymbolOptions);
var var