實作應用程式伺服器 Callback function |
|
|
|
jow
尊榮會員   發表：66 回覆：751 積分：1253 註冊：2002-03-13 發送簡訊給我 |
實作應用程式伺服器 Callback function (內含Source Code 及 執行檔)
執行步驟 1. 執行 scktsrvr.exe 2. 執行 TestSrv.exe(至少一次, 用以登錄主機) 3.執行 TestClnt.exe(可執行多個) 程式簡單說明: 1.由 TestClnt.exe 呼叫 TestSrv.exe 所定義的服務函式(TEST1, TEST2) 2.在 TestSrv.exe 執行服務函式的過程中, 回呼 在TestClnt.exe 中實作的 Callback 介面 3. 在 (2) 中TestClnt.exe 所實作的Callback 介面, 其介面規格是由 Server 端所宣告的 實作一點小東西, 與大家分享.... 
|
|
taishyang
站務副站長  發表：377 回覆：5490 積分：4563 註冊：2002-10-08 發送簡訊給我 |
感謝分享 ^_^
若有BCB版本就更棒了,哈 但在小弟的電腦上Win7 執行TestClnt會出現無法連線, 因為目標電腦拒絕連線(10061) on API 'connect的訊息 ===================引 用 jow 文 章=================== 實作應用程式伺服器 Callback function (內含Source Code 及 執行檔) 執行步驟 1. 執行 scktsrvr.exe 2. 執行 TestSrv.exe(至少一次, 用以登錄主機) 3.執行 TestClnt.exe(可執行多個) 程式簡單說明: 1.由 TestClnt.exe 呼叫 TestSrv.exe 所定義的服務函式(TEST1, TEST2) 2.在 TestSrv.exe 執行服務函式的過程中, 回呼 在TestClnt.exe 中實作的 Callback 介面 3.在(2) 中TestClnt.exe 所實作的Callback 介面, 其介面規格是由 Server 端所宣告的 實作一點小東西, 與大家分享....
|
|
jow
尊榮會員 發表：66 回覆：751 積分：1253 註冊：2002-03-13 發送簡訊給我 |
|
|
taishyang
站務副站長 發表：377 回覆：5490 積分：4563 註冊：2002-10-08 發送簡訊給我 |
|
|
jow
尊榮會員 發表：66 回覆：751 積分：1253 註冊：2002-03-13 發送簡訊給我 |
我放到三台不同的機器上測試都OK
包括跨越區域網路也沒問題 真奇怪??? 能否請其他的人回應執行狀況 我再將 TSocketConnection 的一些屬性 拉到 TTestClnt.exe 主畫面來設定 以下是目前的屬性值 [code delphi] SocketConnection1.Host := '127.0.0.1'; SocketConnection1.Port := 211; SocketConnection1.ServerName := 'TestSrv.ITestClnt'; SocketConnection1.SupportCallbacks := True; [/code] ^_^ 新增 HOST, POST 設定 http://delphi.ktop.com.tw/download.php?download=upload/4b584704df25f_TEST_E002.zip
編輯記錄
jow 重新編輯於 2010-01-21 20:23:48， 註解 無‧
|
|
cobraliu
中階會員 發表：15 回覆：75 積分：83 註冊：2007-11-22 發送簡訊給我 |
|
|
jow
尊榮會員 發表：66 回覆：751 積分：1253 註冊：2002-03-13 發送簡訊給我 |
|
|
taishyang
站務副站長 發表：377 回覆：5490 積分：4563 註冊：2002-10-08 發送簡訊給我 |
|
|
2007
中階會員 發表：54 回覆：90 積分：98 註冊：2008-08-12 發送簡訊給我 |
是啊!!! 有BCB版本就更棒!! (y)
===================引 用 taishyang 文 章=================== 感謝分享 ^_^ 若有BCB版本就更棒了,哈 但在小弟的電腦上Win7 執行TestClnt會出現無法連線, 因為目標電腦拒絕連線(10061) on API 'connect的訊息 ===================引 用 jow 文 章=================== 實作應用程式伺服器 Callback function (內含Source Code 及 執行檔) 執行步驟 1. 執行 scktsrvr.exe 2. 執行 TestSrv.exe(至少一次, 用以登錄主機) 3.執行 TestClnt.exe(可執行多個) 程式簡單說明: 1.由 TestClnt.exe 呼叫 TestSrv.exe 所定義的服務函式(TEST1, TEST2) 2.在 TestSrv.exe 執行服務函式的過程中, 回呼 在TestClnt.exe 中實作的 Callback 介面 3.在(2) 中TestClnt.exe 所實作的Callback 介面, 其介面規格是由 Server 端所宣告的 實作一點小東西, 與大家分享....
|
|
jow
尊榮會員 發表：66 回覆：751 積分：1253 註冊：2002-03-13 發送簡訊給我 |
最近找到的這一篇文章極具參考價值
對於想用 Interafce 相關技術作為開發基礎的人 可以參考看看 http://www.informit.com/articles/article.aspx?p=130494 ^_^ |
|
GrandRURU
站務副站長 發表：240 回覆：1680 積分：1874 註冊：2005-06-21 發送簡訊給我 |
|
|
way888
初階會員 發表：32 回覆：76 積分：36 註冊：2005-05-31 發送簡訊給我 |
|
|
shioulo
一般會員  發表：1 回覆：5 積分：1 註冊：2002-05-30 發送簡訊給我 |
|
|
digitraveler
初階會員 發表：89 回覆：91 積分：46 註冊：2005-06-01 發送簡訊給我 |
小弟 bcb5, bcb6, delphi7 三個工具下的 bin 目錄中都有 scktsrvr.exe 說....
===================引 用 taishyang 文 章=================== 挖,BCB6裡面沒有看到scktsrvr.exe@@ ===================引 用 jow 文 章=================== 因為測試程式中使用了 TSocketConnection 所以要先將 ..\Delphi\bin\scktsrvr.exe 先執行起來 呵! 簡單的測試程式, 使用起來問題還不少... >.<"' ===================引 用 cobraliu 文 章=================== 系統：XP SP3、D7 登入User：電腦系統管理者 測試方式：先執行TestSrv.exe,再執行TestClnt.exe
編輯記錄
|
發表時間：2010-01-21 12:27:50
IP:112.104.xxx.xxx 未訂閱
附加檔案：
系統時間：2024-04-29 14:58:46
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |