Hi Tom, What about doing something as I suggested here in TCursorTool's OnChange event? OnChange's ValueIndex parameter only has valid values when the cursor is set to snap. Yeah I used this code below for the on change event in the cursor: curpos: Integer; curpos := Chart1.Series[seriesidx].XValue...

I need to get the index of the position of a cursor at an unknown x or y value. I can get the rest and I seen a GetCursorValueIndex function with the Series Heirarchy and tried it but it didnt return what I needed.

Any ideas?


Thanks,

Tom

Narcis,

Works as expected. The only thing is the numbers are somewhat long, even 1000ths of a place after the decimal. Trying to locate a number has to be exact, as far as I can tell.

Any ideas on how to locate the approximate number rather than the exact?


Thanks.

Tom

Ok, this should be neat. I basically want to move my cursor to the point with which an entry of a number in a cell has occurred. I have all the events in place. Do I set the YValue of the cursor to move or the XValue? Id assume the XValue but how do I calculate the position. And of course the value ...

9242408 wrote:Thanks, that will work. Is it possible to capture what chart tool is clicked before doing this so I can move the one the user wants moved?


Thanks,

Tom

I got it. Just make MyCursorTool: TCursorTool and then on the change event assign MyCursorTool to whatever one it is.


Works nice.


Tom

Thanks, that will work. Is it possible to capture what chart tool is clicked before doing this so I can move the one the user wants moved?


Thanks,

Tom

I have 2 cursors in my chart.

How can I use the left and right arrow keys to move the cursor selected?

I seen the demo doing it programmically, but I would like to do it with the keyboard.


Thanks,

Tom

The ChartListbox comes in handy, however there seems to be no way to see what item is checked or not, is this true or some obscure way I am not seeing?

I need to be able to iterate through the thing to see whats checked, not currently selected.


Any ideas?


Thanks,

Tom

Narcis,

I tried modifying the code a bit to set the color if white to black but it ends up turning all the series colors to black.


Any ideas?


Thanks,

Tom

I seem to be having some trouble changing the color of a series in code. I am dynamically setting up series and just do a color scheme like this: chart1.Series[mycol].Color := GetDefaultColor(mycol); if chart1.Series[mycol].Color = 16777215 then chart1.Series[mycol].Color := 0; However if the color ...

Thats ok, I got it working nice and smooth.


Thanks,

Tom

Is there a possible way to execute the OnChange event of the TCursor Tool from else where in my code?

I am updating labels showing the output this change and as doing the updat would like that event to execute WITHOUT actually moving a cursor.

Is this possible?


Thanks,


Tom

You need to set the width/height of your charts then. Say if you have 3 charts that need to fit on the panel then loop each chart and change its height/width to match the total height/width of the panel. divide 3 by the width of the panel and that should give you the width for each chart, same with ...

Hi Tom, Thank you for the answer at my first question. Now, I still need an answer at my question 2: Question 2. In the metafile example provided by Josep Lluis Jorge (see the posts above), if I print it on paper, how could I diminish the extra space around the charts, in order to maximize the info...

Question 1. Could you tell me if you have an example of how could I create a metafile for each Chart and panit it on the Printer Canvas? Here's an example that I use to do just this: procedure TForm1.AdvToolBarButton14Click(Sender: TObject); Var m: TMetafile; c: TMetafileCanvas; topc,botc: Integer;...