我要設計一個按鈕去關閉整個程式， 可是卻在按下按鈕之後會出現下面的錯誤訊息 按下確定後，畫面就停在那邊不動，如果按下Run > Program Reset 又會出現下面的訊息 按鈕的程式我是寫這樣的 procedure TzztsFrm.Button2Click(Sender: TObject); begin Close; end; (我用的是Delphi 5 和MS SQL 及Windows 98se) 請問這樣是哪邊出錯了？ 上面的錯誤訊息是代表什麼？

您好﹗    此Close的Form是Auto-Create Form還是Available Form﹖ 另外﹐檢查看看此Form的OnClose事件中是否有其它的程式碼﹖    ================================= 有空來瞅瞅我﹗因為我是您的朋友﹐有您真好﹗ ================================

------
忻晟

引言: 您好﹗ 此Close的Form是Auto-Create Form還是Available Form﹖ 另外﹐檢查看看此Form的OnClose事件中是否有其它的程式碼﹖ ================================= 有空來瞅瞅我﹗因為我是您的朋友﹐有您真好﹗ ================================

恩...只有一個From,所以From是設在Auto-Create Form裡面 因為我有用到ADOConnection元件,所以在OnClose中有寫一些東西 procedure TzztsFrm.FormClose(Sender: TObject; var Action: TCloseAction); begin mlbscADOCon.Connected := False; end; procedure TzztsFrm.FormCreate(Sender: TObject); begin mlbscADOCon.ConnectionString := 'xxxxxxx'; mlbscADOCon.Connected := True; end; 那各Form裡面就大約寫到上面這些內容， 跑其他時程式沒有問題，就是我要關閉畫面的時候 就會出現上上面的錯誤訊息， 請問會是因為我作業系統是用Windows 98se的關係嗎？

您好﹗    從您的貼文來看﹐OnClose事件中的程式碼應不會有問題﹒ 不敢确定是不是98的問題﹐您可以重新建立一個測試的Project﹐只在Form1中加一個Button﹐然后再其OnClick中使用Form1.Close;的方法將其關閉﹐看看是否也會出現這樣的現象﹐如果也是這樣的話﹐可能就是98的問題了﹒    另外﹐再看看OnCloseQuery事件中是否有相關控制的程式碼﹖    ================================= 有空來瞅瞅我﹗因為我是您的朋友﹐有您真好﹗ ================================

------
忻晟