with table2 do
begin
first;
while not eof do
begin
for i:=0 to table2.fieldcount-1 do
?:=table2.fields[i].value;
next;
end;
end;
begin
first;
while not eof do
begin
for i:=0 to table2.fieldcount-1 do
?:=table2.fields[i].value;
next;
end;
end;
你没有看懂我的问题,dbgird中显示的数据是table2数据的子集,我只想输出dbgrid中的数据,不想全部输出来。
////////////////BEGIN
dbgrid1.DataSource.DataSet.First;
while (not dbgrid1.DataSource.DataSet.Eof) do
begin
s1:=dbgrid1.Columns[1].Field.asstring;
s2:=dbgrid1.Columns[2].Field.asstring;
dbgrid1.DataSource.DataSet.Next;
end;
////////////////END