DBGrid中所顯示的資料是從一個資料庫中取出的，但是我想將我所查詢的結果(也就是顯示在DBGrid中的資料)另存在另一個我所新建的資料庫中，只要以後在這一個DBGrid中所顯示的資料我只要按下一個Button就可以存在一個新的資料表中(就是我所指定的那一個)請問各位高手前輩們 有什麼方法做到呀!謝謝

Hi MidasFan,    關於資料複製，可以參考以下文章 http://delphi.ktop.com.tw/topic.php?topic_id=53740 加以調整如下

procedure TForm1.Button2Click(Sender: TObject);
var
  J : Integer;
  S : String;
  V : Variant;
  sRecFields: String;
begin
  ClientDataSet2.Close;
  ClientDataSet2.CreateDataSet; // Table1.Open;
  DBGrid1.DataSource.DataSet.First;
  while not DBGrid1.DataSource.DataSet.Eof do
    begin
      S := '';
      FOR J := 0 TO DBGrid1.DataSource.DataSet.FieldCount - 1 DO
          S := S   DBGrid1.DataSource.DataSet.Fields[J].FieldName   ';';
      IF S <> '' THEN Delete(S,Length(S),1);
      sRecFields := S;
      V := DBGrid1.DataSource.DataSet[sRecFields];
      ClientDataSet2.Append;
      ClientDataSet2[sRecFields] := V;
      ClientDataSet2.Post;
      DBGrid1.DataSource.DataSet.Next;
    end;
end;

其中 ClientDataSet2 可用你新建的資料庫的元件替代(TTable,TQuery,ADOTabel.....) 發表人 -

------
Fishman

Fishman大哥:謝謝你第一時間給我答案 大感激 我先試試 謝謝啦