难题应该算

[wanapple]

怎样得到当前点到的DBgrid1的各个字段啊?DBgrid1.fields等等都不可以,查了点资料
说好像在delphi里好像不能这洋,是吗?
希望各位大哥哥告诉我

[王集鹄]

Caption := DBGrid1.SelectedField.Name;

[xiaohuan]

procedure TForm1.Button1Click(Sender: TObject);
var
i, j: Integer;
s: string;
begin
if DBGrid1.SelectedRows.Count>0 then
with DBGrid1.DataSource.DataSet do
for i:=0 to DBGrid1.SelectedRows.Count-1 do
begin
GotoBookmark(pointer(DBGrid1.SelectedRows.Items[i]));
for j := 0 to FieldCount-1 do
begin

if (j>0) then s:=s+', ';
s:=s+Fields[j].AsString;
end;
Listbox1.Items.Add(s);
s:= '';
end;
end;

[ilang]

up

[bobfang]

DBGrid1.Columns.Items[i].FieldName

[wanapple]

都错了,我想得到时表中点中的那条记录字段值啊

[fuzhe2001]

用stringgrid很容易实现！

[beetleking]

请教xiaohuan() ，你的这段程序是把dbgrid里的所有字段都取出来吧。
如果我想把它加到一个excel文件当中，应该怎么做？

[wanapple]

都错了,我想得到时表中点中的那条记录字段具体值啊,不是字段名

[wjlsmail]

我看看