怎样发送一个jpg流或图片给局域网上所有用户

Question

广播最好只是向所有学生机发送一个：来接收图片 的消息
学生机接到这个消息主动连接到老师机子上完成图片的接收
学生机用cs，老师机用ss

Answer 1

来接受图片的消息要你自己定义啊，比如定义为‘get_pic’。当学生机接收到这样的消息后，就自动连接服务器~~~~我没有冰河的源程序，但是有其图片获取与发送的源程序
我也有广播的源程序，问题在于，广播的我找得到，但是，发送图片的，黄鑫写的那个程序，我不知道放在哪里了。也忘记在哪里下的了：）

Answer 2

谢谢rh哥
你能把广播的源程序给我一份吗?
e-mail;[email protected]

Answer 3

　回复人：rh(强硬的毛主席万岁！伟大的周总理万岁！)　(2001-4-18 19:54:00)  得100分 
//利用udp协议发消息：
//首先找到广播地址：
//1~126.255.255.255  (A类网广播地址）
//128~191.XXX.255.255 (B类网广播地址）
//192~254.XXX.XXX.255 (C类网广播地址）
//两个定义：
//LocalIP:      String;
//BroadCastIP:  String;//广播地址procedure TMainForm.SetBroadCastIp;
var
  i,j,iHead:Integer;
  sHead,s:String;
  ai:array [1..3] of integer;
begin
  j:=1;
  for i:=0 to Length(LocalIP) do
  begin
    if LocalIP[i]='.' then
    begin
      ai[j]:=i;
      Inc(j);
    end;
    if j>3 then break;
  end;
  sHead:=Copy(LocalIp,1,ai[1]-1);
  iHead:=StrToInt(sHead);
  if iHead<128 then  //A类网
  begin
    BroadCastIP:=sHead+'.255.255.255';
  end else
  begin
  if iHead<192 then //B类网
  begin
    s:=Copy(LocalIP,1,ai[2]-1);
    BroadCastIP:=s+'.255.255';
  end else  //C类网
  begin
    s:=Copy(LocalIP,1,ai[3]-1);
    BroadCastIP:=s+'.255';
  end;
  end;
end;procedure TMainForm.SendMsg(const IP, Msg: String);//这是利用udp向IP发送信息的过程。发广播的话，把BroadCastIP的值赋予IP
begin
  MsgStream.Position:=0;//MsgStream定义如下：MsgStream:  TMemoryStream;
  MsgStream.Size:=0;
  MsgStream.Write(Msg[1],Length(Msg));
  NMUDP.RemoteHost:=IP;
  NMUDP.SendStream(MsgStream);
end;有这两个函数，就可以发广播啦。
 

Answer 4

你已经给分了啊？第一个代码在这里下载：http://www.guanqian.com/starkun/sdada/src/Screensp.zip