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

如何將sever的hostname廣播給其它電腦

答題得分者是:RaynorPao
all
一般會員


發表:10
回覆:11
積分:4
註冊:2003-07-11

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-07-15 13:50:24 IP:61.64.xxx.xxx 未訂閱
各位大大: 請問一下,現在我取得了server的名稱,但是其它電腦並不知server是那一台,我要如何讓server將自己的名稱廣播出去讓其它電腦與之連線??
RaynorPao
版主


發表:139
回覆:3622
積分:7025
註冊:2002-08-12

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-07-15 14:16:10 IP:203.73.xxx.xxx 未訂閱
引言: 各位大大: 請問一下,現在我取得了server的名稱,但是其它電腦並不知server是那一台,我要如何讓server將自己的名稱廣播出去讓其它電腦與之連線??
all 你好: 試試看利用 Indy 元件 TIdUDPServer 的 Broadcast method 以下是範例程式碼 < class="code"> // Server 端,先在 Form1 上拉一個 IdUDPServer1 void __fastcall TForm1::Button1Click(TObject *Sender) { IdUDPServer1->DefaultPort=4000; IdUDPServer1->Active=true; IdUDPServer1->Broadcast("Server Name", 4000); IdUDPServer1->Active=false; } // Client 端,先在 Form1 上拉一個 IdUDPServer1 void __fastcall TForm1::FormCreate(TObject *Sender) { IdUDPServer1->DefaultPort=4000; IdUDPServer1->Active=true; } void __fastcall TForm1::FormDestroy(TObject *Sender) { IdUDPServer1->Active=false; } void __fastcall TForm1::IdUDPServer1UDPRead(TObject *Sender, TStream *AData, TIdSocketHandle *ABinding) { AnsiString sz; sz.SetLength(AData->Size); AData->Read(&sz[1], AData->Size); ShowMessage(sz); } -- Enjoy Researching & Developing -- 發表人 - RaynorPao 於 2003/07/15 14:41:55
------
-- 若您已經得到滿意的答覆,請適時結案!! --
-- 欲知前世因,今生受者是;欲知來世果,今生做者是 --
-- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 --
all
一般會員


發表:10
回覆:11
積分:4
註冊:2003-07-11

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-07-16 15:33:38 IP:61.218.xxx.xxx 未訂閱
謝謝你,我會了!! ^^
系統時間:2024-05-05 19:27:35
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!