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

關於Access violation 的錯訊訊息....

尚未結案
linda_wei
一般會員


發表:44
回覆:31
積分:20
註冊:2004-04-08

發送簡訊給我
#1 引用回覆 回覆 發表時間:2005-10-21 18:00:13 IP:211.75.xxx.xxx 未訂閱
如題,我的資料庫是Access,我用ADOConnection, ADOTable.... 我有做一個copy file的動作....如下 void __fastcall TForm2::Button1Click(TObject *Sender) { . .(略) . TFileStream *OldFile = new TFileStream(Edit6->Text, fmOpenRead); try { TFileStream *NewFile = new TFileStream(cFileName, fmCreate); try { NewFile->CopyFrom(OldFile, OldFile->Size); ShowMessage("複製成功!"); } __finally { FreeAndNil(NewFile); } } __finally { FreeAndNil(OldFile); } . .(略) . } 在Run的時候,當show完"複製成功!"後, 會出現下列的錯誤訊息... 可是我發現檔案還是有copy進去... 但是這個錯誤訊息該怎麼解決掉呢?! 請教各位大大囉~ ^^
haman
中階會員


發表:46
回覆:137
積分:56
註冊:2005-03-10

發送簡訊給我
#2 引用回覆 回覆 發表時間:2005-10-21 19:39:08 IP:211.76.xxx.xxx 未訂閱
把FreeAndNil(NewFile)改成delete NewFile 下面的OldFile也一樣,就不會出現這個問題了 ==================================== 懂的不多,卻想學的更多,搞得不自覺的將問題複雜化@@
系統時間:2024-04-27 9:15:59
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!