2009 年 7月 23 日随笔档案 - martian6125

2009年7月23日

摘要： var i : Integer; cl : TcxGridDBColumn;begin Screen.Cursor := crHourGlass; cxtvMaster.BeginUpdate; try cxtvMaster.ClearItems; c... 阅读全文

posted @ 2009-07-23 18:10 martian6125 阅读(201) 评论(0) 推荐(0)

如何动态建立cxGrid的列？

摘要： for(int i=0; iFields->Count; i++){ cxGrid1DBTableView1->CreateColumn(); cxGrid1DBTableView1->Columns[i]->DataBinding->FieldName=... 阅读全文

posted @ 2009-07-23 18:10 martian6125 阅读(93) 评论(0) 推荐(0)

在CXGRID中显示'合计‘

摘要：设为：footerkind:=sknone;procedure TFrmPOOrder.myviewTcxGridDBDataControllerTcxDataSummaryFooterSummaryItems4GetText( Sender: TcxDataSum... 阅读全文

posted @ 2009-07-23 18:10 martian6125 阅读(131) 评论(0) 推荐(0)

TreeView的遍历

摘要： varnode: TTreeNode;label ok;begin node := TreeView1.TopItem; while True do begin if node.HasChildren then node := node.GetF... 阅读全文

posted @ 2009-07-23 18:09 martian6125 阅读(125) 评论(0) 推荐(0)

Delphi中使用ListView和TreeView的Item中的Data可能被忽略的内存泄漏

摘要： Delphi中大家在使用 ListView和TreeView时，一般都会使用到Item的Data属性来保存大家自己的内部数据，这个Data的声明如下：property Data: Pointer;大家可以看到它就是一个指针，使用上一般类似如下代码（以ListView为... 阅读全文

posted @ 2009-07-23 18:07 martian6125 阅读(164) 评论(0) 推荐(0)

动态设置cxgrid列的Properties

摘要： myProperties1 := tcxcomboboxproperties.Create(nil); myProperties1.DropDownListStyle := lsEditFixedList; myProperties1.Items.Add(''并... 阅读全文

posted @ 2009-07-23 18:06 martian6125 阅读(272) 评论(0) 推荐(0)

cxgrid列的Properties(cxPopupEditPopup)的关闭方法

摘要： TcxPopupEditPopupWindow(GetParentForm(PanelGoods)).ClosePopup;PanelGoods为面板控件 panel 阅读全文

posted @ 2009-07-23 18:06 martian6125 阅读(309) 评论(0) 推荐(0)

cxgrid导出excel文件数字不能计算问题

摘要：将列的Properties设置为cxCurrencyEdit就可以计算了阅读全文

posted @ 2009-07-23 18:05 martian6125 阅读(153) 评论(0) 推荐(0)

动态设置和访问cxgrid列的Properties

摘要：设置：cxGrid1DBTableView1Column.PropertiesClass = TcxTextEditProperties; cxGrid1DBTableView1Column.PropertiesClass = TcxDateEd... 阅读全文

posted @ 2009-07-23 18:05 martian6125 阅读(106) 评论(0) 推荐(0)

cxgrid导出excel

摘要： uses cxexportgrid4link;var SaveDialog: TSaveDialog;begin SaveDialog:=TSaveDialog.Create(nil); with SaveDialog do begin Filter :... 阅读全文

posted @ 2009-07-23 18:05 martian6125 阅读(83) 评论(0) 推荐(0)

cxgrid控件出现Control '' has no parent window错误的解决

摘要： procedure TFrmgoodsedit.cxGrid1DBTableView1Column1PropertiesButtonClick( Sender: TObject; AButtonIndex: Integer);begin cdssub.edit... 阅读全文

posted @ 2009-07-23 18:04 martian6125 阅读(536) 评论(0) 推荐(0)

cxgrid当底层数据集为空时显示一条空记录

摘要： procedure.Enter(Sender: TObject);varView: TcxGridDBTableView;beginView := TcxGridDBTableView((Sender as TcxGrid).FocusedView);if View.... 阅读全文

posted @ 2009-07-23 18:03 martian6125 阅读(116) 评论(0) 推荐(0)

cxgrid复制粘贴操作

摘要： 1、uses clipbrd;2、复制procedure TForm1.cxButton1Click(Sender: TObject);varp1,p2:integer;p3:string;beginp1:=cxGrid5DBTableView1.Controller... 阅读全文

posted @ 2009-07-23 18:02 martian6125 阅读(377) 评论(0) 推荐(0)

cxgrid上如何取FOOTER上合计的值

摘要： View_Client.DataController.Summary.FooterSummaryValues[0],//得到值 View_Client.DataController.Summary.FooterSummaryTexts //得到显示文... 阅读全文

posted @ 2009-07-23 18:01 martian6125 阅读(109) 评论(0) 推荐(0)

得到触发器的状态

摘要： select 表名=object_name(parent_obj),触发器名=name,状态=case status & power(2,11) when power(2,11) then '禁用' else '启用' endfrom sysobjectswhere ... 阅读全文

posted @ 2009-07-23 17:59 martian6125 阅读(108) 评论(0) 推荐(0)

暂停触发器

摘要： alter table 你的表名 disable trigger all-- 禁用再执行删除你的语句之前先执行这句,这样就禁用触发器了alter table 你的表名 enable trigger all-- 企用阅读全文

posted @ 2009-07-23 17:59 martian6125 阅读(181) 评论(0) 推荐(0)

触发器如何得到那些字段更改了

摘要： create trigger tr_process on 表after insert,updateasselect namefrom syscolumnswhere id=object_id('表')and (substring(columns_updated(),(... 阅读全文

posted @ 2009-07-23 17:58 martian6125 阅读(199) 评论(0) 推荐(0)

触发器如何判断是插入触发的，还是更新触发的

摘要： if exists (select 1 from inserted) and not exists (select 1 from deleted) --insertif exists (select 1 from inserted) and exists (se... 阅读全文

posted @ 2009-07-23 17:58 martian6125 阅读(338) 评论(0) 推荐(0)

SQL语句如何更改重复的记录

摘要：更改Table中字段refinv里的内容，有重复的内容在后面加数字，后面的数字是有序的。原表:id refinv price date----------- ---------------... 阅读全文

posted @ 2009-07-23 17:57 martian6125 阅读(189) 评论(0) 推荐(0)

如何知道是哪个进程造成死锁？如何把这个进程杀掉？

摘要： --转贴:MSSQL(查找死锁)：use mastergodeclare @spid int,@bl intDECLARE s_cur CURSOR FOR select 0 ,blockedfrom (select * from sysprocesses wher... 阅读全文

posted @ 2009-07-23 17:57 martian6125 阅读(145) 评论(0) 推荐(0)

如何赛筛选出多列内容相同的数据??

摘要：在MSSQL里，如何筛选出多个列的内容相同的数据，如：ID Name Desc. Unit QTY001 ABC 15*20 PCS 15001 ABC 15*20 PCS 16001 A... 阅读全文

posted @ 2009-07-23 17:56 martian6125 阅读(376) 评论(0) 推荐(0)

在存储过程中调用外部的动态连接库

摘要： CREATE PROCEDURE sp_testdll ASexec sp_addextendedproc 'SetFileName', 'storeproc.dll' --声明函数exec sp_addextendedproc 'addLine', 'storepr... 阅读全文

posted @ 2009-07-23 17:54 martian6125 阅读(189) 评论(0) 推荐(0)

数据库中查询某表是否存在

摘要： select * from sysobjects where id=object_id('shinz_ghzl') 阅读全文

posted @ 2009-07-23 17:53 martian6125 阅读(141) 评论(0) 推荐(0)

sql server2005数据库附加后只读的解决方法

摘要：解决办法：打开 SQL Server Configuration Manager, 打开SQL Server SQLEXPRESS 的属性，将内置帐户改为本地系统即可. 阅读全文

posted @ 2009-07-23 17:52 martian6125 阅读(108) 评论(0) 推荐(0)

cxgrid删除应用过滤后的行

摘要： varI: Integer;beginwith dofor I := 0 to ViewData.RecordCount - 1 dobeginViewData.Records[0].Focused := True;DataController.DataSet.Del... 阅读全文

posted @ 2009-07-23 17:52 martian6125 阅读(142) 评论(0) 推荐(0)