关于chartfx控件 我想把chartfx的tool中的各项提示全给做成中文的,我该如何做呢/?谢谢,分不够再加!! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 chartfxtool项中的所有的东东都可以自己做的呀,加中文提示就行了呀, {-----------绘图开始-------------------------------------------------}procedure TForm_Report.plot_result;var i:integer; t_t:integer;begin t_t:=k_k_k; chartfx1.opendataex(COD_VALUES,1,1); chartfx1.ThisSerie:=0; if k_k_k>10 then t_t:=10 ; //最大显示10项 for i:=0 to t_t-1 do begin chartfx1.Value[i]:=outcome[i].Index; chartfx1.Legend[i]:=outcome[i].Name; end; // Chartfx1.ThisColor :=$F0F0E6FB; //控制中间显示柱形的颜色 // chartfx1.WallWidth:=30;//设置三维图示中X、Y、Z三壁的厚度 // chartfx1.RGBBk:=$00EFEFEF;//3维图示中背景色 chartfx1.Decimals:=0;//设置图表中数据显示的小数位数 chartfx1.DecimalsNum[1] :=2; //饼形图的小数位数 chartfx1.Visible:=true; chartfx1.CloseData(COD_VALUES);end;{-----------绘图结束-------------------------------------------------} 请教Delphi三层当前流行的设计架构 大家如何做帮助文档的 怎样取一个文件夹的所有文件? delphi(rad) xe2可能要发布了, 开启了世界之旅(可惜不来中国大陆) 怎么改变FORM的顺序? 如何在程序运行过程中随时在popupmenu对象中增加一个item 为了DELPHI的未来,散分 如何向注册表中写入二进制文件? 急急!!delphi与数据问题。 新版cxGrid滚动条太小了 关于‘流’的操作 大虾们,请教 出现 BOF或EOF中有一个是"真",或者当前的记录已被删除,所需的操作要求一个当前的记录
{-----------绘图开始-------------------------------------------------}
procedure TForm_Report.plot_result;
var i:integer;
t_t:integer;
begin
t_t:=k_k_k;
chartfx1.opendataex(COD_VALUES,1,1);
chartfx1.ThisSerie:=0;
if k_k_k>10 then
t_t:=10 ; //最大显示10项
for i:=0 to t_t-1 do
begin
chartfx1.Value[i]:=outcome[i].Index;
chartfx1.Legend[i]:=outcome[i].Name;
end;
// Chartfx1.ThisColor :=$F0F0E6FB; //控制中间显示柱形的颜色
// chartfx1.WallWidth:=30;//设置三维图示中X、Y、Z三壁的厚度
// chartfx1.RGBBk:=$00EFEFEF;//3维图示中背景色
chartfx1.Decimals:=0;//设置图表中数据显示的小数位数
chartfx1.DecimalsNum[1] :=2; //饼形图的小数位数
chartfx1.Visible:=true;
chartfx1.CloseData(COD_VALUES);
end;
{-----------绘图结束-------------------------------------------------}