Mark tips Style

[IQSoft]

Is there a way to display in mark tips Series name and X.Y values??????
Thanks
Alex

[Yeray]

Hi Alex,

Yes, with OnGetMarkText event, from your series, you can customize its mark text as you want:

Code: Select all

procedure TForm1.FormCreate(Sender: TObject);
begin
  Series1.Marks.Visible := True;
end;

procedure TForm1.Series1GetMarkText(Sender: TChartSeries;
  ValueIndex: Integer; var MarkText: String);
begin
    MarkText := Sender.Name + '   X: ' + floattostr(Sender.XValues.Items[ValueIndex]) +
              '   Y: ' + floattostr(Sender.YValues.Items[ValueIndex]);
end;

[IQSoft]

If i undestand well you mean you can customize the text of the marks on the chart.....
I want to use the MArk Tips Tools and display Name , X,Y value....
Is it possible

[Narcís]

Hi IQSoft,

Yes, the MarkTips tool display marks text even if it's customized.

[IQSoft]

it can be customized the same way?????
Alex

[IQSoft]

I can be customized by code or by the user ( editing the diagram???)

[Narcís]

Hi Alex,

It can be customized programmatically using the OnGetText event.

[IQSoft]

Can i have a small sample of customizing text?????
Thanks
Alex

[Narcís]

Hi Alex,

You just need to add a TMarksTipTool to your application and make series marks not visible. The code Yeray posted will modify tool's text as well, for example:

Code: Select all

procedure TForm1.FormCreate(Sender: TObject);
begin
  Series1.Marks.Visible := False;
end;

procedure TForm1.Series1GetMarkText(Sender: TChartSeries;
  ValueIndex: Integer; var MarkText: String);
begin
  MarkText := Sender.Name + ' X: ' + FloatToStr(Sender.XValues.Items[ValueIndex]) +
              ' Y: ' + FloatToStr(Sender.YValues.Items[ValueIndex]);
end;