Jump to content

ECharts


stone feng
 Share

Recommended Posts

Hi Arving, great charts!! 

 

I compiled in Delphi 2006 and I'm getting this error:

 

[Pascal Fatal Error] Main.pas(9): F1026 File not found: 'System.Generics.Collections.dcu'

 

Some clues? please.

 

delete System.Generics.Collections unit in main.pas 

Link to comment
Share on other sites

  • 2 weeks later...
  • 7 months later...
  • 3 weeks later...
Dear, I have Delphi 2010 and unigui 0.99.10.1172 I could not check this demo, it looks phenomenal. My error is "[MSBuild error]" 0 "is an invalid value for the" debugInformation "parameter of the" DCC "task" .... any help will thank
 
Greetings to all

 

mmurgas

Link to comment
Share on other sites

Solution

 

RxForForX , abrir cualquier archivo DPROJ-editor de texto, en busca de una fila existe

El código XML
1 <DCC_DebugInformation > 0 </ DCC_DebugInformation >

Y cambiarlo a

El código XML
1 <DCC_DebugInformation > false </ DCC_DebugInformation >
Link to comment
Share on other sites

  • 5 months later...
  • 3 months later...
  • 4 years later...
17 hours ago, Sherzod said:

  ...
  options.LoadFromFile(Format('option_%d.txt', [TUniBitBtn(Sender).Tag + 1] ) );
  ...

?

There are some buttons in the bottom of the Form,

click any button will load a corresponding txt file(base json data) and draw a chart.

procedure TMainForm.UniBitBtn1Click(Sender: TObject);
var
  options: TStringList;
begin
  options := TStringList.Create;
  try
    options.LoadFromFile(Format('option_%d.txt', [TUniBitBtn(Sender).Tag + 1] ) );
    UniSession.AddJS(Format('var option = %s', [options.Text]));
    UniSession.AddJS('myChart.setOption(option, true);');
    Self.Caption := Format('%s - %s', ['ECharts', TUniBitBtn(Sender).Caption]);
  finally
    options.Free;
  end;
end;

procedure TMainForm.UniFormShow(Sender: TObject);
begin
  UniTimer1.Enabled := True;
end;

2020-02-11_114857.thumb.jpg.08ead00a6580e55ca725e5562ed10847.jpg

Link to comment
Share on other sites

2 hours ago, 55143681 said:

There are some buttons in the bottom of the Form,

click any button will load a corresponding txt file(base json data) and draw a chart.

procedure TMainForm.UniBitBtn1Click(Sender: TObject);
var
  options: TStringList;
begin
  options := TStringList.Create;
  try
    options.LoadFromFile(Format('option_%d.txt', [TUniBitBtn(Sender).Tag + 1] ) );
    UniSession.AddJS(Format('var option = %s', [options.Text]));
    UniSession.AddJS('myChart.setOption(option, true);');
    Self.Caption := Format('%s - %s', ['ECharts', TUniBitBtn(Sender).Caption]);
  finally
    options.Free;
  end;
end;

I realized that it should be loaded from a file.

But where is the file?

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

 Share

×
×
  • Create New...