delphi中如何将dbgrid中的全部数据写入sql2000的一个表中,每次先将这个表中数据清空再写入。

 我来答
yueyun889
2014-10-24 · TA获得超过725个赞
知道小有建树答主
回答量:539
采纳率:0%
帮助的人:768万
展开全部
procedure TForm1.Button1Click(Sender: TObject);
var
  i: Integer;
begin
  adodel.Close;
  ADODel.SQL.Text := 'delete from TableName';
  ADODel.ExecSQL;
  ADOQuery1.First;
  //实际上是操作DataSet
  while not ADOQuery1.Eof do
  begin
    ADODel.Close;
    ADODel.SQL.Clear;
    ADODel.SQL.Text := Format('Insert Into TableName(Field1, Field2) Values (%s, %s)',
                       [QuotedStr(ADOQuery1.Fields[0].AsString),
                       QuotedStr(ADOQuery1.Fields[1].AsString)]);
    ADODel.ExecSQL;
    ADOQuery1.Next;
  end;
end;
zhl_529
2014-10-24 · TA获得超过151个赞
知道小有建树答主
回答量:387
采纳率:72%
帮助的人:95.9万
展开全部
对dbgrid.DataSource.DataSet进行遍历,依次写入
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式