-
主程序与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... -
TcxCheckComboBoxItems.AddCheckItem
TcxCheckComboBoxItems.AddCheckItemTcxCheckComboBoxItemsSeeAlsoCreatesanewitemwiththespecifiedcaptionandaddsittothecurrentcollection.functionAddCheckItem(constADescription:TCap... -
cxCheckCombobox里实现checked和获取Itemindex
今天用cxCheckCombobox,准备获取cxCheckCombobox里所有被checked的Items的Itemindex,通过个人的思考和从网络上获取的参考,用cxCheckCombobox实现以上功能主要有两种方法。如下:uses cxLookAndFeelPainters;………var Form1:TForm1;&nbs... -
[转]Delphi TcxComboBox控件说明
属性: Text:ComboBox的文本信 EditText:也是给ComboBox的文本信息赋值,但不同的给Text赋值会触发Change事件,也会触EditvaluesChange事件而且EditText只会触发 ... -
给查询出的SQL记录添加序号(,很实用!)
给查询出的SQL记录添加序号列,解决方法有以下两第一 selectROW_NUMBER()OVER(ORDERBYa.字段ASC)ASXUHAO,a.*fromtablea(table为表名,字段为表a中的字段)第二 selectRANK() OVER(ORDERBYa.字段ASC)ASXUHAO,... -
女程序员的尴尬事
世界上第一位程序员,不仅思绪敏捷,聪颖过人,而且还貌美如花。她就是英国著名诗人拜伦的女儿爱达?拉夫拉斯伯爵夫人她建议建议用二进制数代替原来的十进制数,表明分析机可以接受各种各样的穿孔卡:“控制卡”、“数据卡”、“操作卡”。她还提议数字和其他符号如字母都可以“编码成数字数据,机器可以处理它们。甚至早于现代计算机出现200年,提出了分析机的记忆能力的想法,指出分析机应该有存储位置或地址... -
delphi 各种时间类型之间的转换函
各种时间类型之间的转换函DateTimeToFileDate函数定义:DateTimeToFileDate(DateTime:TDateTime):Integer;作用将一个TDateTime类型的时间转化为Dos环境中的时间,Dos环境下对时间的访问方法和VCL中的TdateTime类型不一样,在进行文件操作时,为了保持时间的一致性,需要使用Dat...
