C coolcat3000 Unregistered / Unconfirmed GUEST, unregistred user! 2002-09-08 #1 如何把DBGRID里查询出来的结果发送到MEMO里
H houxdd Unregistered / Unconfirmed GUEST, unregistred user! 2002-09-08 #2 var j,i:integer; a:string; memo1.lines.clear; DBGRID的数据集.first; for j:=1 to DBGRID的数据集.recordcount do begin for i:=0 to DBGRID的数据集.fieldcount-1 do begin a:=a+DBGRID的数据集.fields.asstring; end; memo1.lines.add(a); DBGRID的数据集.next; end;
var j,i:integer; a:string; memo1.lines.clear; DBGRID的数据集.first; for j:=1 to DBGRID的数据集.recordcount do begin for i:=0 to DBGRID的数据集.fieldcount-1 do begin a:=a+DBGRID的数据集.fields.asstring; end; memo1.lines.add(a); DBGRID的数据集.next; end;
L lich007 Unregistered / Unconfirmed GUEST, unregistred user! 2002-09-08 #4 即Dbgrid1.DataSource.DataSet
