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

CalLite: Set version number to 0.3 (for next zipped release)

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@5379 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2016-11-23 11:59:21 +00:00
parent d805353cca
commit 4b857ef28f
2 changed files with 14 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
components/callite/callight_pkg.lpk
View File

@ -13,7 +13,7 @@
</CompilerOptions>
<Description Value="A lightweight calendar component"/>
<License Value="Modified LGL2 (with linking exception)"/>
<Version Minor="1"/>
<Version Minor="3"/>
<Files Count="1">
<Item1>
<Filename Value="source/calendarlite.pas"/>

26
components/callite/source/calendarlite.pas
View File

@ -1240,19 +1240,19 @@ constructor TCalColors.Create(AOwner: TCalendarLite);
begin
inherited Create;
FOwner := AOwner;
FColors[0] := clSilver; // ArrowBorderColor: clSilver;
FColors[1] := clSilver; // ArrowColor: clSilver;
FColors[2] := clWhite; // BackgroundColor: clWhite;
FColors[3] := clSilver; // BorderColor: clSilver;
FColors[4] := clSilver; // DaylineColor: clSilver;
FColors[5] := clRed; // HolidayColor: clRed;
FColors[6] := clSilver; // PastMonthColor: clSilver;
FColors[7] := clMoneyGreen; // SelectedDateColor: clMoneyGreen;
FColors[8] := clBlack; // TextColor: clBlack;
FColors[9] := clGray; // TodayFrameColor: clGray;
FColors[10] := clHighlight; // TopRowColor: clHighlight;
FColors[11] := clHighlightText; // TopRowTextColor: clHighlightText;
FColors[12] := clRed; // WeekendColor: clRed;
FColors[0] := clSilver; // ArrowBorderColor
FColors[1] := clSilver; // ArrowColor
FColors[2] := clWhite; // BackgroundColor
FColors[3] := clSilver; // BorderColor
FColors[4] := clSilver; // DaylineColor
FColors[5] := clRed; // HolidayColor
FColors[6] := clSilver; // PastMonthColor
FColors[7] := clMoneyGreen; // SelectedDateColor
FColors[8] := clBlack; // TextColor
FColors[9] := clGray; // TodayFrameColor
FColors[10] := clHighlight; // TopRowColor
FColors[11] := clHighlightText; // TopRowTextColor
FColors[12] := clRed; // WeekendColor
end;
function TCalColors.GetColor(AIndex: Integer): TColor;