Solved

Find the x for y in chart

Posted on 2006-07-05
5
224 Views
Last Modified: 2011-09-20
Hi.

If i know the y value how can i find the x value and vice versa?

Example for (Chart1.SeriesList.Series[0].MaxYValue) how can i find the x ?
0
Comment
Question by:CodedK
  • 3
  • 2
5 Comments
 
LVL 26

Expert Comment

by:Russell Libby
ID: 17044411

The MaxYValue property returns the largest Y value in the chart series, it does not return you the index of the data point (which would be needed in order to get the corresponding X value). You could walk the series YValues[index] until you found the yvalue that = MaxYValue, which would then give you the index, but if there are 2 data points where the YValue = MaxYValue, then you would not be able to determine what data point you needed to get. Eg, given the 6 sample data points in the format of index = (x, y)

0 = (1, 5)
1 = (2, 7)
2 = (10, 20)
3 = (11, 14)
4 = (15, 12)
5 = (8, 20)

The series MaxYValue would return 20. But because there are 2 data points with Y=20, you would be unable to determine if the corresponding X value was supposed to be 10 or 8. So, only if EVERY y value and EVERY x value is unique, will you be able to do what you are asking.

Russell

0
 
LVL 16

Author Comment

by:CodedK
ID: 17044463
Thank you Russell.

But how can find the x. Given that y is unique.
Can you tell me the commands?
0
 
LVL 26

Accepted Solution

by:
Russell Libby earned 125 total points
ID: 17044604
Assuming that the x values and y values are unique, the following functions could be used against a given chart series.

Russell

---

function FindXForY(YValue: Double; Series: TChartSeries): Double;
var  dwIndex:       Integer;
begin

  // Set default result
  result:=0;

  // Find the index of the y value
  for dwIndex:=0 to Pred(Series.YValues.Count) do
  begin
     if (Series.YValue[dwIndex] = YValue) then
     begin
        // Return the x value
        result:=Series.XValue[dwIndex];
        // Done
        break;
     end;
  end;

end;

function FindYForX(XValue: Double; Series: TChartSeries): Double;
var  dwIndex:       Integer;
begin

  // Set default result
  result:=0;

  // Find the index of the y value
  for dwIndex:=0 to Pred(Series.XValues.Count) do
  begin
     if (Series.XValue[dwIndex] = XValue) then
     begin
        // Return the y value
        result:=Series.YValue[dwIndex];
        // Done
        break;
     end;
  end;

end;

0
 
LVL 16

Author Comment

by:CodedK
ID: 17044749
Thank you very much Russell :)
0
 
LVL 26

Expert Comment

by:Russell Libby
ID: 17045244
No problem,
Russell
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

Suggested Solutions

Title # Comments Views Activity
Delphi selector screen 2 84
Working with hours 3 65
can't find the executable in Simulator 1 100
Is anyone willing to have a look through this code and help debug? 25 84
In this tutorial I will show you how to use the Windows Speech API in Delphi. I will only cover basic functions such as text to speech and controlling the speed of the speech. SAPI Installation First you need to install the SAPI type library, th…
Have you ever had your Delphi form/application just hanging while waiting for data to load? This is the article to read if you want to learn some things about adding threads for data loading in the background. First, I'll setup a general applica…
This video shows how to quickly and easily add an email signature for all users on Exchange 2016. The resulting signature is applied on a server level by Exchange Online. The email signature template has been downloaded from: www.mail-signatures…
This video shows how to use Hyena, from SystemTools Software, to bulk import 100 user accounts from an external text file. View in 1080p for best video quality.

861 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