pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

jvcllaz: Less hints and warnings.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@7901 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2020-11-23 14:28:05 +00:00
parent 0fc7589a41
commit bc37254519
9 changed files with 18 additions and 19 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
components/jvcllaz/run/JvWizard/jvwizardroutemaplist.pas
View File

@ -107,14 +107,14 @@ type
{ High-DPI }
procedure DoAutoAdjustLayout(const AMode: TLayoutAdjustmentPolicy;
const AXProportion, AYProportion: Double); override;
public
constructor Create(AOwner: TComponent); override;
destructor Destroy; override;
{$IF LCL_FullVersion >= 1080100}
procedure ScaleFontsPPI(const AToPPI: Integer; const AProportion: Double); override;
{$ELSEIF LCL_FullVersion >= 1080000}
procedure ScaleFontsPPI(const AProportion: Double); override;
{$ENDIF}
public
constructor Create(AOwner: TComponent); override;
destructor Destroy; override;
published
property ActiveFont: TFont read FActiveFont write SetActiveFont;
property ActiveFontOptions: TJvTrackFontOptions read FActiveFontOptions write SetActiveFontOptions default