Delphi公共使用函数，多年积累3

最新推荐文章于 2025-07-13 19:46:17 发布
最新推荐文章于 2025-07-13 19:46:17 发布
阅读量440 收藏 9
点赞数 3
CC 4.0 BY-SA版权
文章标签： 开发语言
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.youkuaiyun.com/stephenchern/article/details/137186498
一位Delphi开发者分享了他多年未碰该编程语言，从早期版本6到最新12的重拾过程，对自己坚持学习感到感动。

摘要生成于 C知道 ，由 DeepSeek-R1 满血版支持， 前往体验 >

好多年没玩delphi

从6开始 到7 到xe2 到现在的12

又重新捡起来弄弄

感动自己下

stephenchern
关注
Delphi常用公用函数
05-21
function CapitalizeMoney(aMoney: Double; aIsUnit: Boolean; var oMoneyStr: string): string; //小写人民币转换成大写人民币 function IsExistForm(aFormObject: string): Boolean; //查询窗体是否存在 function CalcAmountOfField(aQry: TQuery; aFieldName: string; var oAmountStr: string): string; //计算合计 function ChangeChineseToPY(aChinese: string; aIsCapital: Boolean; var oPYStr: string): string; //汉字转换成拼音码 function TrimTextOfEdt(aFormObject: TForm): string; //清除Form上EDIT的前后空格 function ClearTextOfEdt(aFormObject: TForm): string; //清除Form上EDIT的内容 function ClearCaptionOfPnl(aFormObject: TForm): string; //清除Form上Panel的内容 function SetReadOnlyOfEdt(aFormObject: TForm; aIs: Boolean): string; // 使FORM上EDIT不可写 function FullItemOfCB(aQry: TQuery; aFieldName: string; aCBObject: TComBoBox): string; //填充ComBoBox中的内容 function FullItemOfLB(aQry: TQuery; aFieldName: string; aLBObject: TListBox): string; //填充ListBox中的内容 function FilterQry(aQry: TQuery; aFieldName: string; aFilterValue: string): string; //对单个字段的过滤 function FilterPiPeiMa(aQry: TQuery; aFilterValue: string): string; //对拼音码，五笔码，自定码的组合过滤 function FilterQryByDBG(aQry: TQuery; aDBGrid: TDBGrid; aFilterValue: string): string; //对DBGrid的指定列的过滤 function LocateQryByDBG(aQry: TQuery; aDBGrid: TDBGrid; aLocateValue: string): string; //对DBGrid的指定列的定位 function SetLocalTimeForServerTime(aQry: TQuery): string; //设置本机时间为服务器时间 function SwapQueryRecord(aIsUp: Boolean; var oQry: TQuery): string; //交换记录 // function GetPaperSize(aPaperSizeStr: string): TQRPaperSize; function GetQRBandType(aQRBandTypeStr: string): TQRBandType; function GetAlignment(aAlignmentStr: string): TAlignment; function GetBoolean(aBooleanStr: string): Boolean; function GetColor(aColorStr: string): TColor; function GetFontStyle(aFontStyleStr: string): TFontStyles; function GetDataType(aDataTypeStr: string): TQRSysDataType; function GetPageOptions(aOptionStr: string): TQuickReportOptions; function GetPageOrientation(aOrientationStr: string): TPrinterOrientation;
Delphi公共使用函数，多年积累2
03-26
Delphi公共使用函数，多年积累2 几年前发了一次 这几年来陆续更新了些 再发一个。仅供大家参考
Delphi公共函数 (三)
平民
12-16 1533
Delphi公共函数 (三){=================================================================  功  能: 列举工作组中所有的计算机  参  数:          List: 需要填充的List  返回值: 成功:  True,并填充List 失败: False;  备  注:  版  本:     1.0  2002/10/0
Delphi 历代版本部分对比（Delphi 12）
12-31 532
delphi 如何创建公共函数
10-22 1429
第一种方法类方法 第二种方法： //   公共函数库 //要先在implementation前面声明这个函数, //此单元中需要包括公用的pas文件， //如sysutils等。需要哪个就把哪个放进去。 //其它单元 引用Unit3后自接调用  test ; unit Unit3; interface  uses classes,sysutils,windows,Vcl.Dialogs; ...
<Oracle优化新常态> 前半生
海鲨数据库架构师
08-24 5268
ORACLE 优化 新常态
关于MFC未来的感悟
热门推荐
踏雪无痕
11-22 4万+
本人题材选自论坛：http://topic.youkuaiyun.com/u/20111119/15/d9726ed9-4286-4126-9ea9-601f6fa88337.html?61839。经过整理和加入自己的看法。   关于MFC的未来，有许多人都是有不同程序的担忧。    有人都说windows界面向着metro风格发展，比如windows 8。随着人们对界面体验的要求越来越高，触摸时代
【优快云】十年MFC经历认识的Microsoft技术
akiraww的专栏
04-20 1159
自从2005年3月8日下午16时“十年MFC经历认识的Microsoft技术”以帖子的方式发表于优快云论坛后，引起了许多网友得好评，使得笔者诚惶诚恐，考虑到该贴过长(人气指数为5000)，因此转移到Blog上，许多网友对此帖的评语只好省略，在此鄙人谢过了！为感谢网友的支持，本人希望今后能发出新的帖子以回报网友对我的鼓励，再一次谢谢！ 初识MFC我最初知道MFC大概是在1993年，那个时候Visu
十年MFC经历认识的Microsoft技术
梦想起航的地方
01-04 1604
一、初识MFC 　　我最初知道MFC大概是在1993年，那个时候Visual C++还没面世，当时Microsoft的C++编译器还很弱，官方的名字是Microsoft C/C++ 7.0，MFC的版本是1.0，几乎没有引起什么反响，那个时期最好的C++开发环境是Borland C++ 3.1，其实，大概是1992年11月份，一个偶然的机会，我领略到Borland公司的厉害，记不得在什么地方，我
VC知识库BLOG-技术，非技术......
06-25 958
十年MFC经历认识的Microsoft技术(ZT) 一、初识MFC 　　我最初知道MFC大概是在1993年，那个时候Visual C++还没面世，当时Microsoft的C++编译器还很弱，官方的名字是Microsoft C/C++ 7.0，MFC的版本是1.0，几乎没有引起什么反响，那个时期最好的C++开发环境是Borland C++ 3.1，其实，大概是1992年11月份，一个偶然的机
Delphi公共使用函数，多年积累
03-21
通过理解和使用这些公共函数，开发者可以更加高效地进行项目开发，同时保证代码的质量和一致性。在学习和使用这些函数时，应确保理解每个函数的作用，遵循良好的命名规则，并在适当的时候进行扩展和修改，以适应不断...
收集多年的delphi经典函数、组件技巧资料2
03-03
首先，我们来看"DELPHI常用函数集及简要范例.txt"，这个文档很可能包含了Delphi编程中常用的内置函数和自定义函数的集合，以及这些函数的使用示例。学习和理解这些函数将有助于提升你在处理各种编程任务时的效率，...
程序人生！（转）
zhoulingjie311的专栏
12-21 1953
<br />2002年7月的深圳烈日炎炎。不觉已辞去工作近两个月，仍在天天奔忙着面试，寻找新的工作机会。我已经尝试了好几家公司，有小到只有一个三房一厅住宅改造成的软件公司，也有大到有几栋楼宇的大型IT国企。从繁华的罗湖商业区到IT企业林立的南山科技园再到美丽的蛇口，我都跑了，结果不 尽如意。我的开价是8k/月，有的公司去后即石沉大海，有的公司希望我能降降价，有的公司想让我合作作某某项目，我coding他们出工钱，相当于作短期外包，但coding量吓死人，工钱才6k/月， 还有一家风险投资的老板想要我作一个新
Delphi公共函数收藏篇：多年积累精华3
资源摘要信息: "Delphi公共使用函数，多年积累3" Delphi是一个广泛使用的集成开发环境(IDE)，由Embarcadero Technologies公司开发，主要用于快速开发多种应用程序，尤其在Windows平台下。Delphi使用自己的编程语言...
开发语言的优劣势对比及主要应用领域分析
qq_39980997的博客
07-13 1076
开发语言是构建数字世界的核心工具，不同语言各有专长。Python主导AI与数据科学，​JavaScript为Web前端基石，​Java/C#​掌控企业级系统，​Go领跑云原生开发，​C/C++​制霸高性能领域，​Kotlin/Swift引领移动生态。选型需聚焦三要素：​场景适配性​（Web/移动/系统/数据）、性能需求层级​（从脚本到内核优化）、开发生态成熟度​（团队技术栈与。选型需关注四个维度：​应用场景​（Web/移动/系统/数据）、性能要求、团队技术栈及开发效率。理解语言特性比追求“万能语言”更重要。
【精美排版】基于单片机的温控智能电风扇.doc
最新发布
07-22
【精美排版】基于单片机的温控智能电风扇.doc
试题python软件编程等级考试一级编程实操题03word程序填空阅读填空程序试题(1).doc
07-22
试题python软件编程等级考试一级编程实操题03word程序填空阅读填空程序试题(1).doc
县域电子商务进农村综合示范工程解决方案.pptx
07-22
县域电子商务进农村综合示范工程解决方案.pptx
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值