Exception( TVarRec ...)要如何使用 |
|
答題得分者是：RaynorPao
|
|
BGman
初階會員   發表：28 回覆：85 積分：42 註冊：2003-01-10 發送簡訊給我 |
Help 的函式說明： __fastcall Exception(const AnsiString Msg, const System::TVarRec * Args, const int Args_Size);
void __fastcall TForm1::Button1Click(TObject *Sender)
{
char *mystring = "myError\0";
TVarRec *Arg;
Arg->VPChar = mystring;
try
{
throw Exception( "Hello", Arg->VPChar, 8);
}
catch(Exception &E)
{
ShowMessage( E.Message );
}
}
以上是我錯誤的程式，請問我該怎樣修正，謝謝！
|
|
RaynorPao
版主  發表：139 回覆：3622 積分：7025 註冊：2002-08-12 發送簡訊給我 |
引言:
Help 的函式說明： __fastcall Exception(const AnsiString Msg, const System::TVarRec * Args, const int Args_Size);
BGman 你好:
請參考以下的做法
------
-- 若您已經得到滿意的答覆，請適時結案!! -- -- 欲知前世因，今生受者是；欲知來世果，今生做者是 -- -- 一切有為法，如夢幻泡影，如露亦如電，應作如是觀 -- |
|
BGman
初階會員 發表：28 回覆：85 積分：42 註冊：2003-01-10 發送簡訊給我 |
|
|
RaynorPao
版主 發表：139 回覆：3622 積分：7025 註冊：2002-08-12 發送簡訊給我 |
引言: 帥喔！Bingo 原來是這樣子用的，可以請教一下你為什麼要 throw new Exception( "hello", &Arg, 8); new 出來的 Exception 會 catch 不到耶！BGman 你好: 呵呵~~不好意思，那是我雞婆，自己加上去的< > 因為以前沒有這樣寫過，所以想嘗試新的寫法< > 麻煩你自己把那個 new 給拿掉吧
------
-- 若您已經得到滿意的答覆，請適時結案!! -- -- 欲知前世因，今生受者是；欲知來世果，今生做者是 -- -- 一切有為法，如夢幻泡影，如露亦如電，應作如是觀 -- |
發表時間：2003-02-07 13:40:21
IP:211.22.xxx.xxx 未訂閱
系統時間：2024-04-29 9:47:08
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |