全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1791
推到 Plurk!
推到 Facebook!

如何將DBGRID1放入DBGRID2

尚未結案
qq33252000
一般會員


發表:12
回覆:21
積分:6
註冊:2010-07-03

發送簡訊給我
#1 引用回覆 回覆 發表時間:2010-10-08 16:44:18 IP:211.23.xxx.xxx 訂閱
現在有兩個DBGRID
第一個DBGRID是用來確認資料的
確認客戶姓名商品業務員交貨日期金額

這裡只有O才會放到這個DBGRID理


請問,該怎麼將第一個DBGRID是O的資料放入第二個DBGRID裡面呢????
P.D.
版主


發表:603
回覆:4038
積分:3874
註冊:2006-10-31

發送簡訊給我
#2 引用回覆 回覆 發表時間:2010-10-08 17:14:02 IP:118.169.xxx.xxx 未訂閱
不是很懂要把dbgrid1 放到 dbgrid2, 是要怎麼放法?
dbgrid 會對應一組 table
所以直接針對兩組table 進行判斷, table1 的 確認ok的, 就新增到 table2 中, 不知這樣是不是符合你的要求?
qq33252000
一般會員


發表:12
回覆:21
積分:6
註冊:2010-07-03

發送簡訊給我
#3 引用回覆 回覆 發表時間:2010-10-08 17:32:15 IP:220.132.xxx.xxx 訂閱
我了解您說的方法
但我無法將資料O的放入資料庫中,因為第一個DBGRID內有X的資料會停住不動

所以才會想說有沒有別的辦法將只有O的托出來,在新增
===================引 用 P.D. 文 章===================
不是很懂要把dbgrid1 放到 dbgrid2, 是要怎麼放法?
dbgrid 會對應一組 table
所以直接針對兩組table 進行判斷, table1 的 確認ok的, 就新增到 table2 中, 不知這樣是不是符合你的要求?
P.D.
版主


發表:603
回覆:4038
積分:3874
註冊:2006-10-31

發送簡訊給我
#4 引用回覆 回覆 發表時間:2010-10-11 21:40:11 IP:118.169.xxx.xxx 未訂閱
這下更神奇了, 我更看不懂了
===================引 用 qq33252000 文 章===================
我了解您說的方法
但我無法將資料O的放入資料庫中,因為第一個DBGRID內有X的資料會停住不動

所以才會想說有沒有別的辦法將只有O的托出來,在新增
smallfox
高階會員


發表:2
回覆:113
積分:128
註冊:2003-02-19

發送簡訊給我
#5 引用回覆 回覆 發表時間:2010-10-12 00:13:03 IP:203.70.xxx.xxx 訂閱
其實你不需要用到兩個TDBGrid, 利用 Filter & Filtered 及迴圈即可處理確認=O的紀錄:
例如:

ADOQuery1.Filter='確認=O';
ADOQuery1.Filtered:=True;
try
ADOQuery1.First;
while (not ADOQuery1.Eof) do begin
// do insert record to DB
ADOQuery1.Next;
end;
finally
ADOQuery1.Filtered:=False;
ADOQuery1.Filter:='';
end;

這樣不就可以嗎 ?!





max5020
資深會員


發表:29
回覆:277
積分:321
註冊:2003-06-04

發送簡訊給我
#6 引用回覆 回覆 發表時間:2010-10-12 16:03:01 IP:211.22.xxx.xxx 訂閱
一般而言, 這種選項,
我都是用左右兩個ListBox或是CheckListBox來呈現,
很少用DB-Grid,
qq33252000
一般會員


發表:12
回覆:21
積分:6
註冊:2010-07-03

發送簡訊給我
#7 引用回覆 回覆 發表時間:2010-10-13 11:43:24 IP:220.132.xxx.xxx 訂閱
感謝大大的幫忙
可是我用的是tQUERY不是ADO裡面的QUERY餒
請問用法一樣嗎???
===================引 用 smallfox 文 章===================
其實你不需要用到兩個TDBGrid, 利用 Filter & Filtered 及迴圈即可處理確認=O的紀錄:
例如:

ADOQuery1.Filter='確認=O';
ADOQuery1.Filtered:=True;
try
ADOQuery1.First;
while (not ADOQuery1.Eof) do begin
// do insert record to DB
ADOQuery1.Next;
end;
finally
ADOQuery1.Filtered:=False;
ADOQuery1.Filter:='';
end;

這樣不就可以嗎 ?!





smallfox
高階會員


發表:2
回覆:113
積分:128
註冊:2003-02-19

發送簡訊給我
#8 引用回覆 回覆 發表時間:2010-10-14 01:05:15 IP:203.70.xxx.xxx 訂閱
如果你是使用TQuery的話, 不建議使用 Filter & Filtered 的方式, 因為 TQuery 的 Filter 筆數多時會比較慢,
不過原理還是一樣, 利用迴圈 & IF 條件就可以了:

Query1.DisableControls;
try
Query1.First;
while (not Qurey1.Eof) do begin
if (Query1.FieldByName('確認').AsString='O') then begin
// do insert record ..
end;
Query1.Next;
end;
finally
Query1.EnableControls;
end;

當然你還可以加上 TProgressBar 來顯示處理過程 & 美化 UI.
系統時間:2024-04-25 11:38:44
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!