How do I do a color coded grid?

[ChrisD]

I wish to do a Risk Matrix grid, this is a 5 by 5 grid, in which each of the squares is color code. Then I will put bubbles, arrow or point on top.

How do I do the basic color coded grid?

[Yeray]

Hi ChrisD,

You could start with something like this:

Code: Select all

uses TeeSurfa;

procedure TForm1.FormCreate(Sender: TObject);
var Series1: TColorGridSeries;
i, j: integer;
begin
  Series1 := TColorGridSeries.Create(Chart1);
  Series1.ParentChart := Chart1;

  Chart1.View3D := false;

  Series1.StartColor := clRed;
  Series1.MidColor := clYellow;
  Series1.EndColor := clGreen;

  for i:= 0 to 4 do
    for j:= 0 to 4 do
      Series1.AddXYZ(i,i+j,j)
end;

I hope it helps.