TDBGrid有没有类似于TDataSet.FieldByName的方法(50分)

A

ATZ

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-23

• #1

通过TDBGird.Columns[下标]可以访问某一列，但列的下标有可能会因为添加列或删除列
而改变，这样代码的可维护性就很差。
TDataSet.Fields也有类似问题，但是可以通过TDataSet.FieldByName来解决，因为名称
相对来说是稳定的。不知道TDBGrid有没有类似的通过名称来指定访问某一列的方法？

 

张

张无忌

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-23

• #2

有啊，

 

Q

qdyoung

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-23

• #3

function DBGridColumByName(DBGrid: TDBGrid; const Name: string): TColumn;
var
i: Integer;
begin
Result := nil;
for i = 0 to DBGrid.Columns.Count - 1 do
if DBGrid.Columns.FieldName = Name then
begin
Result := DBGrid.Columns;
Break;
end;
end;
不一定就编译通过，看看应该能否明白

-----
http://www.8421.org

 

H

hamsoft

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-23

• #4

有！

 

A

ATZ

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-23

• #5

to 张无忌、hamsoft： 方法名称是什么？

 

M

mlzhou

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-24

• #6

没有，我知道的只能通过下标。
关注。（希望有人提出不通过下标的方法）

 

Y

yourice

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-25

• #7

TdxDBGrid有这种方法：ColumnByFieldName。

 

O

onlyonekgx

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-25

• #8

DBGrid1.DataSource.DataSet.FieldByName

 

A

ATZ

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-26

• #9

to onlyonekgx: 这样只能访问字段，而我要访问的是列

 

D

dlnew

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-04

• #10

dbgrid1.selectedfield.fieldname
//前提是必须先选中一格。

 

A

ATZ

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-04

• #11

to dlnew: 这样只能访问字段TField，而我要访问的是列TColumn

 

A

ATZ

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-04

• #12

看来只有两个方法: 1. 自己写函数 (qdyoung的方法)
2. 改用第三方控件 (yourice的方法)
谢谢大家

 

A

ATZ

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-04

• #13

多人接受答案了。