- 博客(4)
- 收藏
- 关注
RSS订阅转载 delphi 阿拉伯数字转换为罗马数字
function TForm1.DecToRoman(iDecimal: integer ): string;constaRomans: array [ 1..13 ] of string = ( 'I', 'IV', 'V', 'IX', 'X', 'XL', 'L', 'XC', 'C', 'CD', 'D', 'CM', 'M' );aArabics: array [ 1..13...
2011-08-04 18:11:00
143
转载 delphi 阿拉伯数字转换为大写金额
function Tform1.Num2CNum(dblArabic: double): string;const _ChineseNumeric = '零壹贰叁肆伍陆柒捌玖';var sArabic: string; sIntArabic: string; iPosOfDecimalPoint: integer; i: integer; iDigit: integer;...
2011-08-04 18:09:00
217
转载 音乐一角
the rain 久石让yesterdayishistory，tomorrowismystery，buttodayisagift，that'sitiscalledpresent转载于:https://www.cnblogs.com/rzsgsj/archive/2011/07/18/2109421.html...
2011-07-18 13:20:00
86
转载 delphi--TstringList的应用
Delphi中关于listview的一些使用Delphi下的COM编程TStringList常用操作2010-09-06 10:01:12|分类： 编程技术 |标签：listtstringlistshowmessagebutton1tobject |字号大中小订阅//TStringList 常...
2011-07-16 17:20:00
122
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人