使用cnpack快速复制单元
摘要：
cnpack对于Delphi开发者来说，应该众所周知的，我就不多说了。 今天非常高兴向大家介绍即将到来的新版本，将增加新的功能：复制当前单元，如下图： 为什么增加这个功能呢？ 这得从Delphi的另存为功能说起，如下图： 通过这个功能，我们可以把一个单元保存为一个新的单元文件，这表面上没有问题，但对 阅读全文
kbmMW 5.19 Debug状态编译的Android应用闪退的原因
摘要：
用Debug调试，提示这个信息，跟踪代码，出下面图中的行上： 在android上，上图中的这一行有问题，用Debug编译的app会闪退，检查这个函数，发现这个函数，result返回类型是Integer,而TThread.CurrentThread.tThreadID类型是cardinal,在Debu 阅读全文
Delphi 11.1 在FMX Image上画图遇到坑
摘要：
上图是运行后的结果，正常左右两图应该是一样的结果，都在图上画出一个红框。 下图是实现的代码： unit Unit1; interface uses System.SysUtils, System.Types, System.UITypes, System.Classes, System.Varian 阅读全文
Unknown picture file extension (.jpg)
摘要：
VCL下的TImage，加载一个Jpg文件时，出这个提示，无法加载： Image1.Picture.LoadFromFile(fn1); 不认识这个文件格式，如果在设计期是可以调入对应的图片的。查了半天代码，原来，如果使用jpg文件，我们要引用Vcl.Imaging.jpeg。 在uses部分引用V 阅读全文
用原生TBase64Encoding实现文件与Base64串互相转换
摘要：
将一个文件转换成Base64编码串： function FileToBase64(fn: string): string; var msSource: TMemoryStream; msTarget: TStringStream; str: string; base64: TBase64Encodi 阅读全文
Delphi 11.1 解决高分屏下设计期窗口显示太小的问题
摘要：
升级到Delphi 11.1了，遇到个问题，当打开旧的VCL项目，显示的太小了，如下图一样： 第一步，用代码取得窗口在运行期的PixelsPerInch值。代码如下： procedure TMainForm.FormCreate(Sender: TObject); begin ShowMessage 阅读全文
Delphi 11 ListView实现删除一行
摘要：
实现下图的界面，用ListView显示一个数据集的内容： 点Delete删除所在行，下面是实现的代码： procedure TForm3.FormCreate(Sender: TObject); var I: Integer; begin //prepare dataset for I := 1 t 阅读全文
手工为Delphi设置Android SDK.
摘要：
1.把下载的文件解压到这个目录： C:\Users\Public\Documents\Embarcadero\Studio\22.0\CatalogRepository\ 2.重新设置sdk目录： 阅读全文
Delphi 11.1 发布
摘要：
RAD Studio, Delphi, C++Builder 11.1 ISO https://altd.embarcadero.com/download/radstudio/11.0/RADStudio_11_1_esd_10_8973a.iso https://blogs.embarcadero 阅读全文