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

如果改變IntraWeb的PORT

答題得分者是:Fishman
WoodTiger
初階會員


發表:35
回覆:90
積分:25
註冊:2003-08-01

發送簡訊給我
#1 引用回覆 回覆 發表時間:2004-12-19 22:09:33 IP:218.108.xxx.xxx 未訂閱
一個StandAlone的IntraWeb程式,如何在運行時更改其偵聽端口(port),即ServerController的port屬性,或在程式啓動時在由某ini文件指定的port上進行偵聽。 請賜教,謝謝。
------
-=-=-=-=-=-=-=-=-=-=-=
Eveything as your wish.
WoodTiger
初階會員


發表:35
回覆:90
積分:25
註冊:2003-08-01

發送簡訊給我
#2 引用回覆 回覆 發表時間:2004-12-20 10:28:20 IP:60.191.xxx.xxx 未訂閱
通過對IntraWeb所帶的demo中的customStandalone查看,發現有這麽一段程式: procedure TFormCustom.FormCreate(Sender: TObject); begin memoLog.Lines.Add('Server started'); memoLog.Lines.Add('Listening on port: ' IntToStr(GServerController.Port)); memoLog.Lines.Add(''); end; 但GServerController是由什麽地方來的,卻找不到說明,而且在我自己的程式中引用GServerController卻不能使用,這是爲什麽,請賜教。
------
-=-=-=-=-=-=-=-=-=-=-=
Eveything as your wish.
WoodTiger
初階會員


發表:35
回覆:90
積分:25
註冊:2003-08-01

發送簡訊給我
#3 引用回覆 回覆 發表時間:2004-12-20 10:42:08 IP:60.191.xxx.xxx 未訂閱
GServerController已經找到了,只要加上uses IWGlobal;就可以了。
------
-=-=-=-=-=-=-=-=-=-=-=
Eveything as your wish.
WoodTiger
初階會員


發表:35
回覆:90
積分:25
註冊:2003-08-01

發送簡訊給我
#4 引用回覆 回覆 發表時間:2004-12-20 10:49:06 IP:60.191.xxx.xxx 未訂閱
只對 GServerController:=5555; 好像沒有任何效果,並不能改變port,不知道應該如果設置,請賜教。
------
-=-=-=-=-=-=-=-=-=-=-=
Eveything as your wish.
Fishman
尊榮會員


發表:120
回覆:1949
積分:2163
註冊:2006-10-28

發送簡訊給我
#5 引用回覆 回覆 發表時間:2004-12-20 13:28:37 IP:210.65.xxx.xxx 未訂閱
Hi WoodTiger,    在 ServerController 的 OnCreate 事件
procedure TIWServerController.IWServerControllerBaseCreate(
  Sender: TObject);
begin
    Description := '品管系統 - 快取碼設定(UWEB_QSM001)';
    Port := 6001;
    BoundIP := '192.168.0.100';
end;
---------------------------------- 小弟才疏學淺,若有謬誤尚請不吝指教 ----------------------------------
------
Fishman
WoodTiger
初階會員


發表:35
回覆:90
積分:25
註冊:2003-08-01

發送簡訊給我
#6 引用回覆 回覆 發表時間:2004-12-20 16:08:07 IP:60.191.xxx.xxx 未訂閱
引言: Hi WoodTiger, 在 ServerController 的 OnCreate 事件
procedure TIWServerController.IWServerControllerBaseCreate(
  Sender: TObject);
begin
    Description := '品管系統 - 快取碼設定(UWEB_QSM001)';
    Port := 6001;
    BoundIP := '192.168.0.100';
end;
< face="Verdana, Arial, Helvetica"> 非常感謝,這樣就可以用一個ini文件來指定port了。 那麽我還想問一下,能否在運行過程中改變port呢?
------
-=-=-=-=-=-=-=-=-=-=-=
Eveything as your wish.
Fishman
尊榮會員


發表:120
回覆:1949
積分:2163
註冊:2006-10-28

發送簡訊給我
#7 引用回覆 回覆 發表時間:2004-12-20 16:29:35 IP:210.65.xxx.xxx 未訂閱
Hi WoodTiger,    Sorry !! 沒試過ㄝ !!    不過似乎無法於程式已經執行時期再更改 Port,況且一再更改 Port 是否會造成前端困擾?     ---------------------------------- 小弟才疏學淺,若有謬誤尚請不吝指教 ----------------------------------
------
Fishman
系統時間:2024-07-05 4:09:49
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!