Steema Central

Hi Phineas, Some considerations: 1) I've fixed the function I told you yesterday modifying one line of code. Where said: if (Series[i].YValue[j] < FAxis.Maximum) and (Series[i].YValue[j] > FAxis.Minimum) then Now it's: if (Series[i].YValue[j] <= FAxis.Maximum) and (Series[i].YValue[j] >= FAxis.Minim...

Hi Didier, That's strange. You should see a series and a teefunction. Another test you can do could be to add a chart (and a function) to a new form at design time and see the declarations in the code generated. For me: //... type TForm1 = class(TForm) Chart1: TChart; Series1: TLineSeries; TeeFuncti...

Hi Simon,

Could you take a look at the example that Narcis posted here? I think this will solve your both questions at the same time cause it calculates interpolated points and it should work for DateTime also.

Hi Phineas, The methods you mention are exclusive ActiveX methods. Here is how you could calculate the same in Delphi. And please, let us know if we've mistakenly documented the methods you mention as belonging to the VCL version, and if so, where we can find the error to correct it. function TForm1...

Hi Didier,

It's an event for TCustomTeeFunction. You should find it through Object inspector as usually if you added the function at design time (at the function object, not the series).

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...

Hi Clara,

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;

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 - ...

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...

Hi Colin,

In that case you may be interested in having a look at the interpolation example from Narcis.

Hi yam49,

I've sent a link to download the v8.03 Release Candidate to your email account. As you are source code customer, probably the easiest way to install everything may be using TeeRecompile.

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...

Hi yam49,

I'm happy to see that!

Hi mc,

I think that annotation tool is what probably you are looking for. You can customize the text, color, position,...

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).

Search found 9527 matches