-
DBGridEh1.GetCellParams // 横向斑马
DBGridEh1.GetCellParams//添加如下代码//横向斑马beginifDBGridEh1.SumList.RecNomod2=1thenBackground:=$00ECFFFBelseBackground:=$00E7F9CE;end; -
温故Delphi之TreeView
TreeView是Delphi中使用频率比较高的一个控件，虽然使用次数很多，但总结不够。借着这次做GDW原型的机会总结一下，写的过程中也会参考网上的博文TTreeView、TTreeNodes和TTreeNodeTTreeView由节点构成，建树通过对TreeView.items属性进行操作。Items是一个TTreeNodes对象，这是一个TTreeNode集... -
delphi执行查询语句时的进度条怎么
procedureTForm1.FormCreate(Sender:TObject); begin ADOQuery1.ExecuteOptions:=;//设为异步读取 end; //ADOQuery的OnFetchProgress事件 ... -
主程序与DLL之间的全局变量问题
有几个朋友经常向我问题在DLL中怎么共用一个全局变量。比如像用户登陆后的用户(UserName)...其实这个问题很简单。下面我把我的做法写出来大家一起分享把共享的变量放在主程序里:UserName,....等等,在主程序里写两个函数FunctionCurUserName():PChar;beginResult:=pchar(UserName);en... -
delphi编程创建桌面快捷方式
usesActiveX,ComObj,StdCtrls,ShlObj,FileCtrl;procedureTForm1.N2Click(Sender:TObject);vartmpObject:IUnknown;tmpSLink:IShellLink;tmpPFile:IPersistFile;PIDL:PItemIDList;Sta... -
数据库还原失败System.Data.SqlClient.SqlError: 无法执行 BACKUP LOG，因为当前没有数据库备份
结尾日志的问还原选择中去掉结尾日志就可以 -
主程序与DLL之间的全局变量
1.在Project1.Form1上拖一 Button整个Unit1源码如下unitUnit1;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,IDataModule,StdCt... -
DELPHI 调用DLL文件中FORM的调用[2]
主程序：unitUnit1;interfaceuses Winapi.Windows,Winapi.Messages,System.SysUtils,System.Variants,System.Classes,Vcl.Graphics, Vcl.Controls,Vcl.Forms,Vcl.Dialogs, ... -
SQL SERVER 2012 数据库日志清理语
--2017719--SQLSERVER2012日志清理,其他版本未经测试请慎DECLARE@IDINT,@NAMESVARCHAR(255),@SQLVARCHAR(500),@SDBFVARCHAR(255),@SQLSVARCHAR(255),@SVARCHAR(255),@REPTNVARCHAR(255)SET@SDBF='sys.database_files' -
StrUtils 中的 Ansi 字符串函数DEMO
unitUnit1;interfaceuses Winapi.Windows,Winapi.Messages,System.SysUtils,System.Variants,System.Classes,Vcl.Graphics, Vcl.Controls,Vcl.Forms,Vcl.Dialogs,Vcl.StdCtrls,StrUtils;... -
Delphi 中的字符串函- SysUtils 中的 Ansi 字符串函数（2
//对比字符串是不是一:AnsiSameStr、AnsiSameTextvar ss,s:AnsiString; b:Boolean;begin ss:='abc'; s:='ABC'; b:=AnsiSameStr(ss,s); {区分大小写}&nbs... -
Delphi 中的字符串函- StrUtils 中的 Ansi 字符串函数（1
//从左右两端提取指定数目的字符:AnsiLeftStr、AnsiRightStrvar ss,s:AnsiString;begin ss:='abcdefg'; s:=AnsiLeftStr(ss,2); ShowMessage(s);{ab} s:=AnsiRightStr(ss,... -
TcxCheckComboBoxItems.Add
TcxCheckComboBoxItems.AddTcxCheckComboBoxItemsSeeAlsoCreatesanewitemandaddsittotheitemscollection.functionAdd:TcxCheckComboBoxItem; DescriptionTheAddfunctionenablesy...