TGantt Series

[Friis]

Hi,

Is it possible to add text "inside" a Gantt figure similar to the figure I have attached?

[Yeray]

Hi,

Yes, you can simply make the marks visible and transparent:

Code: Select all

procedure TForm1.FormCreate(Sender: TObject);
begin
  Chart1.View3D:=false;

  with Chart1.AddSeries(TGanttSeries) as TGanttSeries do
  begin
    FillSampleValues(5);
    Pointer.Size:=10;

    Marks.Visible:=true;
    Marks.Transparent:=true;
    Marks.Font.Color:=clWhite;
  end;
end;