delphi
cxgrid显示行号
把cxGridView里OptionsView选项中的两项修改成如下 OptionsView.Indicator = TrueOptionsView.IndicatorWidth = 40//宽度 在customDrawIndicatorCell事...
delphi Canvas font 字体相关
文字的抗锯齿绘制 我们要做的就是修改其Quality属性，该值决定了文字的输出质量，可取值为fqDefault（默认质量）、fqDraft（草稿质量）、fqProof（正稿质...
SQL语句实现SQL Server及ACCESS复制表结构或表结构及内容到新的表
SQL语句实现，SQL Server 2000 及ACCESS复制旧表OldTable的结构，或结构及内容到新的表NewTable两个都试过了，下面的代码在这两个数据库中（SQL Server 2000 ...
FASTREPORT之实现打印固定行数，不足补打空白行的办法
环境 dx10.3.3 fastreport6.9.15 在设置单据的打印模板的时候，我们有时候会遇到这样的情况：单据的内容很少，打印出来的效果不理想的情况，例如 1、单据...
微信支付 沙箱测试
获取 getsignkey 地址 https://api.mch.weixin.qq.com/sandboxnew/pay/getsignkey 可以使用工具postman或者postman的浏览器插件进行调试 postman请求...
delphi 日志框架loggerpro简要使用说明
下载地址：https://github.com/danieleteti/loggerpro 简要使用教程，来自哔哩哔哩，请自行观看 https://www.bilibili.com/video/BV14t411a7HF?spm_id_...
DELPHI高精度计时方法,取毫秒级时间精度
//取毫秒级时间精度(方法一)： var t1,t2:int64; r1:int64; begin t1:=GetTickCount;//获取开始计数 WINDOWS API sleep(1000);{do...}//执行要计...
Delphi 打印 Tprinter
implement uses printers; {$R *.DFM} procedure TForm1.BitBtn1Click(Sender:TObject); begin PrinterSetupDialog1.Execute;//选择输出的打印机以及...
delphi的正则表达式子串替换
让字符串不区分大小写就可以了! uses PerlRegEx; //uses 正则表达式单元 procedure TForm1.FormCreate(Sender: TObject); var reg: TPerlRegEx; //声明正则...
DBGridEh列宽自动适应内容的简单方法
方法一： DBGEMainList是DBGridEh组件，mOffset是自定义变量，这里赋值是5 DBGEMainList.Columns[I].Width := Max(DBGEMainList.Columns[I].Field.Tag, DBGEM...