统计控件，一个月份统计控件

int[] xValue = new int[dt.Rows.Count]; int[] yValue = new int[dt.Rows.Count]; int i = 0 ; foreach(DataRow dr in dt.Rows) { xValue[i] = Convert.ToInt32(dr["x"].ToString()); yValue[i] = Convert.ToInt32(dr["y"].ToString()); i++; } line1 = new Steema.TeeChart.Styles.Line(); line1.Add(xValue,yValue); WebChart1.Chart.Series.Add(line1); ///////////////////////////////////////////////// From: Narcís Calvet Steema Software Subject: Re: Databound Series & Windows Mobile 5. Date: Fri, 26 May 2006 13:31:40 +0200 Newsgroup: steema.public.teechart7.dotnet Hi Ted, In TeeChart.Pocket.dll, DataSource property is only for functions, to use datasources with Pocket PC applications you can do something like this: using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace PocketDataSource { public partial class Form1 : Form { private Steema.TeeChart.Pocket.TChart tChart1; private Steema.TeeChart.Styles.Line line1; private DataTable dt1; private DataRow dr1; public Form1() { InitializeComponent(); tChart1 = new Steema.TeeChart.Pocket.TChart(); line1 = new Steema.TeeChart.Styles.Line(); tChart1.Location = new System.Drawing.Point(8, 64); tChart1.Series.Add(this.line1); tChart1.Size = new System.Drawing.Size(224, 168); Controls.Add(this.tChart1); tChart1.Panel.Color = Color.Wheat; tChart1.Header.Text = "TeeChart for SmartDevice"; //line1.FillSampleValues(); dt1 = new DataTable(); dt1.Columns.Add(new DataColumn("XValues", System.Type.GetType("System.Double"))); dt1.Columns.Add(new DataColumn("YValues", System.Type.GetType("System.Double"))); dt1.Columns.Add(new DataColumn("Labels", System.Type.GetType("System.String"))); Random rnd1 = new Random(); for (int i = 0; i < 10; ++i) { dr1 = dt1.NewRow(); dr1["XValues"] = i; dr1["YValues"] = rnd1.Next(100); dr1["Labels"] = "Point " + i.ToString(); dt1.Rows.Add(dr1); } foreach (DataRow Val in dt1.Rows) { line1.Add((double)Val["XValues"], (double)Val["YValues"], (string)Val["Labels"]); } } } } -- Best Regards, Narcís Calvet Steema Support Central http://support.steema.com "Important note: If you are a TeeChart registered customer, please post your support questions at Steema's Support monitored Forums for customers: http://support.steema.com for a prompter reply." Ted Malone wrote: > Hi; > > I am currently evaluating TChart as a control that we'll use in both > Winform and Mobile applications. My charting needs are very simple, > but I want to be able to reuse the code as much as possible. I've > created a Winform chart that consumes a Web Service and plots data > appropriately (very nicely, I might add) in a line chart with 2 > series... > However, the same code on the Mobile device never plots, even though > the data is identical... > > Unfortunately I've found the samples for Mobile not too helpful when > using data binding.. > > Any thoughts? (Code snippet below, maybe I'm just doing something > stupid) > Thanks. > > Ted Malone > > Steema.TeeChart.Axis axis1 = tChart1.Axes.Bottom; > > axis1.Automatic = true; > > Steema.TeeChart.Axis axis2 = tChart1.Axes.Left; > > axis2.Automatic = false; > > axis2.Maximum = 100; > > axis2.Minimum = 0; > > axis2.Increment = 10; > > > DataView dv = new > DataView(cSICompliance.dsCompliance.Tables["ComplianceTrend"]); > > DataView dv2 = new > DataView(cSICompliance.dsCompliance.Tables["ComplianceTrend"]); > > dv.RowFilter = "Template_Name = 'Antivirus Operations'"; > > dv2.RowFilter = "Template_Name = 'Best Practices - Exchange'"; > > line1.YValues.DataMember = > dv.Table.Columns["PctCompliant"].ToString(); > line1.LabelMember = dv.Table.Columns["DateTimeString"].ToString(); > > line1.DataSource = dv; > > line2.YValues.DataMember = > dv2.Table.Columns["PctCompliant"].ToString(); > line2.LabelMember = dv2.Table.Columns["DateTimeString"].ToString(); > > line2.DataSource = dv2; ////////////////////////////////////////////////// WebChart wc=new WebChart(); wc.Visible=true; Steema.TeeChart.Chart ch2=wc.Chart; MemoryStream tmpChart2=new MemoryStream(); ch2.Header.Text="总分对比"; ch2.Header.Font.Bold=false; ch2.Header.Font.Color=Color.Red; ch2.Header.Font.Size=10; //控制面板的背景色 ch2.Panel.Brush.Gradient.EndColor = System.Drawing.Color.FromArgb(0xFF,0xEE,0xF2); ch2.Panel.Brush.Gradient.StartColor = System.Drawing.Color.FromArgb(0xFE,0xCB,0xD7); ch2.Panel.Brush.Gradient.Visible = true; ch2.Aspect.View3D = false; //外观 ch2.Aspect.Elevation = 315; ch2.Aspect.Orthogonal = false; ch2.Aspect.Perspective = 0; ch2.Aspect.Rotation = 360; ch2.Invalidate(); //设置线条 Line AnalyLine2=new Line(); AnalyLine2.OutLine.Color = System.Drawing.Color.FromArgb(((System.Byte)(255)), ((System.Byte)(255)), ((System.Byte)(0))); AnalyLine2.ColorEachLine=false; AnalyLine2.OutLine.Visible = true; AnalyLine2.Pointer.Visible = true; AnalyLine2.ColorEach=false; AnalyLine2.Brush.Color = System.Drawing.Color.Green; for(int x=0;x<4;x++) { AnalyLine2.Add(x,"第"+Convert.ToString(x+1)+"次"); } ch2.Series.Add(AnalyLine2); ch2.Width=300; ch2.Height=160; ch2.Export.Image.PNG.Save(Server.MapPath(ComFunction.StatImgPath+"ScoreAnalyse"+j.ToString()+".png")); tr=new TableRow(); TableCell tc=new TableCell(); tc.HorizontalAlign=HorizontalAlign.Center; tc.Text="<img src=\""+ComFunction.StatImgPath+"ScoreAnalyse"+j.ToString()+".png\" border=0 width=300 height=160>"; tr.Cells.Add(tc); tbStatImg.Rows.Add(tr); ///////////////////////////////////////////////////////////// i don't want to display the tChart. all i need to do is create an image file using tChart. when i run the application a get this error: "System.Runtime.InteropServices.COMException: Catastrophic failure" this web application is on a server and the tCharts are formated using the aspx.vb code behind pages. Dim MyTable As New Data.DataTable("MyTable") Dim ColValue As New Data.DataColumn("Value", Type.GetType("System.Int32")) Dim ColDateTime As New Data.DataColumn("DateTime", Type.GetType("System.DateTime")) MyTable.Columns.Add(ColValue) MyTable.Columns.Add(ColDateTime) Dim myChartRow As DataRow Dim myChartAddRow As DataRow For Each myChartRow In dstChartInfo.Tables("ChartInfo").Rows myChartAddRow = MyTable.NewRow() myChartAddRow("Value") = myChartRow("Value") myChartAddRow("DateTime") = myChartRow("DateTime") MyTable.Rows.Add(myChartAddRow) Next Dim FirstView As New Data.DataView(MyTable) Dim tChart1 As New TChart() tChart1.AddSeries(ESeriesClass.scLine) With tChart1.Series(0) .YValues.ValueSource = "Value" .XValues.ValueSource = "DateTime" .XValues.DateTime = True .DataSource = FirstView .CheckDataSource() .VerticalAxis = EVerticalAxis.aLeftAxis .Color = Convert.ToUInt32(System.Drawing.Color.Blue) End With With tChart1.Axis.Bottom .Labels.DateTimeFormat = "dd/MM/yyyy HH:mm:ss" .Labels.Multiline = True .MinorTickLength = 2 .MinorTicks.Visible = True .MinorTickCount = 4 .TickLength = 8 .Ticks.Visible = True End With With tChart1.Axis.Left .GridPen.Color = Convert.ToUInt32(System.Drawing.Color.LightGray) .GridCentered = True .MinorTickLength = 2 .MinorTicks.Visible = True .TickLength = 8 .Ticks.Visible = True End With With tChart1.Axis.Right .GridPen.Color = Convert.ToUInt32(System.Drawing.Color.White) .MinorTickLength = 2 .MinorTicks.Visible = True .TickLength = 8 .Ticks.Visible = True End With With tChart1.Header .Visible =