Zooming with mouse: marquee color

When I use zooming with mouse on a chart (TeeChart) (left button and drag bottom right) cursor draws a marquee rectangle for zoom area. Marquee line is barely visible in light-grey color. Is there any way to change the color of marquee line (something like black, red etc) to make it more contrast and easy to see?

I'm using VCL TChart 4.04.


I think this is not possible in TChart v.4.04, or at least haven't found any property which might do this.

At least in TChart v.8.03 (the one shipped with Delphi 2009) there are properties TChart.Zoom.Brush and TChart.Zoom.Pen where you can set the colors and other properties for the selection rectangle. So, if you would have the newer version of TChart you might use something like this:

procedure TForm1.FormCreate(Sender: TObject);
  Chart1.Zoom.Pen.Width := 2;
  Chart1.Zoom.Pen.Color := clRed;

Need Your Help

Add a newline only if it doesn't exist

linux bash sed newline

I want to add a newline at the end of a file only if it doesn't exists, this is to prevent multiple newlines at the end of the file.