Web forum is in read-only mode. Login as active registered customer for write access
  Forum Search   New Posts New Posts

How do I set them? (I'm sorry.Title is not appropr

 Post Reply Post Reply
Author
Aoki Taro View Drop Down
New Member
New Member
Avatar

Joined: 29 Jan 2016
Posts: 33
Post Options Post Options   Quote Aoki Taro Quote  Post ReplyReply Direct Link To This Post Topic: How do I set them? (I'm sorry.Title is not appropr
    Posted: 10 Feb 2016 at 2:20am
hello,
i have three questions.Please Look at the figure below.

Q1.
Why is this not 0.0 ? To 0.0,what should I do?

Q2.
I want to arbitrarily decide this.
For example, from the top... 1.0 , 0.5 , 0 , -0.5 , -1.0
How do I ?

Q3.
I want to know how to hide it .

Thank you and best regards,
TARO


--------------------------------
The following is this code .
--------------------------------
procedure TForm1.FormCreate(Sender: TObject);
begin
  with AdvChartView1.Panes[0] do
  begin
    Series[2].Free;
    Series[1].Free;

    CrossHair.Visible := False;
    Legend.Visible := False;
    Title.Text :='';
    XAxis.Size:=200;
    XAxis.Darken3D := False;
    XAxis.Text:='';
    YAxis.Size:=200;
    YAxis.Darken3D := False;
    YAxis.Text:='';

    XGrid.Visible := True;
    XGrid.MinorLineWidth := 0;
    XGrid.MajorLineStyle := psSolid;
    XGrid.MajorLineColor := $00D7D7D7;

    YGrid.Visible := True;
    YGrid.MinorLineWidth := 0;
    YGrid.MajorLineStyle := psSolid;
    YGrid.MajorLineColor := $00D7D7D7;

    With Series[0] do begin
      LineColor := clBlack;
      ChartType := ctXYLine;
      Title.Text := '';
      Marker.MarkerType := mNone;
      YAxis.AutoUnits:=False;
      XAxis.AutoUnits:=False;
      Minimum := -1;
      Maximum :=  1;

      AddSingleXYPoint( 0.00 , 0.60 );
      AddSingleXYPoint( 0.70 , 0.50 );
      AddSingleXYPoint( 1.45 , 0.50 );
      AddSingleXYPoint( 2.20 , 0.50 );
      AddSingleXYPoint( 5.20 ,-0.50 );
      AddSingleXYPoint( 8.20 , 0.50 );
      AddSingleXYPoint(10.40 , 0.60 );
    end;
  end;
end;

Back to Top
Pieter Scheldeman View Drop Down
TMS Support
TMS Support
Avatar

Joined: 18 May 2010
Posts: 3568
Post Options Post Options   Quote Pieter Scheldeman Quote  Post ReplyReply Direct Link To This Post Posted: 10 Feb 2016 at 9:06am
Hi, 

The modified code is 

  AdvChartView1.BeginUpdate;
  with AdvChartView1.Panes[0] do
  begin
    Series[2].Free;
    Series[1].Free;

    CrossHair.Visible := False;
    Legend.Visible := False;
    Title.Text :='';
    XAxis.Size:=200;
    XAxis.Darken3D := False;
    XAxis.Text:='';
    YAxis.Size:=200;
    YAxis.Darken3D := False;
    YAxis.Text:='';

    XGrid.Visible := True;
    XGrid.MinorLineWidth := 0;
    XGrid.MajorLineStyle := psSolid;
    XGrid.MajorLineColor := $00D7D7D7;

    YGrid.Visible := True;
    YGrid.MinorLineWidth := 0;
    YGrid.MajorLineStyle := psSolid;
    YGrid.MajorLineColor := $00D7D7D7;
    YAxis.AutoUnits := False;

    With Series[0] do begin
      LineColor := clBlack;
      ChartType := ctXYLine;
      Title.Text := '';
      Marker.MarkerType := mNone;
      YAxis.AutoUnits:=False;
      XAxis.AutoUnits:=False;
      Minimum := -1;
      Maximum :=  1;
      ValueFormat := '%.1f';
      XAxis.XYValues := False;
      YAxis.MajorUnit := 0.5;
      YAxis.MinorUnit := 0;
      YGrid.AutoUnits := False;
      YGrid.MajorDistance := 0.5;
      YGrid.MinorDistance := 0;
      XGrid.MajorDistance := 1;
      XGrid.MinorDistance := 1;
      XGrid.AutoUnits := False;

      AddSingleXYPoint( 0.00 , 0.60 );
      AddSingleXYPoint( 0.70 , 0.50 );
      AddSingleXYPoint( 1.45 , 0.50 );
      AddSingleXYPoint( 2.20 , 0.50 );
      AddSingleXYPoint( 5.20 ,-0.50 );
      AddSingleXYPoint( 8.20 , 0.50 );
      AddSingleXYPoint(10.40 , 0.60 );
    end;
  end;
  AdvChartView1.EndUpdate;

Kind Regards, 
Pieter
Back to Top
Aoki Taro View Drop Down
New Member
New Member
Avatar

Joined: 29 Jan 2016
Posts: 33
Post Options Post Options   Quote Aoki Taro Quote  Post ReplyReply Direct Link To This Post Posted: 10 Feb 2016 at 9:33am
Hi Pieter,
Thank you for your explanation.
I was able to understand the content.
Kind Regards,
TARO
Back to Top
 Post Reply Post Reply

Forum Jump Forum Permissions View Drop Down