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

TvPlanIt: Less hints and warnings

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8132 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2021-10-27 18:12:33 +00:00
parent 4e7896f9a4
commit 03dcab679a
24 changed files with 84 additions and 57 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
components/tvplanit/source/vpcalendar.pas
View File

@@ -26,10 +26,13 @@
{* *}
{* ***** END LICENSE BLOCK ***** *}
{$I vp.inc}
unit VpCalendar; { Calendar component }
unit VpCalendar;
{-Calendar component}
{$IF FPC_FullVersion >= 30200}
{$WARN 6058 off : Call to subroutine "$1" marked as inline is not inlined}
{$IFEND}
{$I vp.inc}
interface
@@ -173,7 +176,7 @@ type
function GetDay: Integer;
function GetMonth: Integer;
function GetYear: Integer;
procedure SetBorderStyle(Value: TBorderStyle);
procedure SetBorderStyle(Value: TBorderStyle); reintroduce;
procedure SetDate(Value: TDateTime);
procedure SetDateFormat(Value: TVpDateFormat);
procedure SetDayNameWidth(Value: TVpDayNameWidth);