Delphi 的编译指令(1): $DEFINE、$UNDEF、$IFDEF、$ELSE、$ENDIF
Delphi 的编译指令(1): $DEFINE、$UNDEF、$IFDEF、$ELSE、$ENDIF本文转自：http://www.cnblogs.com/awei0611/archive/2009/02/26/1398459.html
一个程序从无到有的过程是这样的: 编辑代码 -> 预处理 -> 编译(成dcu等) -> 链接(为exe等).
什么是预处理? 譬如 VCL 中有很多代码是兼容 Linux 的, 在 Windows 下就需要在 ...
【转】Delphi TClientDataSet的使用
转自：https://www.cnblogs.com/chenmfly/p/4541353.html
1．TClientDataSet的基本属性和方法介绍
1)．FieldDefs: 字段定义列表属性
开发者可通过单击属性编辑器中该属性编辑按钮，或在该控件上单击右键选择弹出菜单中的"Fields Editor"菜单进行字段编辑。设置完此属性后，实际上就相当于定义了表的结构；如果想装入已有的 ...
Delphi实现开源Vector向量容器类
几周前，我在C ++ Builder上写了一篇文章，在那里我完全超出了我的舒适范围，并实现了我的第一个C ++类。
自从我对C ++ Builder产生了兴趣之后，在接下来的几周和几个月中，我将继续使用C / C ++进行冒险，但是与其他许多人一样，Corona病毒迫使我对工作进行不同的优先级排序。所以暂时我的焦点将是Delphi。
在这篇Delphi文 ...
delphi模板开发
delphi模板开发
用模板开发，写代码就是填空题。
让开发变为填空题，这也是AI开发的指导思想。
1）制作模板
/// <author>cxg 2023-10-9</author>
unit db.crud;
interface
uses
System.Classes, System.SysUtils, serialize, yn.log, db.unidacpool, db.unidac,
global;
type
TCRUD<T: record> = record
dbid ...
delphi mysql adbquery数据提供程序或其他服务返回 E_FAIL 状态
delphi mysql adbquery数据提供程序或其他服务返回 E_FAIL 状态。. 出现以上错误，请检查表的时间字段是否可以为NULL，不能为NULL可能出现这个问题，或其他不能为空的字段造成的。Access数据库，文本类型字段，存储字符段超出该字段定义的最大长度报此错误一般都是数据库字段类型设置不当引起，大家可以检查下。
...
[原创]Delphi 目录函数：ForceDirectories 和 CreateDir 的详细介绍
[原创]Delphi 目录函数：ForceDirectories 和 CreateDir 的详细介绍
引用单元：SysUtils
1、CreateDir 创建一个新目录
function CreateDir(const Dir: string): Boolean; //创建一级目录 父目录必需存在
function CreateDir(const Dir: string): Boolean;
begin
Result := CreateDirectory(PChar(Dir), nil);
...
Delphi 10.4.1来了
这是下载地址：
https://altd.embarcadero.com/download/radstudio/10.4/radstudio_10_4_101461a.iso
注册机到qq群：209321818 找。
这个版本有哪些改进呢？按官方的更新文档，在以下几方面提升质量：
1.IDE开发环境，这个不用说，10.4的IDE问问多多
2.LSP(Delphi Code Insight)，这个是10.4的新功能，同IDE一样，只是个初 ...
Delphi - 调用SuperDll 持续更新
调用SuperDll
接上一篇Delphi创建Superdll，将生成的SuperDll.dll文件复制到本工程路径下，创建如下代码进行Superdll各个接口的测试。
创建uSuperDll.pas单元，用来对接DLL，具体看如下代码；
创建Delphi WinFrm窗体，引用uSuperDll.pas单元，窗体界面如下：
WinFrm uMain.pas单元代码：
1 unit uMain;
2
3 interf ...
TIcsMQTTServer
TIcsMQTTServer
基于Overbyte ICS 9.5的TWSocketServer组件，可以高效实现MQTT Broker功能。该方案利用ICS的高并发特性，支持MQTT 3.1.1和5.0协议，适用于IoT边缘设备或自定义Broker场景。
充分利用ICS TWSocketServer的高并发线程池和事件驱动优势，适合IoT边缘设备或自定义Broker场景。ICS作为底座，让开发零门 ...
IDE工具RAD Studio 13 Florence重磅发布：64 位 IDE + AI 组件全面升级！
近日，Embarcadero 正式宣布推出 RAD Studio 13 Florence，同时发布了 Delphi 13 与 C++Builder 13。这一版本带来了 全新的 64 位 RAD Studio IDE、更新的 C++Builder Clang 编译器、全新 Delphi 语言扩展、AI 组件与 AI 助手，并对现有功能进行了全面增强，重点聚焦在&nb ...
HTB_Bike练习记录——SSTI
目标ip：10.129.64.117
一、信息收集
ping 10.129.64.117
nmap -sV -sC -v 10.129.64.117
-v：增加详细程度，让 Nmap 打印有关正在进行的扫描的更多信息。
扫描显示 22 端口（SSH）已打开，但由于我们没有可用于身份验证的凭证或密钥，因此我们暂时忽略它。
我们还打开了 80 端口，该端口正在运行 HTTP Node.js 服务器并使 ...
一步一步学习使用FireMonkey动画（6） 用实例理解动画的运行状态
虽然在过去的几节课中，已经详细的介绍了不少的属性和方法以及事件，本节来看一看动画的执行状态。
回顾一下前面的几节内容，可以看到，每一个动画都具有如下的属性和方法，请仔细阅读下面的属性或事件的作用，在接下来的案例中将会使用到它们：
1. 动画的属性和事件
Duration:该属性表示动画的持续时间（以秒为单位）。 ...
一步一步学习使用FireMonkey动画（5） 动画图解11种动画插值类型
如果学习过《一步一步学习使用FireMonkey动画》系列的前几课，可以看到不止一次的使用了动画的Interpolation属性指定插值。
插值（Interpolation），在数学和计算机图形学中，是一种在两个已知值之间估算中间值的方法。简单来说，就是给定一个起点 A 和一个终点 B，插值能计算出从 A 到 B 的平滑过渡中的所有“中间点”。
...
一步一步学习使用FireMonkey动画（4） 使用Delphi的基本动画组件类，路径和位图列表动画 弹跳小球和奔跑的小人示例
在《一步一步学习使用FireMonkey动画（3）》中，介绍了TAnimation的多数子类，本节将对TRectAnimation、TPathAnimation和TBitmapListAnimation这3个子类进行介绍。
本节将介绍的主题如下：
使用TPathAnimation创建路径跟随的小球。
使用TBitmapListAnimation打造奔跑的小人动画
使用TRectAnimation打造内外边距移动动画
1 ...
一步一步学习使用FireMonkey动画（3） 使用Delphi的基本动画组件类
本课将介绍如何使用TAnimation的子类，比如TFloatAnimation、TColorAnimation来创建动画。
本课的主要内容：
认识TAnimation的子类
使用TAnimation的动画子类创建动画。
使用TFloatKeyAnimation关键帧创建弹跳球动画
使用TColorKeyAnimation关键帧动画眩目背景变换
事实上多数动画是通过在指定时间范围（Duration）内操控 ...
一步一步学习使用FireMonkey动画（2） 使用TAnimator类创建动画
在开始研究FireMonkey提供的动画组件前，回顾一下多数时候，只是想给控件加一些突出的提醒或点缀，所以无须真的添加一个动画组件。FMX（FireMonkey的简称）提供了一系列便利的操作。
本节将介绍：
使用TFmxObject的动画函数。
使用TAnimator对象快速创建动画。
TAnimator与其他的TAnimation动画组件的区别。
1. 使用FmxOb ...
一步一步学习使用FireMonkey动画（1） 使用动画组件为窗体添加动态效果
FireMonkey提供了一系列的动画控件，为基于FMX（FireMonkey的简称）的应用程序开发提供了较大的灵活性。在VCL上面创建动画，需要开发人员用一个TTimer组件，然后不断的移动目标物体的位置，使得目标对象看起来像是动了一样，这需要编写大量的控制代码，而且效果并不是特别理想。
本课将介绍如下的内容：
使用传统TTimer创 ...
Delphi语言详解
Delphi 是一种强大的集成开发环境 (IDE)，它基于 Object Pascal 编程语言，专为快速应用程序开发 (RAD) 而设计。Delphi 的核心是 Object Pascal，它是一种面向对象的 Pascal 语言，由 Borland（后来的 CodeGear，现在是 Embarcadero Technologies）开发并不断演进。Delphi 的目标是让开发者能够通过可视化设计和编译为本地 ...
一步一步学习使用LiveBindings（14）TListView进阶使用（2），打造天气预报程序
在《一步一步学习使用LiveBindings（12）》课中，非常详细的介绍了如何在设计时手工的编辑DynamicAppearance类型的项，大大方便了构建自定义的列表项。但是很多情况下，仍然要面对编程创建列表项的情形，特别是当要实现自定义的列表项时，将不得不面对编程创建列表项的挑战。
注意：更理想的自定义列表项的的方法是为 TList ...
一步一步学习使用LiveBindings（13） TListView的进阶使用（1）
在《一步一步学习使用LiveBindings（12）》中，介绍了如何通过设计面板来定制TListView中Item的显示，虽然方便，但是重用性确也是一个问题；此外，当列表项的内容不固定时，如何能显示完整的内容，就涉及到动态列表项的问题。
本课将介绍如何创建自适应高度的列表项，不但列表项的高度自适应，还演示了如何在列表项中进行图 ...
