- 博客(12)
- 收藏
- 关注
RSS订阅转载 Just one last dance最后一支舞
Just one last dance....oh baby...just one last dance 最后一曲 哦 亲爱的 最后一曲 We meet in the night in the Spanish café 那个夜晚 我们在西班牙咖啡馆相遇 I look in your eyes just don’t know wh
2009-01-10 14:49:00
859
原创 关于RecordSet对象指针移动方法
rs.movenext 将记录指针从当前的位置向下移一行rs.moveprevious 将记录指针从当前的位置向上移一行rs.movefirst 将记录指针移到数据表第一行rs.movelast 将记录指针移到数据表最后一行rs.absoluteposition=N 将记录指针移到数据表第N行rs.bof 返回记录指针是否超出数据表首端，true表示是，false为否rs.eof 返回记录指针是否
2008-12-31 22:14:00
2207
原创 Conn文件
ACCESS数据库链接代码：dim db,Conn,ConnStrdb="您的ACCESS数据库路径"set conn=Server.CreateObject("ADODB.Connection")ConnStr = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath(db)conn.open ConnStr
2008-12-30 23:45:00
523
原创 创建Activex的方法以及调用
ACTIVEX FROM首先设置一个虚拟目录，定名为Delphi 1）进入Delphi，Close all 2）New -> Other -> ActiveX -> ActiveX Form ->Name: MyActiveX OK 3）出现一个普通的Form界面，放入 TButton TListBox TEdit 三个控件，设计
2008-12-30 23:15:00
527
转载 TDataSe的tenablecontrols,disablecontrols函数
DisableControls方法是在程序修改或后台有刷新记录的时候切断数据组件，如TTABLE、ADOQUERY等等与组件数据源的联系。如果没有切断，数据源中只要一有数据的改动，尤其是批量改动的话，每一笔的改动都会更新窗口中数据浏览组件的显示，这样会急剧减慢处理过程而且浪费时间。EnableControls的作用相反，用来恢复TTABLE等组件与DATASOURCE的联系，并促使数据浏览组件
2008-12-30 12:21:00
467
原创 对于动态生成的Button控件OnClick事件应用
with button[i] do begin Parent := Self; top:= atop; left:=30; width:=100; height := 30; atop:=atop+30; caption:=cj+inttostr(i); OnCl
2008-12-30 12:13:00
538
原创 cxGrid根据条件改变文字颜色
今天在开发凯达ERP的时候，碰到了cxGrid关于根据取到的Cell值改变整行记录的Text颜色。基本思路是：1、用cxStyleRepository控件先设置几种不同的样式。2、根据相关事件改变cxGrid的Text颜色 问题： 找不到哪个事件 解决问题：如下例在tcxGrid1DBTableView 的 CustomDrawCell 事件中写。
2008-12-27 15:10:00
3245
原创 关于cxGrid针对于某一列转属性成Combobox后对于Items添加内容用代码的写法
对于cxGrid的某一列(列名为DGT_AssMould)，如果设计期强制改变其Cell的属性为Combobox后，可以在写代码的时候通过TcxCustomboboxProperties(DGT_AssMould.Properties)作为Properties，然后直接可以加属性Items。完整写法是：TcxCustomboboxProperties(DGT_AssMould.Proper
2008-12-25 16:15:00
1285
原创 关于SQL2000的交并差(Intersect、Union、Except)命令说明
Union对应集合进行相应的合并SQL中Select支持以下语句(Select * From Table1)Union(Select * From Table2)另SQL2000帮助下面还有如下语法示例(需要安装Analysis Services)Union(USA.Children, CANADA.Children, ALL) Intersect则是针对集合的相应交操
2008-12-12 13:05:00
1108
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人