Page 1 of 1

[TCursorTool] Invisible when superimposed

Posted: Fri Nov 24, 2006 10:54 am
by 9343260
Hello,

I'm using 2 CursorTool on my chart. My problem is that sometimes the 2 cursors must be at the same position. But if the 2 cursors are superimposed, they are not visible anymore. Is there a way to avoid this problem ?

Posted: Fri Nov 24, 2006 11:05 am
by narcis
Hi bertrod,

I'm afraid this is a bug, I've added it (TV52011928) to our defect list to be fixed for future releases.

In the meantime, you can try changing tool's pen width when they overlap, for example:

Code: Select all

procedure TForm1.ChartTool1Change(Sender: TCursorTool; x, y: Integer;
  const XValue, YValue: Double; Series: TChartSeries; ValueIndex: Integer);
begin
  if ChartTool1.XValue=ChartTool2.XValue then
    ChartTool1.Pen.Width:=2
  else
    ChartTool1.Pen.Width:=1
end;

procedure TForm1.ChartTool2Change(Sender: TCursorTool; x, y: Integer;
  const XValue, YValue: Double; Series: TChartSeries; ValueIndex: Integer);
begin
  if ChartTool1.XValue=ChartTool2.XValue then
    ChartTool2.Pen.Width:=2
  else
    ChartTool2.Pen.Width:=1
end;

Posted: Mon Nov 27, 2006 3:44 pm
by 9343260
Ok thanks, I could deal with my problem with your suggestion.