Steema Central • TGantt Series

Page 1 of 1

TGantt Series

Posted: Mon Sep 10, 2012 7:46 am

by 16462341

Hi,

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

Re: TGantt Series

Posted: Mon Sep 10, 2012 8:45 am

by 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;