g58521547
码龄23年
求更新 关注
提问 私信
  • 博客:10,907
    社区:14,182
    问答:49
    25,138
    总访问量
  • 16
    原创
  • 16
    粉丝
  • 17
    关注
IP属地以运营商信息为准,境内显示到省(区、市),境外显示到国家(地区)
IP 属地:上海市
加入CSDN时间: 2002-11-03
博客简介:

g58521547的专栏

查看详细资料
个人成就
  • 获得15次点赞
  • 内容获得0次评论
  • 获得3次收藏
  • 博客总排名75,212名
  • 原力等级
    原力等级
    2
    原力分
    94
    本月获得
    11
创作历程
  • 1篇
    2025年
  • 4篇
    2024年
  • 3篇
    2022年
  • 7篇
    2021年
  • 1篇
    2019年
成就勋章
TA的专栏
  • VCL
    3篇
  • DELPHI
    7篇
  • datasnap
    6篇
  • EXCEL OLE
    1篇
  • 邮件程序
    1篇
  • 杂文

TA关注的专栏 0

TA关注的收藏夹 0

TA关注的社区 1

TA参与的活动 0

创作活动更多

新星杯·14天创作挑战营·第13期

这是一个以写作博客为目的的创作活动,旨在鼓励大学生博主们挖掘自己的创作潜能,展现自己的写作才华。如果你是一位热爱写作的、想要展现自己创作才华的小伙伴,那么,快来参加吧!我们一起发掘写作的魅力,书写出属于我们的故事。我们诚挚邀请你们参加为期14天的创作挑战赛!注: 1、参赛者可以进入活动群进行交流、互相鼓励与支持(开卷),虚竹哥会分享创作心得和涨粉心得,答疑及活动群请见:https://bbs.csdn.net/topics/619781944 【进活动群,得奖概率会更大,因为有辅导】 2、文章质量分查询:https://www.csdn.net/qc

89人参与 去参加
  • 最近
  • 文章
  • 专栏
  • 代码仓
  • 资源
  • 收藏
  • 关注/订阅/互动
更多
  • 最近

  • 文章

  • 专栏

  • 代码仓

  • 资源

  • 收藏

  • 关注/订阅/互动

  • 社区

  • 帖子

  • 问答

  • 课程

  • 视频

搜索 取消

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

tms advstringgrid,在合并某行的单元格,赋值之后。如果在多列中添加checkbox会导致合并的单元格值清空了。不知道怎么回事,有谁知道怎么解决吗?
原创
博文更新于 2025.07.13 ·
185 阅读 ·
2 点赞 ·
0 评论 ·
0 收藏

DELPHI 获取bios序列号

delphi xe10.4, windows10获取bios序列号。
原创
博文更新于 2024.08.31 ·
381 阅读 ·
4 点赞 ·
0 评论 ·
1 收藏

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

delphi xe10自定义stringgrid组件,添加stringlist属性,显示在各列表头,方便设计时查看
原创
博文更新于 2024.08.17 ·
384 阅读 ·
3 点赞 ·
0 评论 ·
0 收藏

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

delphi的自定义控件stringgrid中添加一列表头,以便在设计期可以直观显示各列内容。使用TCOLLECTION类。
原创
博文更新于 2024.08.17 ·
248 阅读 ·
2 点赞 ·
0 评论 ·
0 收藏

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

从stringgrid复制到粘贴板时,如果stringgrid的单元格内有换行的话,需要在字符串的前后加上双引号,并且行内的换行符替换为#10,因为delphi认可#13#10,而excel用#10表示换行",粘贴到stringgrid的时候,需要把excel的#10换为#13。
原创
博文更新于 2024.06.23 ·
366 阅读 ·
3 点赞 ·
0 评论 ·
1 收藏

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 ·
713 阅读 ·
0 点赞 ·
0 评论 ·
0 收藏

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 ·
584 阅读 ·
0 点赞 ·
0 评论 ·
0 收藏

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 ·
2526 阅读 ·
0 点赞 ·
0 评论 ·
0 收藏

delphi Xe7 Dbgrid前面增加一列显示行号

dbgrid-->datasource-->clientdataset, 如果在数据库的表中没有行号这个字段的话,要在dbgrid前面一列增加一列显示行号1,2,3.。。。可以如下操作,个人觉得比较简单:按照步骤:1.clientdataset字段编辑器双击打开,先把数据库中要显示的字段都添加进来addall fields, 然后增加一个字段id,类型fieldkind为fkInternalCalc (fkcalculate不行会出错),然后在这个字段的onGetText事件中写上如
原创
博文更新于 2021.12.13 ·
1151 阅读 ·
0 点赞 ·
0 评论 ·
1 收藏

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.ordernocds1的查询语句中有sum函数,查出的数据值正确的。cds2.appenddata(cds1.data,true);但是如果复制给cds2,就不正确了。比如cds1的记录sum值是825,
原创
博文更新于 2021.11.02 ·
472 阅读 ·
0 点赞 ·
0 评论 ·
0 收藏

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 ·
423 阅读 ·
0 点赞 ·
0 评论 ·
0 收藏

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 ·
634 阅读 ·
0 点赞 ·
0 评论 ·
1 收藏

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 ·
347 阅读 ·
0 点赞 ·
0 评论 ·
0 收藏

DELPHI STRINGGRID单元格输入字符& 怎么自动变成一个_下划线了?

答:

TSTRINGGRID哪里有设置格式的地方?没找到啊

回答问题 2021.08.09

DELPHI STRINGGRID单元格输入字符& 怎么自动变成一个_下划线了?

发布问题 2021.08.07 ·
2 回答

delphi 操作excel,设置range的表示

delphi xe7,通过OLE操作excel,设置 某个range的单元格颜色excelApp.activesheet.range[excelApp.cells[i + startRow, 1], excelApp.cells[i + startRow, gridcol]] .interior.colorindex := 43range要用[],不是(),range[cell1,cell2]的单元格地址,不能从0开始。
原创
博文更新于 2021.06.26 ·
613 阅读 ·
0 点赞 ·
0 评论 ·
0 收藏

delphi的form 窗体返回值modalResult值问题

主窗体FORM1窗体调用模态显示form2之后,需要根据form2.showmodal返回值判断。form1窗体的button1click事件中:procedure TfmMain.mmLogonClick(Sender: TObject);var mr:TModalResult;begin try fmLogon := tfmlogon.Create(self); mr:=fmLogon.ShowModal; if mr= m
原创
博文更新于 2021.04.26 ·
771 阅读 ·
0 点赞 ·
0 评论 ·
0 收藏

delphi XE7+ INDY 10.6测试邮件发送接收功能

记录如下的关键地方,存档xe7自带的indy 组件是10.6版本,1. 接收邮件时, 如果邮箱容量超过2GB的话,idpop3的检查检索邮件数量的函数返回值就会出错。今天2019.12.3在indy 官网看到 indy 10已经更新了组件的 相关类型从integer 改为 int64.vari:integer;begin i:=0; self.IdPOP31.H...
原创
博文更新于 2019.12.03 ·
878 阅读 ·
0 点赞 ·
0 评论 ·
0 收藏
加载更多