Ive got a problem with the AddText of the TextCollection in VCL. FAQ for phGantTimePackage from PlexityHide.

phGantTimePackage FAQ 10854

Ive got a problem with the AddText of the TextCollection in VCL. Please note that this article refers to the phGantTimePackage

Question

I've got a problem with the 'AddText' of the 'TextCollection'.

For exemple after an 'AddText' method when i test the 'TextCollection.Count' it's said 0.
I don't know how to change the text of my 'TphDataEntity_GantTime' after i create it.

Answer

The code below adds a text to a time item, and then changes it...

procedure TForm1.Button4Click(Sender: TObject);
begin
if Assigned(phGant1.ActiveDataEntity) then
begin
    phGant1.ActiveDataEntity.TextCollection.AddText('Hello',0,0);
    ShowMessage(IntToStr(phGant1.ActiveDataEntity.TextCollection.Count));
    phGant1.ActiveDataEntity.TextCollection.Text[0].Text:=phGant1.ActiveDataEntity.TextCollection.Text[0].Text+'+';
end;
end;