You've already forked lazarus-ccr
tvplanit: Minor cleanup. Fix repo consistency for images.
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8464 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
Binary file not shown.
Before Width: | Height: | Size: 1.1 KiB |
Binary file not shown.
Before Width: | Height: | Size: 1.9 KiB |
Binary file not shown.
Before Width: | Height: | Size: 3.1 KiB |
Binary file not shown.
@ -463,7 +463,6 @@ var
|
|||||||
EAIndex: Integer; // Index of last-used item in wvEventArray
|
EAIndex: Integer; // Index of last-used item in wvEventArray
|
||||||
I: Integer;
|
I: Integer;
|
||||||
realCenter: Integer;
|
realCenter: Integer;
|
||||||
delta: Integer;
|
|
||||||
begin
|
begin
|
||||||
with TVpWeekViewOpener(FWeekView) do begin
|
with TVpWeekViewOpener(FWeekView) do begin
|
||||||
// Initialize weekday array
|
// Initialize weekday array
|
||||||
@ -480,8 +479,6 @@ begin
|
|||||||
wvEventArray[I].Rec.BottomRight := Point(-1, -1);
|
wvEventArray[I].Rec.BottomRight := Point(-1, -1);
|
||||||
wvEventArray[I].Event := nil;
|
wvEventArray[I].Event := nil;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
if DrawingStyle = ds3D then delta := 1 else delta := 0;
|
|
||||||
end;
|
end;
|
||||||
|
|
||||||
RenderCanvas.Pen.Color := RealLineColor;
|
RenderCanvas.Pen.Color := RealLineColor;
|
||||||
|
Reference in New Issue
Block a user