有關ha0009版主BriefCase範例的問題請教 |
答題得分者是:ha0009
|
cashxin2002
版主 發表:231 回覆:2555 積分:1937 註冊:2003-03-28 發送簡訊給我 |
請教ha0009版主及各位前輩﹒ 小弟在練習ha0009前輩有關BriefCase範例時出現這樣一個現象﹐就是無論怎么對外部檔案做修改(包括不修改外部檔案的資料內容)﹐在回到主程式中﹐按下同步作業的按鍵時﹐就會出現全部資料筆數多被修改﹐是否需要同步更新的提示﹐Code如下﹕ procedure TForm1.UpdateBatchExecute(Sender: TObject);
begin
if Not FileExists('D:\Test.dat') then
begin
ShowMessage('公事包檔案還沒有建立﹐請先建立!');
System.Exit;
end;
ADODataSet2.LoadFromFile('D:\Test.dat');
ADODataSet2.FilterGroup := fgPendingRecords;
if ADODataSet2.RecordCount = 0 then
begin
ShowMessage('公事包無任何變動﹐故資料庫無需更新!')
end
else
begin
if Application.MessageBox(PChar(Format('公事包中有%d 筆變動資料﹐是否同步更新到資料庫﹖',[ADODataSet2.RecordCount])),'資料同步處理',MB_YesNo) = IDYes then
begin
ADODataSet2.UpdateBatch;
DeleteFile('D:\Test.dat');
ShowMessage('資料庫同步作業完成﹗');
end;
end;
Caption := IntToStr(ADODataSet2.RecordCount);
end; 請問小弟是何處有錯誤設定﹐才會出現這樣的現象的﹒ 另外請教﹕ADODataSet2.FilterGroup := fgPendingRecord; 是何意義﹖ 謝謝﹗ 努力,相信會獲得美麗!
忻晟 發表人 - cashxin2002 於 2003/07/08 01:39:05
------
忻晟 |
ha0009
版主 發表:16 回覆:507 積分:639 註冊:2002-03-16 發送簡訊給我 |
|
cashxin2002
版主 發表:231 回覆:2555 積分:1937 註冊:2003-03-28 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |