09 2012 档案

pascal金额小写转大写
摘要：function TFormMain.SmallTOBig(small:real):string;var S1,B1,w1,qw1:string; qw,dwz,q:integer;begin s1 :=formatfloat('0.00',small); //格式化字符串 dwz:=pos('.'... 阅读全文
posted @ 2012-09-21 10:40 cuibq 阅读(175) 评论(0) 推荐(0)