Area Series settings

[kapibara]

Is it possible to show the Area Series without the black border around?

[wp]

Code: Pascal  [Select][+][-]

1. Chart1AreaSeries1.AreaContourPen.Style := psClear;   // outer border
2. // Maybe also
3. Chart1AreaSeries1.AreaLinesPen.Style := psClear;  // vertical drop lines
4.  

[kapibara]

Thanks for tip. But did you try it? The contour border stays black and same thickness even after changing settings. Removing ChartStyles helped.

I'm on both fpc trunk and laz trunk now.

[wp]

You did not say that you had a multi-valued series requiring Styles. In this case, the Styles take over the formatting of each sub-series. You must set the Pen.Style of each style item to psClear. This leaves you with the dropdown lines which are not controlled by the Styles, but you can simply set the AreaSeries.AreaLinePen.Style to psClear which handles all sub-series.

[kapibara]

Project is the area series demo from lazarus trunk. (forgot to say) But with Styles enabled, the black outline border doesnt go away whatever setting i try. Only removing Styles does the trick.

Attached a demo,  I dont think i missed anything. Just make sure Styles is selected

[paweld]

Change UpdateStyles procedure in frmGeneral unit to:

Code: Pascal  [Select][+][-]

1. procedure TGeneralFrame.UpdateStyles(Count: Integer);
2. const
3.   COLORS: array[0..4] of TColor = (clRed, clBlue, clYellow, clGreen, clFuchsia);
4. var
5.   i: Integer;
6. begin
7.   ChartStyles.Styles.Clear;
8.   for i := 1 to Count do
9.     with ChartStyles.Add do begin
10.       Brush.Color := COLORS[i-1];
11.       Pen.Width := 3;
12.       Pen.Style := psClear;
13.       Text := 'Curve ' + IntToStr(i);
14.     end;
15. end;

[kapibara]

That works! Thanks.