ExpressQuantumGrid(100分)

  • 主题发起人 主题发起人 liaowang
  • 开始时间 开始时间
L

liaowang

Unregistered / Unconfirmed
GUEST, unregistred user!
哪位回答出的共300分
100 + http://www.delphibbs.com/delphibbs/dispq.asp?lid=1033770 = 300
ExpressQuantumGrid中如何动态添加columns?
 
这个控件没用过~
 
不会吧:(
 
发给我让我研究研究吧~yj5637899@163.net
 
各位有知道的吗?帮忙啊
 
这个控件我没用过,我都用DbgridEh的
 
查帮助、看代码中。。。
 
代码中午给你行不行,我做出来过,不过忘了,现在在家里没法试.
 
把分给我吧.
var
icolumn:integer;
ft:TStringlist;
begin
ft:=tstringlsit.create(self);//然后向里面添加你要在dxdbgrid中显示的字段名.
for icolumn:=0 to ft.items.count-1 do
begin
dxdbgrid1.createcolumn(TdxDBGridColumn) as TdxDBGridColumn do
begin
fieldname:=ft.items.strings[icolumn];
bandindex:=0;//可以拽定为因定列或非固定列,这样dxdbgrid横向移动时该列不动
//需要在gand中设置band为固定的.
caption:=ft.items.strings[icolumn];//也可以随你改动
end;
end;
 
ft:=tstringlsit.create(self);//然后向里面添加你要在dxdbgrid中显示的字段名.
这里省略了向ft中增加table的字段名,只需要在ft中增加或减少就行了.

 
hbezwwl
这个例子你能通过吗?help里的和你的差不多:
The following code demonstrates how to use the CreateColumn method and to
create grid columns at runtime.

procedure TForm1.Button1Click(Sender: TObject);

begin

with dxDBGrid1.CreateColumn(TdxDBGridButtonColumn) as TdxDBGridButtonColumn do

begin

FieldName := 'State';

Index := 2;

OnEditButtonClick := ColEditButtonClick;

end;

end;
我也通不过,不知为什么,能给我解释一下吗?
 
我是从我的程序中拷贝出来的,肯定可以用。
我是用的d6.在win98里面的。
 
with dxdbgrid1.CreateColumn(TdxDBGridColumn) as TdxDBGridColumn do
//我掉了一个with.
其它的代码就是我程序里面的。

//你说不行,有什么提示没有,有问题写封信我,我来试试。
hbezwwl@163.com,用qq讨论也行。53320295,晚上一般在
 
我昨天试了一下,好象有另一个方法也行,而且能满足你的需要的话真是太好,太简单的
将所有的列都加入,然后程序决定哪一列显示和不显示,我看了,除了主键那一列,其他column
都有一个visible属性,并且是可以用程序改变的.
 
哎,我要的不是change dateset时dxdbgrid的显示,如果没有任何dateset,如何给它加上
一列,比方说grid初始化时从一个listbox中读出column caption然后再增加一列写一列
 
也可以啊,不过要看写代码容易还是上述方法容易,我今天试过,在程序中先指定DATASET,然后
对每一列有个fieldname属性,就是它,把它赋给那一列然后设定visible:=true
 
你改不改变都无所谓,你要增加时使用我上面写的语句就行了。
或者要删除某列时相当于删除TStringList中的内容,使用一个
循环把全部列都删除,再用循环重新写就行了。
var
i:integer;
for
for i:=0 to dxdbgrid1.columncount-1 do
dxdbgrid1.columns[0].destroy;//删除当前dxdbgrid所有列。

然后再用循环写入新的列。
 
应该是的啦
 
hbezwwl
这儿给你100分,你到
http://www.delphibbs.com/delphibbs/dispq.asp?lid=1033770去一下那200分也
归你
 
后退
顶部