如何访问类的私有属性？ 下面以 TPathData 为例，它有一个私有属性 PathData，储存了每一个曲线点，但一般无法修改它，需要利用下面方法，才能访问修改（若有更好的方法，歡迎分享）： 一、利用 RTTI 取得类私有属性 （建议使用此方法） ： type TPathDataHelper = cla...

2018-06-17 18:57:42 delphi

本文来自：http://www.cnblogs.com/hezihang/p/6083555.html Delphi采用接口方式设计模块，可以降低模块之间的耦合，便于扩展和维护。本文提供一个实现基于接口(IInterface)方式的监听器模式（观察者模式、订阅者模式），实现一个自动多播器。 下面程序在Berlin下测试...

2018-06-17 18:57:41 delphi

TeeChart控件的安装 TeeChart 7.0 With Source在Delphi 7.0中的安装 一、删除Delphi7自带TeeChart 1、Component- install Packages 中 Remove 所有以Tee开头的包,OK,关闭Delphi7。 2、删除Delphi\Bin目录下的DclTee70.bpl; 3、删除 \Windows\System32(或System)目录的...

2018-06-17 18:57:36 delphidelphi7

在 Delphi10.2Tokyo 版里将支持 Linux 系统，先做一下学习记录： 安装 Ubuntu Server: 安装方法请参考官方教学影片： https://community.embarcadero.com/blogs/entry/setting-up-ubuntu-server-for-the-delphi-on-linux-beta Ubuntu Server 下载： https://www.ubuntu...

2018-06-17 18:57:35 delphi

uses superobject;procedure TForm1.FormCreate(Sender: TObject);var aJson: ISuperObject;aSuperArray: TSuperArray; i:Integer;begin {1、赋初值} aJson:=SO('{"zoo":"涂磊动物园","animals":[{"name":"猴子","year":"12"},{"name":"老虎","year":"132"}]}'); {2、...

2018-06-17 18:57:34 delphi

uses HtmlParserprocedure TForm4.Button1Click(Sender: TObject);var FNodes:IHtmlElement; aString:string;begin FNodes := parserHtml(Memo1.Text); aString:= FNodes.Children[2].Children[1].Children[5].Children[0].InnerText;end; // 判断某子结点是否存在,增...

2018-06-17 18:57:32 delphi

官网 http://www.overbyte.be/ 下载 OverbyteIcsV816完成后解压到E:\Delphi7\OverbyteIcsV816\ 1、在library里加入E:\Delphi7\OverbyteIcsV816\Source目录。 2、从File-Open中打开E:\Delphi7\OverbyteIcsV816\Install\D7Install.bpg文件。(文件名在其它Delphi版本略有...

2018-06-17 18:57:27 delphidelphi7

说明：在 Firemonkey 在移动平台 Android iOS 要直接在 Canvas 画出 1 点像素的线，似乎有点困难，不过利用一点小技巧，还是能达到这个要求的，首先要建立一个 Bitmap 并将大小乘以目前机子的 Scale ，再开始绘图即可。 源码下载： https://github.com/OneChen/TestDra...

2018-06-17 18:57:27 delphi

abort 函数 引起放弃的意外处理 addexitproc 函数 将一过程添加到运行时库的结束过程表中 addr 函数 返回指定对象的地址 adjustlinebreaks 函数 将给定字符串的行分隔符调整为cr/lf 序列 allocmem 函数 在堆栈上分配给定大小的块 ansicomparestr 函数 比较字符串（区分...

2018-06-17 18:57:26 delphidelphi开发

iOS 上架一個新版本号，就改个版号数字就好，有什么好说的？ 是啊~ 如果上架顺利的话，就没什么好说的，如果被退件，再上传更新时，那版号怎么改？ 下面说说我的做法（这只是建议，版号随自己喜好，没有固定章法） 例如我要上架一个新版，在 iTunues Connect 里，加入...

2018-06-17 18:57:24 delphi