請問如何將serversocket斷線？？ |
|
答題得分者是：Stallion
|
|
xiaolan0125
一般會員   發表：10 回覆：9 積分：3 註冊：2005-01-13 發送簡訊給我 |
|
|
Stallion
版主  發表：52 回覆：1600 積分：1995 註冊：2004-09-15 發送簡訊給我 |
你是用 TServerSocket與TClientSocket吧！？
Client與Server斷線後，Server可以在OnClientDisconnet收到訊息。
這對寫一對一通信程式沒問題，如果你是寫像聊天室那種東西，最後做個Struct串列來記錄每個連線進來的使用者，這樣在送訊息與離線時，才能確認是那個使用者。 -----------------------------------------------
Creation is the fundation of promotion.
|
|
xiaolan0125
一般會員 發表：10 回覆：9 積分：3 註冊：2005-01-13 發送簡訊給我 |
我不是寫聊天室的，我讓server斷線是這樣寫： void __fastcall TForm1::Button2Click(TObject *Sender)
{
ClientSocket1->Active=false;
ServerSocket1->Active=false;
} 然後斷線後會： void __fastcall TForm1::ServerSocket1ClientDisconnect(TObject *Sender,
TCustomWinSocket *Socket)
{
Label3->Caption="通話時間";
start1=Now();
Timer1->Enabled=true;
StatusBar1->Panels->Items[0]->Text="通話中...";
MediaPlayer1->Stop();
MediaPlayer1->Close();
} 以上斷線後會做的事沒一件有去做~~
而client的斷線都沒問題~~
我要怎麼知道到底有沒有斷線呀？
|
|
Stallion
版主 發表：52 回覆：1600 積分：1995 註冊：2004-09-15 發送簡訊給我 |
|
|
xiaolan0125
一般會員 發表：10 回覆：9 積分：3 註冊：2005-01-13 發送簡訊給我 |
|
|
Stallion
版主 發表：52 回覆：1600 積分：1995 註冊：2004-09-15 發送簡訊給我 |
|
|
xiaolan0125
一般會員 發表：10 回覆：9 積分：3 註冊：2005-01-13 發送簡訊給我 |
|
|
Stallion
版主 發表：52 回覆：1600 積分：1995 註冊：2004-09-15 發送簡訊給我 |
在這個event關掉！
void __fastcall TForm1::ServerSocket1ClientDisconnect(TObject Sender, TCustomWinSocket *Socket)
{
Label3->Caption="通話時間";
start1=Now();
Timer1->Enabled=true;
StatusBar1->Panels->Items[0]->Text="通話中...";
MediaPlayer1->Stop();
MediaPlayer1->Close();
ServerSocket1.Close; // add code here
} -----------------------------------------------
Creation is the fundation of promotion. 發表人 - stallion 於 2005/05/18 21:35:48 發表人 - stallion 於 2005/05/18 21:39:30
|
|
xiaolan0125
一般會員 發表：10 回覆：9 積分：3 註冊：2005-01-13 發送簡訊給我 |
發表時間：2005-05-16 23:07:13
IP:219.68.xxx.xxx 未訂閱
系統時間：2024-05-03 13:47:05
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |