Page 1 of 1

Ternary Series Assigning a Color

Posted: Fri Jul 30, 2021 9:21 pm
by 16489275
How do you assign a single color per series on a ternary plot? Do I need to set it programmatically, or can I sent it to choose colors in the editor.

My code now looks like this

Code: Select all

  NameOld := NameNew;
  TriPlotSeries := TTernarySeries.Create(Self);
  TriPlotSeries.ParentChart := ChartTriPlot;
  TriPlotSeries.Title := NameNew;
  TriPlotSeries.pointer.Style := psDonut;
  TriPlotSeries.pointer.Size := 10;
  TriPlotSeries.Pointer.Visible := True;
  TriPlotSeries.VertexTitles[0].Text := cxLookupComboBoxTriAnal1.EditText;
  TriPlotSeries.VertexTitles[1].Text := cxLookupComboBoxTriAnal2.EditText;
  TriPlotSeries.VertexTitles[2].Text := cxLookupComboBoxTriAnal3.EditText;

Re: Ternary Series Assigning a Color

Posted: Mon Aug 02, 2021 11:31 am
by yeray
Hello,

Creating 3 ternary series, each one using it's own color, by code:

Code: Select all

uses TeeTernary;

procedure TForm1.FormCreate(Sender: TObject);
var i: Integer;
begin
  Chart1.Walls.Back.Hide;

  for i:=0 to 2 do
    with TTernarySeries(Chart1.AddSeries(TTernarySeries)) do
    begin
      FillSampleValues;
      ColorEachPoint:=False;
      UseColorRange:=False;
      UsePalette:=False;
    end;
end;
Creating 3 ternary series, each one using it's own color, at design-time.
- Disable the Back wall visibility:
bds_2021-08-02_13-27-46.png
bds_2021-08-02_13-27-46.png (14.26 KiB) Viewed 5853 times
- Disable ColorEach for all the 3 Ternary series:
bds_2021-08-02_13-27-55.png
bds_2021-08-02_13-27-55.png (15.28 KiB) Viewed 5853 times
Here is what I get:
Project1_2021-08-02_13-30-42.png
Project1_2021-08-02_13-30-42.png (18.95 KiB) Viewed 5853 times