参考 Demo文档 E:\BaiduNetdiskDownload\FastReport 6 VCL Enterprise安装后版本\FastReport 6 VCL Enterprise\Demos\Indicator
不要在报表里,直接在 界面上,对比 dxGaugeControl1仪表盘(18)的 更简陋,但也更 简单直接
拖一个 frxGaugeObject1到界面 上
frxGaugePanel1.Gauge.CurrentValue:=14; //当前值 frxIntervalGaugePanel1.Gauge.StartValue:= 20 //起始值 frxIntervalGaugePanel1.Gauge.EndValue:= 67 //终止值
procedure TForm1.frxGaugePanel1Click(Sender: TObject); begin Label1.Caption:= floattostr(frxGaugePanel1.Gauge.CurrentValue); end;