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

不解:A call to an OS function failed

答題得分者是:pceyes
TTS
初階會員


發表:72
回覆:66
積分:27
註冊:2003-05-06

發送簡訊給我
#1 引用回覆 回覆 發表時間:2008-09-19 20:45:26 IP:122.100.xxx.xxx 訂閱
小弟開了一個新的專案, 然後只拉了一個Form 然後在該Form上:

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;

private
{ Private declarations }
protected
procedure WndProc(var Message : TMessage); override;
public
{ Public declarations }
end;


procedure TForm1.WndProc(var Message : TMessage);
begin

end;

就這樣編譯會過, 但是一Run起來就出現:
Exception EOSError in module rtl60.bpl at 00015286
A call to an OS function failed.

試驗過要是沒有 WndProc 就可以正常的Run, 想請問小弟是少了什麼東西嗎?
pceyes
尊榮會員


發表:70
回覆:657
積分:1140
註冊:2003-03-13

發送簡訊給我
#2 引用回覆 回覆 發表時間:2008-09-19 20:53:02 IP:220.141.xxx.xxx 訂閱

===================引 用 TTS 文 章===================
小弟開了一個新的專案, 然後只拉了一個Form 然後在該Form上:

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;

private
{ Private declarations }
protected
procedure WndProc(var Message : TMessage); override;
public
{ Public declarations }
end;


procedure TForm1.WndProc(var Message : TMessage);
begin

inherited Wndproc(Message);
end;

就這樣編譯會過, 但是一Run起來就出現:
Exception EOSError in module rtl60.bpl at 00015286
A call to an OS function failed.

試驗過要是沒有 WndProc 就可以正常的Run, 想請問小弟是少了什麼東西嗎?
------
努力會更接近成功
TTS
初階會員


發表:72
回覆:66
積分:27
註冊:2003-05-06

發送簡訊給我
#3 引用回覆 回覆 發表時間:2008-09-19 22:09:16 IP:122.100.xxx.xxx 訂閱
感 謝大大的回答 
測試結果可以解決問題
不過小弟不太了解問題的發生的原因, 是否可以稍做回答, 或是可以介紹參考文章

=感激不盡=
pceyes
尊榮會員


發表:70
回覆:657
積分:1140
註冊:2003-03-13

發送簡訊給我
#4 引用回覆 回覆 發表時間:2008-09-19 22:44:54 IP:220.141.xxx.xxx 訂閱
Understanding the message-handling system
http://www.podgoretsky.com/ftp/docs/Delphi/D5/dg/messages.html
------
努力會更接近成功
系統時間:2024-04-24 17:22:32
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!