Search found 9507 matches
- Tue Aug 05, 2008 8:15 am
- Forum: VCL
- Topic: copy chart to excel
- Replies: 3
- Views: 5320
Hi mc, Could you take a look at this example and see if it's useful at your end? procedure TForm1.Button1Click(Sender: TObject); Function GetChartJPEG(AChart:TCustomChart):TJPEGImage; var tmpBitmap:TBitmap; tmpChart: TChart; i:integer; begin result:=TJPEGImage.Create; { <-- create a TJPEGImage } tmp...
- Mon Aug 04, 2008 7:41 am
- Forum: VCL
- Topic: Teechartpro 7.12 Drawing a graph
- Replies: 25
- Views: 38119
Hi Clara,
This works for me here.
This works for me here.
Code: Select all
procedure TForm1.TeeFunction1Calculate(Sender: TCustomTeeFunction;
const x: Double; var y: Double);
begin
//y := 2+3*(1+x)-5 + (abs(power(-x,2)) - x*x) * 2 - 1/(x + 1);
y := sin(x) + cos(x) - abs(tan(x)) + x;
end;
- Thu Jul 31, 2008 8:28 am
- Forum: VCL
- Topic: 2 sets of axisarrowtools for the same axis
- Replies: 13
- Views: 20720
Hi Colin, The code I posted yesterday was for using a trackbar outside of the editor. Here you have a code I suggest you using a scrollbar with a 2D chart. procedure TForm1.ScrollBar1Change(Sender: TObject); var XIncrement, YIncrement: Double; begin with Series1 do begin XIncrement := ((MaxXValue - ...
- Wed Jul 30, 2008 10:18 am
- Forum: VCL
- Topic: 2 sets of axisarrowtools for the same axis
- Replies: 13
- Views: 20720
Hi Colin, I think I don't understand your request. I mean the Zoom slider, or trackbar, at ChartEditor -> Chart -> 3D . To do the same as this trackbar does, you could simply do: procedure TForm1.FormCreate(Sender: TObject); begin TrackBar1.Min := 0; TrackBar1.Max := 500; TrackBar1.Position := Chart...
- Wed Jul 30, 2008 7:46 am
- Forum: VCL
- Topic: Stacked Line Charts
- Replies: 4
- Views: 9218
Hi Colin,
In that case you may be interested in having a look at the interpolation example from Narcis.
In that case you may be interested in having a look at the interpolation example from Narcis.
- Tue Jul 29, 2008 8:37 am
- Forum: VCL
- Topic: Using Teechart 8.02 in quickreport5 (Delphi 2007)
- Replies: 12
- Views: 10807
- Tue Jul 29, 2008 8:11 am
- Forum: VCL
- Topic: Stacked Line Charts
- Replies: 4
- Views: 9218
Hi Colin, I'm afraid it won't work as you expect. Both Line and Area series calculate the stacked result following the series' indexes. So, the first, result point will be the result of the addition of the firsts values if stacked series. And if they don't coincide in x, it won't look as expected. I...
- Tue Jul 29, 2008 7:32 am
- Forum: VCL
- Topic: Using Teechart 8.02 in quickreport5 (Delphi 2007)
- Replies: 12
- Views: 10807
- Mon Jul 28, 2008 8:58 am
- Forum: VCL
- Topic: quadrant labels
- Replies: 4
- Views: 6275
- Mon Jul 28, 2008 8:50 am
- Forum: VCL
- Topic: Using Teechart 8.02 in quickreport5 (Delphi 2007)
- Replies: 12
- Views: 10807
Hi yam49,
Could you try to follow the QuickReport instructions here?
And note that in this topic title you talk about QuickReport v5 and the packages you are mentioning are from QuickReport v4 (xxxQR4xxx.dpk and DclxxxQR4xxx.dpk).
Could you try to follow the QuickReport instructions here?
And note that in this topic title you talk about QuickReport v5 and the packages you are mentioning are from QuickReport v4 (xxxQR4xxx.dpk and DclxxxQR4xxx.dpk).
- Mon Jul 28, 2008 8:27 am
- Forum: ActiveX
- Topic: Customizing Bottom Axis Labels
- Replies: 1
- Views: 3756
- Mon Jul 28, 2008 8:21 am
- Forum: ActiveX
- Topic: Change individual candle bar color
- Replies: 1
- Views: 4686
Hi David, I've tried what you say, and I've been able to set open-close colors, up-down color and even border width and color with TeeChart AX v6.0.1.1. These are customizations for the whole series and not for individual candles, but you can use OnGetPointerStyle event to apply each setup to differ...
- Thu Jul 24, 2008 9:38 am
- Forum: ActiveX
- Topic: Fixing one side of the zoom rectangle?
- Replies: 4
- Views: 6512
Hi Phil, Then you should draw your custom Rectangle while the mouse holds down and apply a custom zoom at OnMouseUp event. Something as follows: Dim EndX, EndY As Double Dim Go As Boolean Private Sub Form_Load() TChart1.Aspect.View3D = False TChart1.AddSeries scPoint TChart1.Series(0).FillSampleValu...
- Thu Jul 24, 2008 8:20 am
- Forum: VCL
- Topic: 2 sets of axisarrowtools for the same axis
- Replies: 13
- Views: 20720
Hi Colin,
1. Scrollbars should work with DateTime axis. Have you received this example from Narcis?
2. So, you are planning to add a slider to do something similar as the Zoom slider does in the Design Time editor?
1. Scrollbars should work with DateTime axis. Have you received this example from Narcis?
2. So, you are planning to add a slider to do something similar as the Zoom slider does in the Design Time editor?
- Wed Jul 23, 2008 9:01 am
- Forum: ActiveX
- Topic: Fixing one side of the zoom rectangle?
- Replies: 4
- Views: 6512
Hi Phil, If we understood well, you are trying to do something as following: Dim MinLeft As Double Private Sub Form_Load() TChart1.Aspect.View3D = False TChart1.AddSeries scPoint TChart1.Series(0).FillSampleValues 25 TChart1.Environment.InternalRepaint MinLeft = TChart1.Axis.Left.Minimum MinBottom =...