 |
BorlandTalk.com Borland discussion newsgroups
|
| View previous topic :: View next topic |
| Author |
Message |
Don Guest
|
Posted: Mon Sep 13, 2004 8:52 am Post subject: Tchart |
|
|
Hi,
I'm currently using Edit Chart to modify the Y-Axis interval in Tchart by checking the Automatic under the scales tab. When I print the chart out using the procedure listed below, the Y-axis interval becomes smaller. Is it possible the maintain the bigger Y-axis interval? Please advice, thanks!
Procedure TFormDisplayGraph.BtnPrintGraphOnlyClick(Sender: TObject);
var
i : integer;
begin
FormGraphReport2.QRLabelTitle.Caption := FormDisplayGraph.TitleFormDisplayGraph.Caption;
//--------------------------- Report Chart ------------------------------
FormGraphReport2.QRDBChart1.Title.Text := FormDisplayGraph.Chart1.Title.Text;
//reset the Series in the reportChart
FormGraphReport2.QRDBChart1.RemoveAllSeries;
//Clone the original chart series to the report
FormGraphReport2.QRChart1.Chart.Assign(Chart1);
for i:=0 to Chart1.SeriesCount-1 do
CloneChartSeries(Chart1[i]).ParentChart:=FormGraphReport2.QRChart1.Chart;
//----------------------------- Preview Report -------------------------
FormGraphReport2.QRDBChart1.BackColor:= clWhite;
FormGraphReport2.QRDBChart1.Gradient.Visible:=false;
FormGraphReport2.QRDBChart1.BorderWidth :=50;
FormGraphReport2.QuickRep1.preview;
end;
|
|
| Back to top |
|
 |
J. Clarke Guest
|
Posted: Mon Sep 13, 2004 12:15 pm Post subject: Re: Tchart |
|
|
Don you will get a better response if you ask in
borland.public.delphi.report-charting regarding TChart.
Jeff
"Don" <donnyteo (AT) hotmail (DOT) com> wrote
| Quote: |
Hi,
I'm currently using Edit Chart to modify the Y-Axis interval in Tchart by
checking the Automatic under the scales tab. When I print the chart out |
using the procedure listed below, the Y-axis interval becomes smaller. Is it
possible the maintain the bigger Y-axis interval? Please advice, thanks!
| Quote: |
Procedure TFormDisplayGraph.BtnPrintGraphOnlyClick(Sender: TObject);
var
i : integer;
begin
FormGraphReport2.QRLabelTitle.Caption :=
FormDisplayGraph.TitleFormDisplayGraph.Caption;
//--------------------------- Report
Chart ------------------------------
FormGraphReport2.QRDBChart1.Title.Text :=
FormDisplayGraph.Chart1.Title.Text;
//reset the Series in the reportChart
FormGraphReport2.QRDBChart1.RemoveAllSeries;
//Clone the original chart series to the report
FormGraphReport2.QRChart1.Chart.Assign(Chart1);
for i:=0 to Chart1.SeriesCount-1 do
CloneChartSeries(Chart1[i]).ParentChart:=FormGraphReport2.QRChart1.Chart;
//----------------------------- Preview
Report -------------------------
FormGraphReport2.QRDBChart1.BackColor:= clWhite;
FormGraphReport2.QRDBChart1.Gradient.Visible:=false;
FormGraphReport2.QRDBChart1.BorderWidth :=50;
FormGraphReport2.QuickRep1.preview;
end;
|
|
|
| Back to top |
|
 |
Guest
|
Posted: Tue Sep 14, 2004 1:26 am Post subject: Re: Tchart |
|
|
Hi
thanks Jeff for the help.
don
"J. Clarke" <jclarke (AT) docstorsysNOSPAM (DOT) com> wrote:
| Quote: | Don you will get a better response if you ask in
borland.public.delphi.report-charting regarding TChart.
Jeff
"Don" <donnyteo (AT) hotmail (DOT) com> wrote in message
news:41455fba$1 (AT) newsgroups (DOT) borland.com...
Hi,
I'm currently using Edit Chart to modify the Y-Axis interval in Tchart by
checking the Automatic under the scales tab. When I print the chart out
using the procedure listed below, the Y-axis interval becomes smaller. Is it
possible the maintain the bigger Y-axis interval? Please advice, thanks!
Procedure TFormDisplayGraph.BtnPrintGraphOnlyClick(Sender: TObject);
var
i : integer;
begin
FormGraphReport2.QRLabelTitle.Caption :=
FormDisplayGraph.TitleFormDisplayGraph.Caption;
//--------------------------- Report
Chart ------------------------------
FormGraphReport2.QRDBChart1.Title.Text :=
FormDisplayGraph.Chart1.Title.Text;
//reset the Series in the reportChart
FormGraphReport2.QRDBChart1.RemoveAllSeries;
//Clone the original chart series to the report
FormGraphReport2.QRChart1.Chart.Assign(Chart1);
for i:=0 to Chart1.SeriesCount-1 do
CloneChartSeries(Chart1[i]).ParentChart:=FormGraphReport2.QRChart1.Chart;
//----------------------------- Preview
Report -------------------------
FormGraphReport2.QRDBChart1.BackColor:= clWhite;
FormGraphReport2.QRDBChart1.Gradient.Visible:=false;
FormGraphReport2.QRDBChart1.BorderWidth :=50;
FormGraphReport2.QuickRep1.preview;
end;
|
|
|
| Back to top |
|
 |
|
|
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum
|
|