9 水向东流时光怎么偷

尚未进行身份认证

我要认证

good good study, day day up!

等级
TA的排名 16w+

DBGridEh导出数据

ar ExpClass: TDBGridEhExportClass; Ext: string;begin if ciqry.Active then begin DBGridEh1.SetFocus; SaveDialog1.Filter := 'xls工作簿(*.xls)|*.xls|'; //'xls工作簿(*.xls)|*.xls'+

2011-12-15 16:54:30

动态调整DDBGridEh例宽度

dbgrideh的events事件组下,找到oncolwidthschanged事件procedure TForm1.DBGridEh1ColWidthsChanged(Sender: TObject);vari:Integer;begin //动态调整DDBGridEh例宽度 for i := 0 to DBGridEh1.Columns.Count - 1 do be

2011-12-15 15:23:18

SQL Server 定时作业的制定

---2000企业管理器--管理--SQL Server代理--右键作业--新建作业--"常规"项中输入作业名称--"步骤"项--新建--"步骤名"中输入步骤名--"类型"中选择"Transact-SQL 脚本(TSQL)"--"数据库

2011-08-22 17:31:16

创建角色,用户,权限

创建角色,用户,权限/*--示例说明 示例在数据库pubs中创建一个拥有表jobs的所有权限、拥有表titles的SELECT权限的角色r_test 随后创建了一个登录l_test,然后在数据库pubs中为登录l_test创建了用户账户u_te

2011-08-12 15:25:27

CXgrid获取列的全部值

vari:Integer;begin for i := 0 to cxGrid2DBTableView1.DataController.RecordCount-1 do begin ShowMessage(cxGrid2DBTableView1.Dat

2011-07-13 17:48:04

dd

<br />procedure TSetForm.SavebtClick(Sender: TObject);<br />begin<br />  with DataFrm.ADOQuery do<br />  begin<br />    Close;<br />    SQL.

2011-05-30 23:19:00

学习SQL日记--case a when 1 then x when 2 then y else a end

<br />declare@tabletable (a varchar(2),b varchar(2))<br />insertinto@table<br />select'cc','a1'unionall<br />select'cc','b2'<br /><br />select a,casewhen a='cc'and b='a1'then'b5'else b endas b from@table<br /><br />/*<br />a    b<br />---- ----<br />cc   b

2011-05-05 14:20:00

SQL按日期来查询

<br />select * from rm_yjs where convert(char(10),yjs_date,23) like '2011-04-29'

2011-05-03 11:10:00

delphi操作excel

<br />var v: Variant; y: Integer;Begin If OpenDialog1.Execute Then begin v := CreateOleObject('Excel.Application'); try v.Workbooks.Open(OpenDialog1.FileName); v.WorkSheets[1].Activate; y:=v.ActiveSheet.UsedRange.Rows.Count;

2011-04-28 10:28:00

SQL语句导入导出大全

<br />SQL code--SQL语句导入导出大全 /******* 导出到excel EXEC master..xp_cmdshell ’bcp SettleDB.dbo.shanghu out c:/temp1.xls -c -q -S"GNETDATA/GNETDATA" -U"sa" -P""’ /*********** 导入Excel SELECT * FROM OpenDataSource( ’Microsoft.Jet.OLEDB.4.0’, ’Data Sourc

2011-04-27 13:30:00

SQL语句导入导出大全

<br />SQL code--SQL语句导入导出大全 /******* 导出到excel EXEC master..xp_cmdshell ’bcp SettleDB.dbo.shanghu out c:/temp1.xls -c -q -S"GNETDATA/GNETDATA" -U"sa" -P""’ /*********** 导入Excel SELECT * FROM OpenDataSource( ’Microsoft.Jet.OLEDB.4.0’, ’Data Sourc

2011-04-27 13:29:00

SQL语句嵌套最好用quotedstr函数替换

<br />dmcc.delete_rm_zjfhsj.add('select 数量 from rm_zjfhsj where 类型='CTO'');dmcc.delete_rm_zjfhsj.SQL.add('select 数量 from rm_zjfhsj where 类型='+quotedstr('CTO'));凡是内引号对,最好用quotedstr函数替换

2011-04-23 11:46:00

SQL发送邮件

SQL Server 并没有内置邮件服务器(Mail Server),它跟我们发送邮件一样,需要用户名和密码通过 SMTP(Simple Message Transfer Protocol)去连接邮件服务器。我们想让 SQL Server 来发送邮件,首先要告诉它用户名称,密码,服务器地址,网络传送协议,邮件服务器的端口。。。等信息。  以下脚本实现了数据库邮件的配置:--下面是具体的配置邮件步骤 --在 sa 系统帐户下运行。 ----1. 启用 SQL Server 2005 邮件功

2011-04-22 15:25:00

多where条件查询

<br />-- ???<br /><br />createtable tb<br />(<br />    工厂 varchar(10),<br />    库地 int,<br />    类型 varchar(10),<br />    属性 varchar(10),<br />    SKU varchar(10),<br />    批次 varchar(10),<br />    名称 varchar(10),<br />    入库时间 datetime,<br />    数量 int,<b

2011-03-29 16:19:00

excel数值类型转换为文本

<br />excel数值类型转换为文本  A例数据<br />Sub trimer()<br />    With Sheets("sheet1")<br />        ar = .[a1].CurrentRegion<br />        For i = 1 To UBound(ar)<br />            ar(i, 1) = trim(ar(i, 1))<br />        Next<br />        .[a1].Resize(UBound(ar)) = ar<b

2011-03-25 21:24:00

学完这个你就成为excel高手了!(Delphi对Excel的所有操作)逐个试试!

<br />学完这个你就成为excel高手了!(Delphi对Excel的所有操作)逐个试试!<br /> <br />一) 使用动态创建的方法 <br /><br />首先创建 Excel 对象,使用ComObj: <br />var ExcelApp: Variant; <br />ExcelApp := CreateOleObject( 'Excel.Application' ); <br /><br />1) 显示当前窗口: <br />ExcelApp.Visible := True; <br /

2011-03-25 11:43:00

DBGrid 各属性的设置

<br />在 Delphi 语言的数据库编程中,DBGrid 是显示数据的主要手段之一。但是 DBGrid 缺省的外观未免显得单调和缺乏创意。其实,我们完全可以在我们的程序中通过编程来达到美化DBGrid 外观的目的。通过编程,我们可以改变 DBGrid 的表头、网格、网格线的前景色和背景色,以及相关的字体的大小和风格。<br />    以下的示例程序演示了对 DBGrid 各属性的设置,使 Delphi 显示的表格就像网页中的表格一样漂亮美观。<br />    示例程序的运行:<br />    在

2011-03-24 11:27:00

2010-03-22记!

<br />form1.memo1.lines.Clear; //清空MEMO1<br /> <br />form1.OpenDialog1.execute;<br />form1.Memo1.Lines.LoadFromFile(form1.OpenDialog1.filename); //设置打开文件<br /> <br />form1.saveDialog1.execute;<br />form1.Memo1.Lines.savetoFile(form1.saveDialog1.filename);<

2011-03-22 13:35:00

DELPHI颜色常量

<br />颜色常量.<br />   在DELPHI中除了可以使用RGB(R,G,B)颜色以外,还可以使用系统中给定的颜色常量.<br />   例:EDIT1.COLOR:=CLRED;<br />   颜色常量有:<br />   CLAQUA浅绿色.<br />   CLBLACK黑色.<br />   CLBLUE蓝色.<br />   CLDKGRAY灰黑色.<br />   CLFUCHSIA紫红色.<br />   CLGRAY灰色.<br />   CLGREEN绿色.<br />   C

2011-03-21 21:11:00

DBGrid、DBGrideh专题总结

<br />打印dbgrid数据:<br />//==============================================================================<br />//打印DBGrid中的所有数据********************************************************<br />//===================================================================

2011-03-18 15:35:00
勋章 我的勋章
  • 红花
    红花
    子板块内专家分月排名榜第一
  • 蓝花
    蓝花
    子板块内专家分月排名榜第三