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

2
components/tvplanit/source/vpdayviewpainter.pas
View File

@ -154,7 +154,7 @@ function TVpDayViewPainter.CountOverlappingEvents(Event: TVpEvent;
var
K, SelfLevel: Integer;
Tmp: TVpEvent;
Levels: array of Integer;
Levels: array of Integer = nil;
begin
{ initialize the levels array }
SetLength(Levels, MaxEventDepth);