Solved

show points in Chart

Posted on 2003-11-23
5
428 Views
Last Modified: 2010-04-05
Hi again =p

anyone knows how to mark the points in the chart (I dont want mark that show the value.... I only want for example put dot or * on each point) because the mark that show the value will make my chart cramp

thank yahhh ^^
0
Comment
Question by:allie910
  • 3
5 Comments
 
LVL 2

Expert Comment

by:odissey1
ID: 9814533
Hi allie910,

Open ChartEditor (DblClick TChart). In ChartEditor -> Series-> Point -> Visible

Reards,
odissey1
0
 

Expert Comment

by:saienlyh
ID: 9816952
procedure Form1.DbcharAfterDraw(Sender: TObject);
begin
var
  t,x,y:Integer ;
begin
  with dbc_waterchar,Canvas do
  begin
    Canvas.Pen.Color:=clYellow;
    Canvas.Pen.Width := 1;
    for t := 0 to SeriesList[0].Count - 1 do
    begin
      x:=SeriesList[0].CalcXPos(t);
      y:=SeriesList[0].CalcYPos(t);
      Ellipse(x-3,y-3,x+3,y+3);
    end;
  end;
end;
0
 
LVL 2

Accepted Solution

by:
odissey1 earned 30 total points
ID: 9819005
Hi allie910,

this is the way to modify pointers while drawing. In the example Each other pointer will be drawn as triangle. Use Series1.OnGetSeriePointer event:

function TForm1.Series1GetPointerStyle(Sender: TChartSeries;
  ValueIndex: Integer): TSeriesPointerStyle;
var x, y: integer;
    P: TSeriesPointerStyle;
begin
 if ValueIndex mod 2=0 then
   result:=psNothing //psRectangle
 else
   result:=psTriangle;

end;

procedure TForm1.FormCreate(Sender: TObject);
begin
     Series1.FillSampleValues(10);
     Series1.Pointer.Visible:=True;
     Series1.OnGetPointerStyle:=Series1GetPointerStyle;
end;

Regards,
odissey1
0
 

Expert Comment

by:pipinana2002
ID: 9822221
Hi Odissey1,

I tried to try your last suggestion... (directly from the TChart--> the Dblclick TChart....)
I Can't find the 'point' option..... instead I found mark... and in the 'Style' option I can't find anything like triangle, rectangular or dot.... the available style there are value, percent, label, labe and percent, label and value.... and so on...

and my delphi doesn't recognize Series1.OnGetPointerStyle the closest thing that I can found maybe OnGetMarkText...

can you help..? =) thankkksssss ^^
0
 
LVL 2

Expert Comment

by:odissey1
ID: 9822960
To pipinana2002:

When you add Series, choose LineSeries with Pointers (squares). Can you see 'Points' tab in 'Series' (just before 'Marks')?  If no - then I suppose you have TeeChart Standard v.4 (that comes preinstalled in Delphi6/7). I am not sure what is in it, since my TC Pro completely removed TC Standard from HDD.

If charts is a substantial part of your project you can install TC Trial version
http://www.steema.com/download/TeeChart_v6/index.htm
It's free, does everything, time-unlimited and works while IDE). In many cases this is more then enough. At least try to look at the demo:
http://www.teechart.net/files/vcl/public/TeeChartPro6/tee6new.zip
with a lot of examples and corresponding source code.
 
regards,
odissey1
0

Featured Post

Networking for the Cloud Era

Join Microsoft and Riverbed for a discussion and demonstration of enhancements to SteelConnect:
-One-click orchestration and cloud connectivity in Azure environments
-Tight integration of SD-WAN and WAN optimization capabilities
-Scalability and resiliency equal to a data center

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

This article explains how to create forms/units independent of other forms/units object names in a delphi project. Have you ever created a form for user input in a Delphi project and then had the need to have that same form in a other Delphi proj…
In my programming career I have only very rarely run into situations where operator overloading would be of any use in my work.  Normally those situations involved math with either overly large numbers (hundreds of thousands of digits or accuracy re…
With Secure Portal Encryption, the recipient is sent a link to their email address directing them to the email laundry delivery page. From there, the recipient will be required to enter a user name and password to enter the page. Once the recipient …
The Email Laundry PDF encryption service allows companies to send confidential encrypted  emails to anybody. The PDF document can also contain attachments that are embedded in the encrypted PDF. The password is randomly generated by The Email Laundr…

820 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question