請問諸位前輩: ClientSocket 如何能 BoardCast ? 即Loacl之 255, 例:192.168.1.255 Delphi 8 , 還有提供 ClientSocket 元件嗎? 謝謝!!

使用 TIdUDPClient 吧 設定 IdUDPClient1.Host := '192.168.1.255'; IdUDPClient1.BroadcastEnabled := True; 然後可以用 IdUDPClient1.Send('Send by Broadcast'); 來 Broadcast 在同網段的 TIdUDPServer 可在 OnUDPRead 這event 中取得message！

剛剛試了一下，廣播功能果然好用    在Form裡放上 idUdpServer及idUdpClient各一個 再放上 Memo1及Memo2 當做發送及接收訊息的顯示。    以下是測試廣播功能的Code  

 
procedure TForm1.IdUDPServer1UDPRead(Sender: TObject; AData: TStream;
  ABinding: TIdSocketHandle);
var
   DataStringStream: TStringStream;
begin
   DataStringStream := TStringStream.Create('');
   try
     DataStringStream.CopyFrom(AData, AData.Size);
     Memo2.Lines.Text  := DataStringStream.DataString;
   finally
     DataStringStream.Free;
  end;
end;    procedure TForm1.Button1Click(Sender: TObject);
begin
   idUdpServer1.DefaultPort := 4321; // 自己定義一個廣播用的接收Port
   idUdpServer1.BroadcastEnabled := True;
   idUdpServer1.Active  := True;
   idUdpClient1.Host := '192.168.1.255'; // 指向 BroatCast IP*，通常是將自己IP的最後數值改為 255
idUdpClient1.BroadcastEnabled := True;   
idUdpClient1.Broadcast(Memo1.Lines.Text,4321); // 後面的4321要和前面idUdpServer接收Port相同
end;

再進一步的測試，發現只有重點是二邊Port的設定要相同，而Client端要指向廣播位址，就可以廣播了。 至於用 idClient1.Send、idClient1.BoradCast 似乎沒差別，二個都都可以做到廣播的功能。 如果錯誤，請不吝指教。

謝謝諸位的回答. 如果要用 Indy 等其他元件. 這我原本就知道. 我自己也有個元件可 broadcast. 但我的需求是一定要用 ClientSocket 來執行 broadcast. 我有試過用 Polling 的方式來模擬,雖可做到類似 broadcast 的功能, 但不穩定. 希望能有高手, 指導如何才能使用 ClientSocket do broadcast. 萬分感謝!!

提問者您好:


以上回應是否已得到滿意的答覆？


若已得到滿意的答覆，請在一週內結案，否則請在一週內回覆還有什麼未盡事宜，不然，
將由版主(尚無版主之區域將由副站長或站長)採自由心證,選擇較合適之解答予以結案處理，
被選上之答題者同樣會有加分獎勵，同時發問者將受到扣 1 分的處分。不便之處，請見諒。


有問有答有結案，才能有良性的互動，良好的討論環境需要大家共同維護，感謝您的配合。

------
我是機器人,我不接受簡訊.