SQLSERVER2019最新补丁下载地址https://technet.microsoft.com/en-us/library/ff803383.aspx最新补丁版本对照：https://sqlserverupdates.com/windows2012故障转移群集相关：https://msdn.microsoft.com/zh-cn/library/hh831579(v=ws.11).aspxS…

ExtractFileDrive：返回完整文件名中的驱动器，"C:" ExtractFilePath：返回完整文件名中的路径，最后带/”，"C:\test\"ExtractFileDir：返回完整文件名中的路径，最后不带/,"C:\test"ExtractFileName:返回完整文件名中的文件名(带扩展名)，如"mytest.doc"Extra...

//公用单元函数functiondllform(dllname,funcname:string):DWORD;//DLL动态调用函//获取dll文件路径varmyinifile:Tinifile;DllHandle:THandle;Dllform:TCallBaseForm;beginDllHandle:=LoadLibr...

functionDBGridEhToXlsx(fileneme:string;controlneme:TDBGridEh;SaveDialogname:TSaveDialog):string;///导出数据xls到指定文件夹varPath,Route:string;//SaveDialogname:TSaveDialog;begin//目录...

SynEdit是一个免费的开源语法高亮控件，支持delphi3-2006，下载地址为：http://sourceforge.net/projects/synedit/files/latest/download,安装方法参考delphi的控件安装，以下是需要配置的TSynSQLSyn的属性：1、注释的高亮显示：CommentAttri.Foreground=clGreen2、标识符...

but1_Click///导出数据xls到指定文件夹varPath:string;beginGetDir(0,Path);SaveDialog1.FileName:='生产排程表_'+FormatDateTime('yyyymmddhhnn',now())+'.xls';ExportDBGridEhToXlsx(DBGridE...

DBGridEh1.SortMarkingChanged//字段排序procedureTfrmLRPT01.DBGridEh1SortMarkingChanged(Sender:TObject);vari:Integer;s:String;functionDeleteStr(str:String;sunstr:String):String;...

DBGridEh1.ColWidthsChanged//添加如下代码//双击单列自动适应列宽ifnotAssigned(FilterControlList)thenExit;Indent:=IndicatorWidth+2;fori:=0toDBGridEh1.Columns.Count-1dobegink...

今天终于把纠缠了几天的问题改完了，说到底只是一个很小的问题，就是ADOQuery的一个小属性        把控件DBGridEh的一列的checkbox设为true，将其绑定DataSourceA和DOQuery。用Button添加了一个事件，用来取消对checkbox的操作：ADOQuery....

DBGridEh1.DrawColumnCell//添加如下代码//选择整行变色beginifgdSelectedinStatethenDBGridEh1.Canvas.Brush.Color:=$00F2DCB7;DBGridEh1.DefaultDrawColumnCell(Rect,DataCol,Column,State);end;

Form.Create//添加如下代码begin//最小化程序到任务栏SetWindowLong(Handle,GWL_EXSTYLE,GetWindowLong(Handle,GWL_EXSTYLE)orWS_EX_APPWINDOW);end;

DBGridEh2.DrawColumnCell//添加如下代码//选择整行变色beginifgdSelectedinStatethenDBGridEh2.Canvas.Brush.Color:=$00F2DCB7;DBGridEh2.DefaultDrawColumnCell(Rect,DataCol,Column,State);end;

frm3_qry1.AfterOpen//添加如下代码//自动适应表头或内容列vari:Integer;begininherited;fori:=0toDBGridEh1.Columns.Count-1dobeginDBGridEh1.Columns.OptimizeWidth;DBGridEh1.Col...