線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1819
推到 Plurk!
推到 Facebook!

怎麼儲存DBGrid中所有ㄉ資料(另存新檔)

答題得分者是:Justmade
delphi
初階會員


發表:52
回覆:64
積分:38
註冊:2002-05-21

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-03-18 11:12:04 IP:61.63.xxx.xxx 未訂閱
各位前輩 怎麼儲存DBGrid中所有ㄉ資料(另存新檔) 怎麼刪除DBGrid中所有ㄉ資料 謝謝 逃避不一定躲得過 面對不一定最難受 孤單不一定不快樂 得到不一定能長久 失去不一定不再有 轉身不一定最軟弱 別急著說別無選擇 別以為世上只有對與錯 許多事情的答案都不是只有一個 所以我們永遠有路可以走 你能找個理由難過 也一定能找到快樂 懂得放心的人找到輕鬆 懂得遺忘的人找到自由 懂得關懷的人找到朋友
channel
尊榮會員


發表:67
回覆:707
積分:854
註冊:2002-05-02

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-03-18 11:28:12 IP:211.21.xxx.xxx 未訂閱
引言: 怎麼儲存DBGrid中所有ㄉ資料(另存新檔)
您的需求是要將DBGrid中的資料存到另一個Table中,您可以用: (假設要新增至Table2)
with DBGrid.DataSource.DateSet do
begin
  First;
  while not Eof do  
  begin
    Table2.Append;
    Table2.FieldByName(FieldName).AsString := FieldByName(FieldName).AsString
    ....
    Table2.Post;
    Nxet;
  end;   
end;
引言: 怎麼刪除DBGrid中所有ㄉ資料
with DBGrid.DataSource.DateSet do
begin
  First;
  while not Eof do  
  begin
    Delete;
    Nxet;
  end;   
end;
~小弟淺見,參考看看~
------
~小弟淺見,參考看看~
Justmade
版主


發表:94
回覆:1934
積分:2030
註冊:2003-03-12

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-03-18 11:39:07 IP:218.16.xxx.xxx 未訂閱
引言: 怎麼儲存DBGrid中所有ㄉ資料(另存新檔)
若你預知要存到另一己定義的 table 你可以一筆一筆抄過去,但若是要存到一個全新檔案則要看你用的是甚麼 dataset 元件和 是要存到甚麼類形的檔案。
引言: 怎麼刪除DBGrid中所有ㄉ資料
這也要看你用的是甚麼 dataset 元件,例如 TTable 便可用 EmptyTable, 各種 query 就可以 SQL "Delete from TableName"。當然你也可以一筆一筆的 delete但比較慢。
delphi
初階會員


發表:52
回覆:64
積分:38
註冊:2002-05-21

發送簡訊給我
#4 引用回覆 回覆 發表時間:2003-03-18 11:52:49 IP:61.63.xxx.xxx 未訂閱
引言: -------------------------------------------------------------------------------- with DBGrid.DataSource.DateSet dobegin First; while not Eof do begin Table2.Append; Table2.FieldByName(FieldName).AsString := FieldByName(FieldName).AsString .... Table2.Post; Nxet; end; end; -------------------------------------------------------------------------------- 我是要存到一個*.txt的檔案中用SaveDialog 逃避不一定躲得過 面對不一定最難受 孤單不一定不快樂 得到不一定能長久 失去不一定不再有 轉身不一定最軟弱 別急著說別無選擇 別以為世上只有對與錯 許多事情的答案都不是只有一個 所以我們永遠有路可以走 你能找個理由難過 也一定能找到快樂 懂得放心的人找到輕鬆 懂得遺忘的人找到自由 懂得關懷的人找到朋友
Justmade
版主


發表:94
回覆:1934
積分:2030
註冊:2003-03-12

發送簡訊給我
#5 引用回覆 回覆 發表時間:2003-03-18 12:32:57 IP:218.16.xxx.xxx 未訂閱
引言: 我是要存到一個*.txt的檔案中用SaveDialog
參考我剛發表的 DataSet 儲存成 txt/csv/xls 簡單程序 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=27241 你用 SaveDialog 取得檔名後,可用 SaveDataSet(DBGrid1.Datasources.DataSet, SaveDialog1.Filename, #9); #9 是 tab, 即以 tab 來分隔欄位,若副檔名是 .xls,可直接雙擊用 Excel 打開。 另外,若你使用 TClientDataSet ,可直接儲存成 XML file。
chih
版主


發表:48
回覆:1186
積分:639
註冊:2002-04-02

發送簡訊給我
#6 引用回覆 回覆 發表時間:2003-03-18 12:34:21 IP:211.74.xxx.xxx 未訂閱
引言: 怎麼刪除DBGrid中所有ㄉ資料
with DBGrid.DataSource.DateSet do
begin
  First;
  while not Eof do  
  begin
    Delete;
    First;
  end;   
end;
Justmade
版主


發表:94
回覆:1934
積分:2030
註冊:2003-03-12

發送簡訊給我
#7 引用回覆 回覆 發表時間:2003-03-18 12:42:57 IP:218.16.xxx.xxx 未訂閱
引言:
with DBGrid.DataSource.DateSet do
begin
  First;
  while not Eof do  
  begin
    Delete;
    First;
  end;   
end;
之前 channel 君用 Next; 是會令data共 delete 得一半。 (我自己也常這樣寫錯) 但 First; 也是不必要的。begin - end 之間單單 delete; 就夠了。
系統時間:2024-06-28 17:25:01
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!