如何将QRDBText控件显示的金额数字后加'.00'?
解决方案 »
- ADOQuery1.FieldValues[‘字段1’]返回的是什么类型
- 江湖救急!鼠标点中excel表其中的一个单元,自动出现个对话框,然后进行相关操作,如何实现!!!
- 能同时安装吗????
- 通过线程怎样读取数据;
- Listview最多能容纳多少行(在vsReport模式下)?
- 有关WORD的处理,急急急。。。分不够再给
- 我的困惑,这一切到底该怎么去对待
- 学习应掌握技巧:DELPHI程序开发中的几则应用技巧
- 为何查询不出结果
- 我原来用Delphi做数据库,现在改用VC++6 && SQL 了,感觉很好,没什么麻烦的,比Delphi好多了,大家快改用VC做数据库吧?
- 请aiirii等高手帮忙!NT服务程序启动参数的问题!
- 如何找出报表的窗体QuickRep1?谢谢!
TNumericField(ADOQuery1.FieldByName('FieldName')).DisplayFormat := '0.00';
方案二,加上事件代码
procedure TForm1.QRDBText1Print(sender: TObject; var Value: String);
begin
Value := FormatFloat('0.00', StrToIntDef(Value, 0));
end;