void TestDataRange()
{
    WorksheetPage wksPage("Book1");
    Worksheet wks = wksPage.Layers(0);
    if( wks )
    {
        DataRange dr;
        int iXCol = 0;
        int iYCol = 1;

        dr.Add(wks, iXCol, "X", iXCol, 1, 6);
        dr.Add(wks, iYCol, "Y", iYCol, 1, 6);

        dr.Add(wks, iXCol, "X", iXCol, 10, 16);
        dr.Add(wks, iYCol, "Y", iYCol, 10, 16);

        GraphPage gp;
		gp.Create();
        GraphLayer gl = gp.Layers(0);
        if( gl.AddPlot(dr, IDM_PLOT_LINESYMB) >= 0 )
        {
            //gl.Rescale(); // magic Origin // otherwise no colors!
            const int nIndexingBegin = 100;
            int nFillColor = nIndexingBegin + 1; // column D is the 3rd Y column, Origin C index offset is 0, so add 2 here.

            gl.UngroupPlots(0);
            gl.UngroupPlots(1);

            DataPlot dp = gl.DataPlots(0);
            dp.SetColor(nFillColor, true);

            DataPlot dp2 = gl.DataPlots(1);
            dp2.SetColor(nFillColor, true);

        }
    }
}

void TestDataRange2()
{
    WorksheetPage wksPage("Book1");
    Worksheet wks = wksPage.Layers(0);
    if( wks )
    {
        DataRange dr;
        int iXCol = 0;
        int iYCol = 1;

        dr.Add(wks, iXCol, "X", iXCol, 1, 1);
        dr.Add(wks, iYCol, "Y", iYCol, 1, 1);

        dr.Add(wks, iXCol, "X", iXCol, 5, 5);
        dr.Add(wks, iYCol, "Y", iYCol, 5, 5);

        dr.Add(wks, iXCol, "X", iXCol, 2, 2);
        dr.Add(wks, iYCol, "Y", iYCol, 2, 2);
    
        GraphPage gp;
		gp.Create();
        GraphLayer gl = gp.Layers(0);
     	gl.AddPlot(dr, IDM_PLOT_LINESYMB);
    }
}

enum {
	SYSCOLOR_BLACK,	SYSCOLOR_RED,		SYSCOLOR_GREEN,		SYSCOLOR_BLUE,	SYSCOLOR_CYAN,		SYSCOLOR_MAGENTA,
	SYSCOLOR_YELLOW,SYSCOLOR_DKYELLOW,	SYSCOLOR_NAVY,		SYSCOLOR_PURPLE,SYSCOLOR_WINE,		SYSCOLOR_OLIVE,
	SYSCOLOR_DKCYAN,SYSCOLOR_ROYAL,		SYSCOLOR_ORANGE,	SYSCOLOR_VIOLET,SYSCOLOR_PINK,		SYSCOLOR_WHITE,
	SYSCOLOR_LTGRAY,SYSCOLOR_GRAY,		SYSCOLOR_LTYELLOW,	SYSCOLOR_LTCYAN,SYSCOLOR_LTMAGENTA,	SYSCOLOR_DKGRAY};

void TestDataRange2()
{
	WorksheetPage wksPage("Book1");
	Worksheet wks = wksPage.Layers(0);
	if(wks)
	{
		Dataset dsX, dsY;
		dsX.Create(3,1);
		dsY.Create(3,1);
		
		int iXCol = 0;
		int iYCol = 1;
		
		dsX[0] = wks.Cell(1, iXCol);
		dsY[0] = wks.Cell(1, iYCol);
		
		dsX[1] = wks.Cell(5, iXCol);
		dsY[1] = wks.Cell(5, iYCol);
		
		dsX[2] = wks.Cell(2, iXCol);
		dsY[2] = wks.Cell(2, iYCol);
		
		string strXRange = "[??]1!"+dsX.GetName();
		string strYRange = "[??]1!"+dsY.GetName();
			
		DataRange dr;
		dr.Add( "X", strXRange);
		dr.Add( "Y", strYRange);
		
		GraphPage gp;
		gp.Create();
		GraphLayer gl = gp.Layers( 0 );
		
		int nRet = gl.AddPlot(dr, IDM_PLOT_LINESYMB);
		gl.Rescale();
	}
}

void TestDataRange()
{
    WorksheetPage wksPage("Book1");
    Worksheet wks = wksPage.Layers(0);
    if( wks )
    {
        DataRange dr;
        int iXCol = 0;
        int iYCol = 1;

        dr.Add(wks, iXCol, "X", iXCol, 1, 6);
        dr.Add(wks, iYCol, "Y", iYCol, 1, 6);

        dr.Add(wks, iXCol, "X", iXCol, 10, 16);
        dr.Add(wks, iYCol, "Y", iYCol, 10, 16);

        GraphPage gp;
        gp.Create();
        GraphLayer gl = gp.Layers(0);
        if( gl.AddPlot(dr, IDM_PLOT_LINESYMB) >= 0 )
        {
            gl.Rescale(); // magic Origin // otherwise no colors!

            vector<int> vColors;
            vColors.SetSize(2);

            Column colC = wks.Columns(2);
            vColors = colC.GetDataObject();  // get column C to vector

            Tree trFormat;
            trFormat.Root.Increment.LineColor.nVals = vColors;
            GroupPlot gplot = gl.Groups(0);  // get first group plot
            if(0 == gplot.UpdateThemeIDs(trFormat.Root) )    
            {
                bool bb = gplot.ApplyFormat(trFormat, true, true);    // apply theme tree
            }
        }
    }
}

void TestDataRange()
{
    WorksheetPage wksPage("Book1");
    Worksheet wks = wksPage.Layers(0);
    if( wks )
    {
        DataRange dr;
        int iXCol = 0;
        int iYCol = 1;

        dr.Add(wks, iXCol, "X", iXCol, 1, 6);
        dr.Add(wks, iYCol, "Y", iYCol, 1, 6);

        dr.Add(wks, iXCol, "X", iXCol, 10, 16);
        dr.Add(wks, iYCol, "Y", iYCol, 10, 16);

        GraphPage gp;
        gp.Create();
        GraphLayer gl = gp.Layers(0);
        if( gl.AddPlot(dr, IDM_PLOT_LINESYMB) >= 0 )
        {
            gl.Rescale(); // magic Origin // otherwise no colors!

            vector<int> vColors;
            vColors.SetSize(2);

            Column colC = wks.Columns(2);
            vColors = colC.GetDataObject();

            gl.UngroupPlots(0);  // ungroup plots
            
            DataPlot dp = gl.DataPlots(0);
            dp.SetColor(vColors[0], true);
            
            DataPlot dp2 = gl.DataPlots(1);
            dp2.SetColor(vColors[1], true);
        }
    }
}

void _set_color(const vector<int>& vnPoint, const vector<int>& vnColor, DataPlot& dp)
{
	if(!dp)
		return;
	
	Tree tr;
	tr.Root.Points.Point1.Index.nVal= 0;  //add tree node
	for(int ii = 0; ii < vnPoint.GetSize() && ii < vnColor.GetSize(); ii++)
	{
		string strNode = "Point"+(ii+1);
		TreeNode trPoints = tr.Root.Points;
		TreeNode trOnePoint = trPoints.GetNode(strNode);
		if(!trOnePoint)
			trOnePoint = trPoints.AddNode(strNode);
		
		trOnePoint.Index.nVal= vnPoint[ii];
		trOnePoint.Symbol.EdgeColor.nVal = vnColor[ii];
		trOnePoint.Symbol.FillColor.nVal = vnColor[ii];
	}

	int iRet = dp.UpdateThemeIDs(tr.Root);
	if(0 == iRet)
		dp.ApplyFormat(tr, true, true);
	
	return;
}

quote:

---

Originally posted by additive

Next problem:

I want to plot several data points as line/symbol plot. When rows are not successive in the worksheets (which means some rows a omitted), the line gets lost in the plot. Graph option connecting over missing values does not help.

Is there a chance to do so?
This would be really great because otherwise I have to copy and paste the required data, thus producing a lot of redundant data.

void TestDataRange2()
{
    WorksheetPage wksPage("Book1");
    Worksheet wks = wksPage.Layers(0);
    if( wks )
    {
        DataRange dr;
        int iXCol = 0;
        int iYCol = 1;

        dr.Add(wks, iXCol, "X", iXCol, 1, 1);
        dr.Add(wks, iYCol, "Y", iYCol, 1, 1);

        dr.Add(wks, iXCol, "X", iXCol, 5, 5);
        dr.Add(wks, iYCol, "Y", iYCol, 5, 5);

        dr.Add(wks, iXCol, "X", iXCol, 2, 2);
        dr.Add(wks, iYCol, "Y", iYCol, 2, 2);
    
        GraphPage gp;
		gp.Create();
        GraphLayer gl = gp.Layers(0);
     	gl.AddPlot(dr, IDM_PLOT_LINESYMB);
    }
}

--Michael

---

quote:

---

Originally posted by additive

Hi Penn,

fantastic ... thanks a lot! Now creating graphs is much more comfortable.

I'm sorry, but now three more questions arise:

1. How can I extent the _set_color function so that I can apply individual colors also to individual line segments? (line segment color is allowed to be the same as symbol color)

2. I tried to figure it out by myself but since all this tree properties are poorly documented I only can guess. Is there any overview available?

3. Are there any limitations set by these loose, temporary datasets in comparison to worksheet attached datasets? I suppose their scope ends when deleting all correspondig graphs?

Kind regards,

Michael

---

void about_temp_dataset()
{
	Dataset dsX, dsY;
	
	// create this temporary dataset with 10 size
	dsX.Create(10); 
	dsY.Create(10);
	
	dsX.Data(1, 10 , 1);
	dsY.Data(1, 5, 0.5);
	
	/*
	// Dataset object attach to worksheet column
   // Uncomment this part and comment out the above create temp dataset codes to see the effection of the dataset attached to worksheet column.
	Worksheet wks = Project.ActiveLayer();
	if( !wks )
		return;
	dsX.Attach(wks, 0);
	dsY.Attach(wks, 1);
	*/	
	
	GraphPage gp;
	gp.Create();
	GraphLayer gl = gp.Layers(0);
	
	Curve crv(dsX.GetName(), dsY.GetName());
	int nPlot = gl.AddPlot(crv);
	DataPlot dp = gl.DataPlots(nPlot);
	if( dp )
		out_str("Plot temp dataset successfully");
	else
		out_str("Fail to plot");	
}

quote:

---

Originally posted by additive

Hi Penn,

fantastic ... thanks a lot! Now creating graphs is much more comfortable.

I'm sorry, but now three more questions arise:

1. How can I extent the _set_color function so that I can apply individual colors also to individual line segments? (line segment color is allowed to be the same as symbol color)

2. I tried to figure it out by myself but since all this tree properties are poorly documented I only can guess. Is there any overview available?

3. Are there any limitations set by these loose, temporary datasets in comparison to worksheet attached datasets? I suppose their scope ends when deleting all correspondig graphs?

Kind regards,

Michael

---

quote:

---

About "apply individual colors also to individual line segments", I guess you has multiple line segments on one graph, and want to set different color for each one, right?

---

Points
                 |--Point1
                 |   |--Symbol
                 |   |   |--Size = 8.

trOnePoint.Line.Color.nVal = vnColor[ii];

void set_specialpoints(int i1, int c1, int i2, int c2)
{
   GraphLayer gl = Project.ActiveLayer();
   DataPlot dp = gl.DataPlots(0);
   
   Tree tr;
   tr.Root.Points.Point1.Index.nVal=i1;// i1 is the index of this point, offset is 0
   tr.Root.Points.Point1.Symbol.Size.dVal=20;        // pts
   tr.Root.Points.Point1.Symbol.Type.nVal=0;        // geometric
   tr.Root.Points.Point1.Symbol.Shape.nVal=1;        // square
   tr.Root.Points.Point1.Symbol.Interior.nVal=0;    // solid
   tr.Root.Points.Point1.Symbol.EdgeColor.nVal=c1;
   
   tr.Root.Points.Point2.Index.nVal=i2;
   tr.Root.Points.Point2.Symbol.Size.dVal=20;        // pts
   tr.Root.Points.Point2.Symbol.Type.nVal=0;        // geometric
   tr.Root.Points.Point2.Symbol.Shape.nVal=1;        // square
   tr.Root.Points.Point2.Symbol.Interior.nVal=0;    // solid
   tr.Root.Points.Point2.Symbol.EdgeColor.nVal=c2;
   
   int iRet = dp.UpdateThemeIDs(tr.Root, "Error", "Unknown tag");
   bool bRet = dp.ApplyFormat(tr, true, true);     
}

quote:

---

Hope the following example help you. Run "set_specialpoints 1 2 2 5" to set properties for 2nd and 3rd points.

---

void set_lines()
{
   GraphLayer gl = Project.ActiveLayer();
   DataPlot dp = gl.DataPlots(0);
 
   Tree tr; 
   tr.Root.Line.Color.nVal = 3; // set line color to blue
   
   int iRet = dp.UpdateThemeIDs(tr.Root, "Error", "Unknown tag");
   bool bRet = dp.ApplyFormat(tr, true, true);     
}

quote:

---

Seems not support set different color for lines in one data plot for now

---

string strXRange = "[??]1!"+dsX.GetName();
string strYRange = "[??]1!"+dsY.GetName();		
DataRange dr;
dr.Add( "X", strXRange);
dr.Add( "Y", strYRange);