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

TQuery and TDatabase in DLL ->error ㄞ請前輩求解???

尚未結案
jimmyxup6
一般會員


發表:1
回覆:1
積分:0
註冊:2003-05-05

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-05-29 22:46:36 IP:61.231.xxx.xxx 未訂閱
先給先進前輩請安,躬請前輩指導!!    小弟使用BDE 連INTERBASE,主程式架構採MDI(mainform)+DLL(childform)    將TDatabase配置於->mainform;各個Tquery+datasoure->各個childform    再開啟mainform叫用(DLL)childform時,程式接正常, 但在關閉childform後,再關閉mainform時卻會出現 --------------------------- Debugger Fault Notification --------------------------- faulted with message: 'access violation at 0x4be43541: read of address 0xfff55410'. Process Stopped. Use Step or Run to continue. --------------------------- (問題一)當我將(DLL)childform中procedure Tcus.FormCreate裡的query1不啟用時 ,就不會有這個錯誤訊息了,所以我想應該是不是這些TDatable,TQuery 使用上的錯誤!!!!!!!!!!! (問題二)而且在本文中紅色部份,會各開啟LoginPrompt視窗一次,何解?????? 程式類容如下 (DLL)childform .........(略) procedure Tcus.FormCreate(Sender: TObject); begin try begin query1.Close; query1.DatabaseName := TDataBase(application.MainForm.FindComponent('PLEs')).DatabaseName; query1.CachedUpdates :=TRUE; query1.RequestLive := TRUE; query1.SQL.Clear; query1.SQL.Add('select * from business order by bus_id'); query1.open; if query1.RecordCount = 0 then begin bup.Enabled :=False; bdel.Enabled :=false; bbe.Enabled := false; baf.Enabled :=false; bleftd.Enabled := false; brightd.Enabled := false; end; end; ...........(略) ================================================================ mainform .................(略) procedure Tmainform.FormCreate(Sender: TObject); begin Application.OnHint := DisplayHint; ples.AliasName := 'aaaaa'; ples.DatabaseName := 'PLE'; ples.LoginPrompt := true; try ples.Open; ShowMessage('連線成功'); except ShowMessage('帳號密碼錯誤'); end; end; ..............(略) by DELPHI大菜鳥
jimmyxup6
一般會員


發表:1
回覆:1
積分:0
註冊:2003-05-05

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-05-30 01:36:22 IP:61.231.xxx.xxx 未訂閱
對不起.........打擾各位的時間了 再拜讀過http://delphi.ktop.com.tw/topic.php?topic_id=20690後 已經找到問題一的答案了.... 得知query1.DatabaseName := TDataBase(application.MainForm.FindComponent('PLEs')).DatabaseName; 紅色部份應指定為PLEs:TDatabase之AliasName or DatabaseName, 直接指定名稱即可,就不會有錯誤了.......但是我就產生了 問題三為何不行使用比較靈活的方式呢???也就是使用findcomponent獲取AliasName or Database呢 煩請各位先賢前輩教導......
系統時間:2024-05-18 12:14:20
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!