- 博客(7)
- 资源 (3)
- 收藏
- 关注
RSS订阅原创 Delphi面向对象编程核心类解析：从TObject到TComponent
经过一个系列的学习和分享，我们对Delphi的面向对象特性有了更深入的理解。作为本系列的终结篇，我想对Delphi中几个最基础且最重要的核心类做个系统性的总结，希望能帮助初学者构建清晰的VCL类层次认知框架。
2025-04-28 09:24:39
622
原创 Delphi面向对象设计：如何构建优雅的类结构
职责明确的边界清晰的扩展方便的使用简单的维护轻松的记住：代码首先是给人读的，其次才是给机器执行的。即使是在强调性能的Delphi开发中，良好的设计也能带来长期的可维护性优势。
2025-04-28 08:30:52
261
原创 免费的Pascal开发工具
Free Pascal 是一个开源的 Pascal 编译器，支持多种 Pascal 方言，如 Turbo Pascal 和 Delphi。: 专为 Raspberry Pi 等嵌入式设备设计的 Pascal 开发环境，基于 Free Pascal。: 基于 Free Pascal 和 Lazarus 的扩展开发环境，提供更多组件和工具。: 基于 Free Pascal 的轻量级 IDE，适合初学者和小型项目。: GNU 项目的一部分，支持标准 Pascal 和部分扩展功能。: 界面简洁，易于上手。
2025-02-24 08:45:59
262
1原创 delphi 任意进制转换
function MyFunction(i,k:int64): string;function mod_num(n1, n2: int64): int64; //取余数begin result := n1 - n1 div n2 * n2 ;end;vara:TStack<string>;n,m:int64;begina:=TStack<string>.Create();n:=i;while n>=k dobe...
2021-01-27 13:41:14
769
原创 delphi Try except on e:Exception do
except on e:Exception do//判断单位转换率 try um_rate := vp_mstr.F('vp_um_rate_d').AsFloat / vp_mstr.F('vp_um_rate_m').AsFloat; if um_rate <= 0 then abort else if (vp_mstr.F('vp_...
2019-11-26 08:10:40
2337
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人