自定义博客皮肤VIP专享

*博客头图:

格式为PNG、JPG,宽度*高度大于1920*100像素,不超过2MB,主视觉建议放在右侧,请参照线上博客头图

请上传大于1920*100像素的图片!

博客底图:

图片格式为PNG、JPG,不超过1MB,可上下左右平铺至整个背景

栏目图:

图片格式为PNG、JPG,图片宽度*高度为300*38像素,不超过0.5MB

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+
  • 博客(5)
  • 资源 (1)
  • 收藏
  • 关注

翻译 delphi 助手helper应用之二 线程助手

测试平台 win7 64+ delphixe 10.3功能:多线程访问同一个文档界面:主界面代码:unit MainFormU;interfaceuses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, Vcl.Graphics, Vcl.Controls, Vcl.Forms, ...

2019-04-23 13:15:19 463

原创 Delphi 助手Helpers的用法

Delphi 助手Helpers的用法

2019-04-23 11:18:49 1172

翻译 delphi xe 并行 多线程 队列 TCriticalSection TMutex TSpinlock TMonitor

直接上图:运行结果如下:如代码如下:unit Unit5;interfaceuses System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants, FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialog...

2019-04-21 13:03:17 1869

原创 动态输入指定数量的空格

win7 64 +delphixe 10.3运行效果如下:代码如下procedure TForm5.Button1Click(Sender: TObject);vari,j:integer;begin for I := 0 to 9 do memo1.Lines .add(string.Create(chr(i+48),i)); memo1.L...

2019-04-18 11:29:35 640

原创 firedac datasnap 统计记录数里需加把回记录指针移动最后。

function TServerMethods1.getSalesPersonID(CONST vid :integer):integer;begin try FDQSalesPersonID.Active:=false; FDQSalesPersonID.Params[0].Value:=vid ; FDQSalesPersonID...

2019-04-14 20:19:24 182

delphi 运行时更改程序外观

DELPHI开发的程序,在程序运行时更改程序外观。用代码实现PROJECT/OPTIONS/ Application/Appearance,

2018-10-24

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人

提示
确定要删除当前文章?
取消 删除