在自己的Class 中使用 TServerSocket

發文回覆瀏覽次數：746

推到 Plurk!

推到 Facebook!

在自己的Class 中使用 TServerSocket

尚未結案

stanley001
一般會員

發表：1
回覆：0
積分：0
註冊：2004-12-07

發送簡訊給我

#1 引用回覆回覆

發表時間：2005-06-02 10:20:26

IP:60.248.xxx.xxx 未訂閱

各位先進，小弟現在遇到一個問題，就是我在自已的 Class 中 new 一個 TServerSocket 但是在寫 OnClientRead function 時遇到一個問題，就是型別無法轉過去希望有經驗的人能幫忙解答程式片斷如下: myServer = new TServerSocket(myServer); myServer->Port = DEFAULT_PORT CardNum; myServer->ServerType = stNonBlocking; myServer->OnClientRead = &mySocketRead; myServer->Open(); complie 後出現如下訊息 [C Error] ViewEncDec.cpp(249): E2034 Cannot convert 'void (_fastcall *)(TObject *,TCustomWinSocket *)' to 'void (_fastcall * (_closure )(TObject *,TCustomWinSocket *))(TObject *,TCustomWinSocket *)' 因為我想把這個Class 獨立使用，所以放在 TForm 的function 可能就不適用了，謝謝您的解答。

andychang1690
資深會員

發表：20
回覆：694
積分：442
註冊：2003-03-14

發送簡訊給我

#2 引用回覆回覆

發表時間：2005-06-02 23:38:18

IP:221.169.xxx.xxx 未訂閱

引言:
各位先進，
小弟現在遇到一個問題，就是我在自已的 Class 中 new 一個 TServerSocket
但是在寫 OnClientRead function 時遇到一個問題，就是型別無法轉過去
希望有經驗的人能幫忙解答
程式片斷如下:
    myServer = new TServerSocket(myServer);
    myServer->Port = DEFAULT_PORT   CardNum;
    myServer->ServerType = stNonBlocking;
    myServer->OnClientRead = &mySocketRead;為何加上&去掉看看
    myServer->Open();
complie 後出現如下訊息
[C   Error] ViewEncDec.cpp(249): E2034 Cannot convert 'void (_fastcall *)(TObject *,TCustomWinSocket *)' to 'void (_fastcall * (_closure )(TObject *,TCustomWinSocket *))(TObject *,TCustomWinSocket *)'    因為我想把這個Class 獨立使用，所以放在 TForm 的function 可能就不適用了，謝謝您的解答。
請參考！

Andy Chang

------
Andy Chang

系統時間：2024-06-29 23:02:57

聯絡我們 | Delphi K.Top討論版

本站聲明

1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！