procedure THRForm.Button1Click(Sender: TObject); var D:TDateTime; s:string; begin D:=VarToDateTime('05-10-14 04:35PM'); S:=FormatDatetime('YYYY-MM-DD ... ...
如果你不要行标志的话,你可以不改控件 直接注释掉这一行: ASender.LookAndFeelPainter.DrawIndicatorImage(ACanvas, ATextRect, AIndicatorViewInfo.IndicatorKind); 要标志的话,在DrawIndicator ...
此文章为第三课部分，请结合原创内容一起浏览。 相信第三课可以淘汰掉99%的人，只有1%可以看明白。这建立在他熟悉delphi语言的情况下。总所周知，很多人穷极一生也就会一门两门语言。 作者教你挖掘和发现漏洞，我补充学习法。他们是如何掌握多门语言的。 我们应该明白一个现状：及作为白帽子，我们会随时遇到 ...
分类：
编程语言 时间：
2019-02-24 00:27:26
阅读次数：
197
1、Bookmark var p:pointer; procedure TForm1.Button1Click(Sender: TObject);//加个标签 begin p:=cxGrid1DBTableView1.DataController.DataSet.GetBookmark; end; ...
Delphi maskedit控件的掩码含义及用法方法 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 ...
delphi services允许跨域访问 unit WebModuleUnit1; ...
10.3.1发布了，这个版本可以独自安装，是对Delphi 10.3 Rio，C ++ Builder 10.3 Rio和RAD Studio 10.3 Rio的更新。如果安装了2018年11月发布的10.3 Rio，那需要完全卸载旧版本，才能安装新版本，这很麻烦，但是可以使用设置合并工具来保留旧版 ...
Grid++Report是为优秀的报表控件，子报表是其重要功能之一，但Grid++Report提供的网页报表示范主要是以页面为主的，UniGui在Delphi中以快速编写web管理软件著称，但由于资料文档很少，经过摸索，Grid++Report的子报表要在uniGUi中正确获取子报表数据，只能通过A ...
分类：
其他好文 时间：
2019-02-15 01:09:08
阅读次数：
373
var IsHave:Boolean; begin adoquery.first; while(not adoquery.eof) do begin if(adoquery.fieldbyname('列名').asstring="用户添加的值") then begin IsHave=True; br... ...
问题来源: http://www.cnblogs.com/del/archive/2008/11/14/1120015.html#1370413 StrUtils 单元和 Math 单元 分别有一个 IfThen 函数（注意参数是数字还是字符串）, 举例: ...
