随笔分类 -  Delphi

Delphi 的学习记录
摘要:delphi自带的Json单元读取Json还是特别方便的。如下: { "date": "2014-03-04", "error": 0, "results": [ { "currentCity": "成都", "weather_data": [ { "date": "周二(今天, 实时:12℃)", 阅读全文
posted @ 2020-12-23 15:25 沂水蓝海 阅读(577) 评论(0) 推荐(0)
摘要:单元代码如下: unit Pkg.Json.DTO; interface uses System.Classes, System.Json, Rest.Json, Rest.JsonReflect; type TJsonDTO = class private FOptions: TJsonOptio 阅读全文
posted @ 2020-12-16 10:28 沂水蓝海 阅读(189) 评论(0) 推荐(0)
摘要:Delphi Delphi 中的overload 重载override 覆盖abstract(抽象方法)方法术语 overload 重载 名字相同,而参数类型或者数量不同的过程,称之为重载。 override 覆盖方法 父类声明时必须是虚方法(virtual)或者是动态方法(dynamic) 虚方法 阅读全文
posted @ 2020-07-26 19:40 沂水蓝海 阅读(352) 评论(0) 推荐(0)
摘要:一开始没有集成到exe单文件里的时候我用的笨方法CopyFile(pchar('SYSlanhai.dll'), pchar('SYSManage.exe'), False); //复制文件 这样,有多个文件的时候很不方便,集成到exe里简单、稳定、速度快。 过程: 创建一个文本文件,然后将资源文件 阅读全文
posted @ 2020-07-26 14:28 沂水蓝海 阅读(1265) 评论(0) 推荐(0)
摘要:delphi字符串操作集 1.copy 字符串的复制操作,有3个参数: copy(源数据,复制起始位置(含),复制长度) 2.LeftStr ,RightStr (所在单元:StrUtils) 功能说明:返回字符串左(右)边指定个数的新字符(串)。该函数有两个参数。第一个参数为完整的字符串,第二个参 阅读全文
posted @ 2020-06-24 15:19 沂水蓝海 阅读(679) 评论(0) 推荐(0)
摘要:Delphi中的text转换为utf8格式的使用如下; procedure TForm22.bt1Click(Sender: TObject); var s: string; begin s := Edit1.Text; //你好。ABC123 edit2.Text := Utf8Encode(s) 阅读全文
posted @ 2020-06-19 09:23 沂水蓝海 阅读(1566) 评论(0) 推荐(0)