有Winsock用实例学习的教程吗

Question

最近喜欢上了Winsock网络编程..想找一些关于Winsock网络编程方面的实例教程...自己也找了几个,但是...没有实例学习的快些!哪位有.可以给我个地址吗?

Answer 1

在网上搜搜delphi网络编程应该有好的例子。

Answer 2

网路编程也有很多种的啊  
发个网络编程 设计聊天室的例子 
参考一下。。
http://download.csdn.net/source/1446418

Answer 3

第二次使用C++BUILDER开发SOCKET通讯程序，工作完成收藏
我想通过网络向设备（led屏）iP:192.168.224.250 端口号：2929 
发送数据，比如发送unsigned char buf[1024]; 
中的数据， 
请问是用BCB中的 
        TClientSocket *ClientSocket1; 
        TServerSocket *ServerSocket1; 
        TUdpSocket *UdpSocket1; 
这三个用那个发送啊，如何发送？ 使用TClientSocket *ClientSocket1; 属性设置：1，Address:192.168.224.250 2,Port:2929//-----------------------------------------------使用ClientSocket完成了工作，代码贴出来以备以后使用，呵呵C/C++ code void __fastcall TMainFrm::FormCreate(TObject *Sender)
{
    TIniFile *ini;
ini=new TIniFile(".//SAS_Config.ini");
LedIp=ini->ReadString("infLED","LEDIP","192.168.224.250");
         ini->WriteString("infLED","LEDIP",LedIp);         COMx=ini->ReadInteger("infLED","端口",2929);
         ini->WriteInteger("infLED","端口",COMx);
         LEDIpPort=COMx;
delete ini;
  try
  {
     
 ClientSocket1->Active=false;
            ClientSocket1->Address=LedIp;
            //ClientSocket1->Host=LedIp;
            ClientSocket1->Port=LEDIpPort;
            //ClientSocket1->Open();
            ClientSocket1->Active=true;
  }
  catch(...)
  {
      //
  }
}
void sendbuf(unsigned char * buf,int bufIndex)
{
     try
        {
            //ClientSocket1->Close();
            //ClientSocket1->Active=false;
            //ClientSocket1->Address=LedIp;
            //ClientSocket1->Port=LEDIpPort;
            //ClientSocket1->Open();
            ClientSocket1->Active=true;
            ClientSocket1->Socket->SendBuf(buf,bufIndex);
            //ClientSocket1->Close();
        }
        catch(...)
        {
            //
        }
}
void __fastcall TMainFrm::ClientSocket1Read(TObject *Sender, TCustomWinSocket *Socket){
   ///客户端读取信息
 try
 {
  AnsiString Msg=Socket->ReceiveText();
  unsigned char buf[100];
    if(Msg.Length()<99)
    {
    strcpy(buf,Msg.c_str());
    String ss="";
    for(int i=0;i<Msg.Length();i++)
    {
      ss+=IntToHex(buf[i],2);
      ss+=",";
    }
    InfoLedEdt->Text=ss;
    }
    ///判断是不是自己发出的信息
    //  if(Msg!=Memo2->Lines->Strings[Memo2->Lines->Count-1])
    //  Memo2->Lines->Add(Msg);
 }
 catch(...)
 {
     //
 }
}
void __fastcall TMainFrm::ClientSocket1Connect(TObject *Sender, TCustomWinSocket *Socket){
 try
 {
 AnsiString Msg="连接成功-"  + Socket->RemoteHost +"[地址]" + Socket->RemoteAddress + "[端口]" + IntToStr(Socket->RemotePort);
 InfoLedEdt->Text=Msg;
 }
 catch(...)
 {
     //
 }
}void __fastcall TMainFrm::ClientSocket1Disconnect(TObject *Sender, TCustomWinSocket *Socket){
  AnsiString Msg="信息显示屏连接断开..." ;
  InfoLedEdt->Text=Msg;
}//------------------------------------------------引用 10 楼 songhtao 的回复:
ClientSocket在bcb2009中 
好像有问题，建议用indy的TIdTcpClient 
 TIdTcpClient怎么用啊，没有用过，给点提示可以吗？ 问题还是有的，就是显示屏如果不和计算机联网的话，会弹出来SOCKET error对话框，不爽，程序启动也比较慢。如何解决我还没有搞明白本文来自CSDN博客，转载请标明出处：http://blog.csdn.net/xjq2003/archive/2009/06/06/4248287.aspx