| 技术论坛 |
|
|
| ≡技术区≡ ① |
| DELPHI技术 |
| lazarus/fpc/Free Pascal |
| 移动应用开发 |
| Web应用开发 |
| 数据库专区 |
| 报表专区 |
| 网络通讯 |
| 开源项目 |
| 论坛精华贴 |
| ≡发布区≡ ② |
| 发布代码 |
| 发布控件 |
| 文档资料 |
| 经典工具 |
| ≡事务区≡ ③ |
| 网站意见 |
| 盒子之家 |
| 招聘应聘 |
| 信息交换 |
| 论坛信息 |
|||
|
| 导航： | 论坛 -> DELPHI技术 斑竹:liumazi,sephil | |||||
| 作者： |
|
2003/11/23 20:33:23 | ||||
| 标题： |
|
加入我的收藏 | ||||
| 楼主： | 试试看，可以直接调用！
- |
|||||
| 作者： |
|
2003/11/23 21:02:05 | ||||
| 2楼： | delphi中有一个函数了吧? formatcurr(money,'###,###,###.##'); ---------------------------------------------- - |
|||||
| 作者： |
|
2003/11/23 21:15:01 | ||||
| 3楼： | 首部 function FormatCurr(const Format: string; Value: Currency): string; $[SysUtils.pas 功能 返回货币类型以指定格式字符串Format转换成字符串 说明 FormatCurr(',.00', 1234567890) = '1,234,567,890.00' 参考 function SysUtils.FloatToTextFmt 例子 Edit1.Text := FormatCurr(Edit2.Text, StrToCurrDef(Edit3.Text, 0)); ----------------------------------------------  
|
|||||
| 作者： |
|
2003/11/23 21:25:02 | ||||
| 3楼： | 我原先不知道！我试了一下，有这个函数 ！是这样的，formatcurr('###,###,###.##',money)，倒过来！前面的#号还可以用0还代替？bois，前面的const format怎么确定？ ---------------------------------------------- - |
|||||
| 作者： |
|
2003/11/23 21:44:02 | ||||
| 4楼： | 偶是重 别的例子里复制出来的 还没试过 ',.00'例子里这样行不行？ ----------------------------------------------
|
|||||
| 作者： |
|
2003/11/24 9:01:51 | ||||
| 5楼： | 也行！ 帮助里这么描述的！ Description FormatCurr formats the Currency object given by Value using the format string given by Format. Formats supported are described as part of the FormatFloat function. 哪位哥哥专业翻译一下！ ---------------------------------------------- - |
|||||
| 作者： |
|
2003/11/24 9:42:23 | ||||
| 6楼： | 这位大哥， 这个函数怎样才能放到delphi中使用呢？（详细点， 本人刚开始学delphi） 谢了 ---------------------------------------------- - |
|||||
| 作者： |
|
2003/11/24 11:40:50 | ||||
| 7楼： | 直接复制 function 到 procedure TForm1.Button1Click(Sender: TObject);之前的end 这一段代码到你的{$R *.dfm}底下，然后就可以直接调用了。比如在一个按扭onclick事件底下写这一行代码：label1.caption:=douhao(edit1.text)；就行了！返回值是字符串型！ ---------------------------------------------- - |
|||||
| 作者： |
|
2003/11/24 13:27:07 | ||||
| 8楼： | 不好意思,是把参数写反了:(. 对于金额的格式最好这样写###,##0.00,小数点前的0在金额小于1时会补零 小数点后的两个0,不足两位小数会用零补齐. ---------------------------------------------- - |
|||||
| 信息 |
| 登陆以后才能回复 |
