摘要： Delphi或者Lazarus（FPC），编译环境有一个自动增加版本信息的功能，应用程序在运行时显示往往是调用windows API，整合成标准函数格式如下。function GetApplicationVersion: String; // Added 取得程序版本号 var FileName : 阅读全文

摘要： 目的：程序启动运行时，可以在启动过程中将默认数据库创建。方向：使用Zeos 的 TZSQLProcessor，处理批量SQL脚本，其他的组建也是有相关的类。为了批量方便，这里定义了两种类型的的SQL，虽然都是DDL 但，后者与存储过程相关。zDDLScript : TZSQLProcessor; z 阅读全文

摘要： 这个问题要从最近一个项目谈起，服务器端要求UTF8编码，Delphi内部是UTF16编码，为了避免风险我将代码中数据都定义为AnsiString，但实际还是除了些问题。delphi7下buffer是tbytes型，temp是string型temp := string(pointer(buffer)) 阅读全文

摘要： 我们大家链接这个数据库可能都用root作为用户名！但默认不可以远程访问！如果要远程访问怎么处理呢？1 GRANT ALL PRIVILEGES ON *.* TO 'root'@'%' IDENTIFIED BY 'password' WITH GRANT OPTION;2 FLUSH PRIVILEGES;第二行就是令修改立刻生效，不用重启数据库;第一行就是权限分配！ALL PRIVILEGES... 阅读全文

摘要： 记得我是在delphi2005里面看到Record可以和Class一样定义方法（Function、Procedure）的，最近几年不像年轻时太爱看语言新特性了。Delphi XE2将正则表达式加入到了系统，成为体系的一部分 System.RegularExpressions，但是它表现出来的是TRegEx记录，对，是记录，不是类，也许是为了效率考虑，之后也从没有看过实现，虽然我们大家都知道Delh... 阅读全文

摘要： 前几天看到一个帖子，讨论两个记录复制，贴主提出了一个解决方案，但是不想用，希望大家集思广益，让人没想到的是方法还真的挺多，这里罗列一下。这是需要复制的的两种记录TypeA = record value1 : word; value2 : word; value3 : word; end;TypeB = record b1 : byte; b2 : byte; end;方案1：... 阅读全文

摘要： 由于Lazarus从1.2版开始默认字符集就是UTF8，如果要转到系统正常显示或文本保存，就必须对字符集进行转换。Lazarus提供了很多函数。如题。那么这里面有什么关系呢？UTF8ToSys 需要 启用编译参数 –dDisableUTF8RTL,否则还是UTF8，如果变码还是Utf8ToAnsi， 阅读全文

摘要： MultiLog是一种同时以灵活性和低开销为目标的日志系统。顾名思义，它可用于将日志实例到多个目标，如文本文件、可视控件或其他应用程序。添加新的日志目标使用两个方法就可以实现了，其中一个方法是可选的。 MultiLog通常类似于CodeSite、Smart Inect、Overseer和EstLog 阅读全文

摘要： 感谢https://blog.csdn.net/byxdaz/article/details/77979114原创，由于CSDN经常调整，故再编辑收藏，并修改了部分BUG。一、介绍Modbus Poll ：Modbus主机仿真器，用于测试和调试Modbus从设备。该软件支持ModbusRTU、ASC 阅读全文

摘要： 作者：岑心 该文已经收藏，写得太好了，备份一份作者原处：http://www.cnblogs.com/shangdawei/p/4058452.html引 言 相信有些计算机知识的朋友都应该听说过“DLL”。尤其是那些使用过windows操作系统的人，都应该有过多次重装系统的“悲惨”经历——无论再怎 阅读全文