Query1.sql.clear; Query1.sql.add('select * from Tablename where fieldname1=fieldvalue1'); Query1.findprior; copyvalue0:=Query1.fields[0].value; copyvalue1:=Query1.fields[1].value; .......
在insert 前用个FOR list:tstringlist; for i :=0 to count do begin//复制当前记录 list.add(filelds[i].asstring); .next; end .insert for i:=0 to count do begin//替代一些内容用list中的 end;
varr := vararraycreate([1,10],variant) for i:=0 to dbgrid.columns.count-1 do varr[i] := dbgrid.columns[i].Field.value 用一個變體數組賦組就行呀
用DataSet.FindPrior
再用sql语句
能不能具体举列呢?
Query1.sql.add('select * from Tablename where fieldname1=fieldvalue1');
Query1.findprior;
copyvalue0:=Query1.fields[0].value;
copyvalue1:=Query1.fields[1].value;
.......
list:tstringlist;
for i :=0 to count do
begin//复制当前记录
list.add(filelds[i].asstring);
.next;
end
.insert
for i:=0 to count do
begin//替代一些内容用list中的
end;
for i:=0 to dbgrid.columns.count-1 do
varr[i] := dbgrid.columns[i].Field.value
用一個變體數組賦組就行呀