Delphi WMI[1] 安装、导入
Delphi WMI[1] 安装、导入
提供代码 WbemScripting_TLB.pas ，修改部分错误 ：
unit WbemScripting_TLB;
{$WARN UNSAFE_TYPE off}
{$WARN UNSAFE_CAST off}
{$WARN UNSAFE_CODE off}
{$WARN SYMBOL_PLATFORM OFF}
{$WARN SYMBOL_LIBRARY OFF}
{$WARN SYMBOL_DEPRECATED OFF}
// ********************* ...
DELPHI的FireDac连接池单元
(******************************************************************************* FireDac连接池*******************************************************************************池满的情况下 池子DAC连接 动态创建系统默认池子中 一个小时以上未用的 TFDConnection 连接 系统自 ...
在Delphi中高效执行JS代码
因为一些原因，需要进行encodeURIComponent和decodeURIComponent编码，在Delphi中找了一个，首先是发现不能正确编码+号，后面强制处理替换了，勉强可用。
后面发现多次使用后delphi自带的HttpEncode会报Out of Memory.
以上可能是我使用的不好，但没有找到解决办法。
后面想到直接采用运行JavaScript代码，找到了”万一的 D ...
delphi jwt
delphi jwt
JWT使用流程如下：1）用户使用用户名密码来请求服务器2）服务器进行验证用户的信息3）服务器通过验证发送给用户一个token4）客户端存储token，并在每次请求时附送上这个token值5）服务端验证token值，并返回数据
说明：token是服务端签发的，TOKEN是经过加密且base64url()算法后得到的字符串。
优点1）JWT是可以 ...
Delphi 11 最新消息
2022年3月16日，Delphi 11.1发布！下面内容没有意义，直接看：Delphi 11.1 发布
官宣，Delphi原来的10.5版本，改成Delphi 11，这也是紧随Windows 11，Mac OS 11改的。
目前已经开始内测，预计2月内能发布！
2021-07-28：最新更新文档。
2021-08-23：越来越近了！
2021-09-09：官方发布：
https://altd.embarcadero. ...
Delphi中的泛型
-------------Delphi7没有泛型
开发环境是Delphi XE （是XE，不是XE2，不是XE10）
-------------------
--------------Unit 开始-
1 unit Unit1;
2
3 interface
4
5 uses
6 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
7 Dialogs, StdCtrls, ExtCtrls, ...
delphi中常见错误提示说明
Delphi的中文错误提示
';' not allowed before 'ELSE' ElSE前不允许有“;”'' clause not allowed in OLE automation section 在OLE自动区段不允许“”子句'' is not a type identifier 不是类型标识符'' not previously declared as a PROPERTY 前面没有说明PROPERTY'GOTO ' leads into or out of ...
delphi使用RichView控件 RichView组件介绍
RichView组件介绍
介绍
用于显示、编辑和打印复杂的富文本文档的组件。
TRichView 可用于开发高级文本编辑器、网络/帮助/书籍创作应用程序、聊天和邮件、多媒体百科全书以及其他需要高质量富文本编辑器或超文本用户界面的应用程序。
功能列表
富文本和段落格式
自定义字体、颜色、对齐方式、缩进...
文档中的图像
Gif 动画 ...
Delphi 事件OnCanResize、OnConstrainedResize、OnResize
Delphi 事件 OnCanResize、OnConstrainedResize、OnResize
1、OnCanResize //尝试调整控件大小时发生。
原型：
type TCanResizeEvent = procedure(
Sender: TObject; //Sender是正在调整大小的对象。
var NewWidth, //NewWidth返回对象的新宽度。
NewHeight: Integer; //NewHeight返回对象 ...
Delphi使用Zxing创建二维码
效果
DelphiZXingQRCode下载地址:https://www.debenu.com/open-source/delphizxingqrcode/
为了调用方便unit DelphiZXIngQRCode增加了一个过程
procedure EncodeToImage(const text: string; const Img: TImage);
procedure TDelphiZXingQRCode.EncodeToImage(const text: string; const Img: TImage);
var
Row, Colum ...
Delphi
P1 第一个程序
直接在界面上可加入label、edit文本框以及button按钮
双击图标可进入编程界面
visible：是否可见
showhint hint：悬浮
edit1.text：给edit1添加文本
edit1.Text:='hello';
close：关闭
close;
:= ：赋值符号
； ：语句的结束
caption：修改文字
P2 基本数据与表达式1
整型:integer
实型:Real
字符型:Char
...
企业服务资源数字化
企业服务资源数字化
咏南微服务使用2种接口：rest api 和 google protobuf。
换用这2种有公共协议的序列和接口，因为考虑支持跨语言。
rest api 使用json序列，google protobuf是二进制序列，json是明文，google protobuf 因为是二进制，所以效率高于JSON。
google prot ...
Delphi中MediaPlayer简单使用--播放视频
------------------
仅做简单的测试，只想看看怎么播放视频，不想弄这个，有兴趣的可以深入了解，谢谢！
要想更深入了解请参考：Delphi多媒体设计之TMediaPlayer组件（一） - pchmonster - 博客园 https://www.cnblogs.com/pchmonster/archive/2012/07/12/2588846.html
--------------------
-------- ...
【delphi】基础知识
本文参考自《delphi2010语法手册》
转至 https://www.cnblogs.com/thingk/p/3747541.html
1. 工程文件结构
源文件联系着unit单元，delphi主模块源文件格式为.dpr，其他模块为.pas，一个完整程序由一个.dpr和若干.pas组成。
2..dpr 程序结构
一个.dpr由程序头、[use从句]、主程序块组成。一个典型工程文件如下：
1 program ...
Delphi Controls （控件）和Components （组件）的区别
Delphi Controls （控件）和Components （组件）的区别
Components //列出该组件拥有的所有组件。
property Components[Index: Integer]: TComponent;
使用组件访问此组件拥有的任何组件，例如窗体拥有的组件。当按编号而不是名称引用所拥有的组件时，Components属性最有用。它也在内部用于迭代处理所有拥有的组件 ...
Delphi XE UniGUI 之布局
Delphi XE UniGUI 之布局
1、常用布局属性：
AlignmentControl：
uniAlignmentServer //基于像素的Delphi绝对对齐
uniAlignmentClient //基于所选的布局和另外两个属性(LayoutAttribs和LayoutConfig)请求客户端对齐
Layout ：
absolute //每个组件将使用预先定 ...
Delphi中Indy10的IdTcpClient和IdTcpServer数据通信
---------例子是XE的----
只是本人测试的，仅供学习！代码很乱！
在一个程序中测试 IdTcpClient和IdTcpServer有点坑，
测试的时候最好写Client和Server两个程序测试
--------------------
-------------------------Unit开始
unit Unit1;
interface
uses Windows, Messages, SysUtils, Variants ...
ImGui-imgui介绍
相关资料：
http://t.zoukankan.com/jhy16193335-p-11184676.html
创建窗口
ImGui::Begin("Hello, world!");
ImGui::End();
其中, ImGui::Begin("Hello, world!");函数的原型是IMGUI_API bool Begin(const char* name, bool* p_open = NULL, ImGuiWindowFlags flags = 0);p_open决定了他是否是打开状 ...
Delphi 10.4.2 发布三个补丁的说明及安装方法
这是官方的说明：https://blogs.embarcadero.com/rad-studio-10-4-2-general-patch-and-delphi-compiler-patch/
这下官方的下载地址：
http://altd.embarcadero.com/getit/public/libraries/Patches/CompilerPatch-20210430.zip
该补丁解决了10.4.2中的Delphi编译器中存在的性能问题以及内存占用问题，因此，该补丁也提升了 ...
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 下就需要在 ...
