Delphi专栏
飞狼兄
努力成就未来~
展开
-
贡献一个函数 Delphi 取大写金额: 123.12 -> 壹百贰拾叁元壹角贰分
function FloatToCCurrency(lfCurrency: Extended): string;const sCNumber: array['0'..'9'] of string[2] = ('零', '壹', '贰', '叁', '肆', '伍', '陆', '柒', '捌', '玖'); sCUnit: array[0..14] of string[2] = ('万...原创 2019-10-27 21:03:37 · 229 阅读 · 0 评论 -
Tomcat服务监控管理工具,利用delphi编写
公司的一个wap网站使用tomact服务,但最近运行总是崩溃,有时候会在半夜,解决起来实在麻烦,所以捡起以前的delphi,写了个工具。其中思路是:网站里写了一个jsp网页,啥也不做,用来被检测网站是否正常。使用idhttp访问,根据返回码来判断网站是否正常。不正常则重启。故有以下几个关键:jsp网页:code----------------------------------原创 2014-03-14 09:54:16 · 1042 阅读 · 0 评论 -
清理任务栏残留图标Delphi版 附源程序 .
//我想任何人都遇到过这样的情况://任务栏右下角的快捷图标有时并不会随着程序的关闭而消失//只有当鼠标划过时才消失//下面的函数可以通过自动划过并清除这些图标procedure RemoveDeadIcons;var TrayWindow : HWnd; WindowRect : TRect; SmallIconWidth : Integer; SmallIc转载 2014-03-14 08:55:44 · 927 阅读 · 0 评论 -
Delphi 与 松下 FP-XH 串口通讯实现
用Delphi 实现串口通讯,常用的几种方法为:使用控件如MSCOMM和SPCOMM,使用API函数或者在Delphi 中调用其它串口通讯程序。利用API编写串口通信程序较为复杂,需要掌握大量通信知识,其优点是可实现的功能更强大,应用面更广泛,更适合于编写较为复杂的低层次通信程序。相比较而言,利用SPComm控件则相对较简单,该控件具有丰富的与串口通信密切相关的属性及事件,提供了对串...原创 2019-10-07 08:19:24 · 875 阅读 · 0 评论