g58521547-CSDN博客

转载 delphi xe10.4 TTASKDIALOG帮助介绍-非官方

Ttaskdialog的官方帮助文件介绍了一些属性，但是找了很久没有看到事件处理函数中具体的参数介绍。实在不知道怎么使用定时关闭功能。转发一个国外的非官方的介绍。以做备忘。https://specials.rejbrand.se/TTaskDialog/Andreas Rejbrand, 2011-02-13See also:Task Dialog Message Box with Fluent InterfaceThis document is an inofficial documentation f

2026-05-31 10:05:55 19

原创 DELPHI dbexpress查询mysql中文显示乱码和？的情况

使用delphi 10.4.2的tsqlconnection+tsqlserver+tdatasetprovider+tclientdataset+tdatasource+tdbgrid查询mysql的记录时。2. ServerCharSet=GB2312, UTF8, characterset=空或者utf8,或者GB2312，可以正确显示。1. ServerCharSet=空或者其他字符集，除了gb2312,utf8，characterset=空时，中文显示：？mysql的字符集是utf8mb4。

2026-05-03 19:10:52 29

原创 XLSREADWRITEII5的onUserfunction说明

XLSReadWriteII组件通过OnUserFunction事件处理非标准Excel函数调用。该事件提供TXLSUserFuncData对象，包含多种方法属性用于处理函数参数：获取参数数量(ArgCount)、引用维度(Dimensions)、参数类型(RefType/ArgType)、值转换(AsBoolean/AsFloat等)及区域值处理(AreaAsBoolean等)。组件还支持设置不同格式的结果(ResultAsBoolean等)。OnFunction事件虽存在但未被使用，仅用于兼容性维护。

2026-03-15 08:14:46 348

原创 delphi TMS tadvstringgrid的一个合并单元格bug

tms advstringgrid,在合并某行的单元格，赋值之后。如果在多列中添加checkbox会导致合并的单元格值清空了。不知道怎么回事，有谁知道怎么解决吗？

2025-07-13 10:21:07 347

原创 DELPHI 获取bios序列号

delphi xe10.4, windows10获取bios序列号。

2024-08-31 06:16:13 517

原创 delphi xe10自定义stringgrid组件，添加stringlist属性，在设计时显示各列表头内容

delphi xe10自定义stringgrid组件，添加stringlist属性，显示在各列表头，方便设计时查看

2024-08-17 07:50:37 530

原创 DELPHI XE10, 使用TCOLLECTION类在设计期给stringgrid添加一列表头

delphi的自定义控件stringgrid中添加一列表头，以便在设计期可以直观显示各列内容。使用TCOLLECTION类。

2024-08-16 17:12:58 381

原创 delphi 复制粘贴excel的单元格内容到stringgrid

从stringgrid复制到粘贴板时，如果stringgrid的单元格内有换行的话，需要在字符串的前后加上双引号,并且行内的换行符替换为#10,因为delphi认可#13#10，而excel用#10表示换行",粘贴到stringgrid的时候，需要把excel的#10换为#13。

2024-06-19 21:51:59 524

原创 delphi xe10.4.2 datasnap fdmemtable如果传输的stream超过32kb 显示错误712

如题， delphi datasnap三层，服务器端 fdconnection+fdquery, +mysql 使用 getdata函数根据sql语句查询数据表并且返回stream给客户端，客户端使用sqlconnection+dsproviderconnection链接，如果取得的stream超过32kb(32768）的话，会显示 stream.size=-1,并且 fdmemtable不能读取流。 procedure TMainForm.Button1Click(Sender: TObjec

2022-05-22 20:35:09 811

原创 delphi xe10.4.2 tabletojson函数显示E2033错误

如题，测试了一下使用tdbxjsontools.tabletojson函数，第一个参数如果如下写法acommand.executequery那么显示 function TServerMethods1.getData: string; var acommand:tdbxcommand; areader:TDBXReader; begin result:=''; self.SQLConnection1.open; //self.SQLConnection1.Param

2022-04-17 12:45:33 718

原创 delphi xe10.4.2 datasnap客户端接收dataset返回值

datasnap 服务器端使用 fdquery+fdconnection,服务器端有一个服务方法getdataset(sqltext:string):tdataset; 客户端使用dbgrid+datasource+datasetprovider+sqlservermethod+sqlconnection 如果 self.ClientDataSet1.Close; self.ClientDataSet1.RemoteServer := nil; self.ClientDataSet1...

2022-01-29 12:30:31 2630

原创 delphi clientdataset.appenddata不能用于有聚合字段的数据集

delphi xe7, 有两个cds(cds1, cds2), cds1.commandtext='select a.id,sum(b.price*b.qty) from table1 left join table2 on a.orderno=b.orderno group by a.orderno cds1的查询语句中有sum函数，查出的数据值正确的。 cds2.appenddata(cds1.data,true); 但是如果复制给cds2,就不正确了。比如cds1的记录sum值是825，

2021-11-02 16:54:53 574

原创 delphi tclientdataset字段显示type mismatch

delphi xe7, MYSQL 5.6,表中有个自增长字段 ’id',unsigned,not null 三层客户端的tclientdataset的设计阶段添加所有的字段，包括一个自增长字段id, 运行时就显示 type mismatch for field 'id', expecting autoinc, actual longword. 然后把cds的字段编辑器中id字段删除，手动添加，也不行。最后只能把表的字段定义改为SIGNED（无符号改为有符号); cds就正常了。 ...

2021-10-03 10:43:58 515

原创 delphi 调用dll，添加sharemem的位置。

如题 delphi 调用外部的dll，需要在项目的dpr文件中uses第一个添加sharemem,而不是窗体form的pas文件中添加，否则程序关闭后无法正常结束进程。 program Project1; uses ShareMem,Vcl.Forms, Unit1 in 'Unit1.pas' {Form1}; 另外在form中申明dll的函数/过程时，函数名必须和dll中的保持一致，但是形参的名称可以不同： var Form1: TForm1; implementatio

2021-09-11 17:14:01 708

原创 DELPHI XE7 Dbgrid 读取 excel显示external error 40000015

测试环境， win10家庭版， XE7，窗体FORM上有一个dbgrid，clientdataset, 通过ole读取excel的数据，总共42行，每次读取到26行左右，就会显示external error 40000015,然后主程序异常自动退出了。如果少于这么多行，就能顺利读取到cds。后来通过反复测试，知道到原因如下： cds上字段编辑器里面除了物理表的字段以外，增加了3个字段（vendorname, desen,deschn)，都设置为内部计算字段，没有cds的计算事件写代码，只是在这三个字段

2021-08-25 16:42:57 407