Page 1 of 1

DrawLineTool - Pen with no effect

Posted: Mon Nov 09, 2009 2:20 pm
by 10549532
Put a chart, series1 and a DrawLineTool on the screen and connect the DrawLineTool with the series1.

Now you are able to draw a line with the mouse on the screen.

The line is black and has a width of 1

I found no way to change the color of the "PEN" and his width.

I can change the Pen parameters in the Edit - no effect, I can change the Pen parameters at runtime - no effect, I also tryed to put a
ButtonPen1.LinkPen(ChartTool1.Pen);
in the Code, but also no effect.

I use Delphi 2005 and have the lastest Version of TeeChart Pro v8.06

In your DemoTool "Tee Chart Pro 8" -> "All features" -> "Draw Line" - it works. I look at your source code but not found a reason.

Any idea?

Re: DrawLineTool - Pen with no effect

Posted: Thu Nov 12, 2009 9:54 am
by yeray
Hi Carl,

Yes, it seems that having a DrawLineTool in Delphi 2005 its pen.width can't be greater than 1. If you set it to, for example 3, the colorline pen goes to black and the width is still 1.
I've added it to the wish list to be fixed in future releases (TV52014558).

Re: DrawLineTool - Pen with no effect

Posted: Tue Aug 17, 2010 11:47 am
by 10549532
Today I installed the Version 8.07 of TeeChart VCL - Delphi 2005. Unfortunaty, the Bug is not fixed. I can not change the size, type or color of the pen in the drawLine. I need this function so urgent. Is it possible to give me a bugfix? My customers waiting for a solution. Thank you.

Please change the Version of the VCL in your homepage. There still standing 8.06 (September). Only if you go to download, you will find the 8.07 Version.

Re: DrawLineTool - Pen with no effect

Posted: Wed Aug 18, 2010 6:12 pm
by yeray
Hi Carl,

I'm afraid that the bug ticked isn't closed, but when I wanted to test it with the latest TeeChart sources to see if changing other things in the component this problem has been solved or changed, but I found a problem. I tried to reproduce the bug with Delphi 2005 and TeeChart v8.06 or 8.07 but now it seems I can't.

Could you please tell me if the following code reproduces the problem for you?

Code: Select all

uses Series, TeeTools;

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

  with TLineSeries.Create(self) do
  begin
    ParentChart:=Chart1;
    FillSampleValues();
  end;

  with Chart1.Tools.Add(TDrawLineTool) as TDrawLineTool do
  begin
    Pen.Color:=clRed;
    Pen.Width:=3;
  end;
end; 
Here I've ran this code in two different machines (a WinXp and a Win7) and the lines I draw are always Red and wide.
If with the code above, the lines you draw are Black and thin, could you please tell us what exact Delphi 2005 version are you using? Here it is Borland Developer Studio Architect 9.0.1935.22056 Update 3
It would be also helpful to know the Windows version you are using.

Re: DrawLineTool - Pen with no effect

Posted: Fri Sep 10, 2010 4:13 pm
by 10549532
With your source-code, the line is still black and width = 1.

I use
Delphi 2005 - Borland Developer Studio 9.0.1761.24408
Windows XP Professional, Version 2002, (Build 2006: Service Pack 3)

Thank you

Re: DrawLineTool - Pen with no effect

Posted: Tue Sep 14, 2010 10:14 am
by yeray
Hi Carl,

The only difference I see between our systems is the updates in the IDE.
Could you please try applying the updates, if possible?