Keskustelu: Ohjelmointikysymykset: Pascal: Delphi GraphFX

// procedure TForm1.Button1Click(Sender: TObject);
begin

chartfx1.OpenDataEx(COD_xVALUES,1,8);
chartfx1.OpenDataEx(COD_values,0,8);
chartfx1.ThisSerie := 0 ;
chartfx1.value[0] := 50 ;
chartfx1.value[1] := 60 ;
chartfx1.value[2] := 70 ;
chartfx1.value[3] := 150 ;

chartfx1.ThisSerie:= 1 ;
chartfx1.xValue[0]:= 10;
chartfx1.xValue[1] := 20 ;
chartfx1.xValue[2] := 30 ;
chartfx1.xValue[3] := 40 ;
chartfx1.CloseData(cod_xvalues);
chartfx1.CloseData(cod_values);

// end;