Работа с SOCKET.

#include <winsock2.h>
#include <stdio.h>
#include <windows.h>

int main(void)
{
   WSADATA wsadata;
   WSAStartup(MAKEWORD(2,0),&wsadata);
         SOCKET soc=socket(AF_INET,SOCK_STREAM,IPPROTO_TCP);
   struct sockaddr_in adrs;
   adrs.sin_family=AF_INET;
   adrs.sin_port=htons(4488);
   adrs.sin_addr.s_addr=htonl(INADDR_ANY);

bind(soc,(SOCKADDR*)&adrs),sizeof(adrs);
listen(soc,3);
}

DWORD WINAPI acceptFunc(LPVOID){
  SOCKET s2;
  int size=sizeof(sockaddr_in);
  HANDLE hClientThread;
  while(1){
    s2=accept(Form1->getSocket(),(sockaddr*)&Form1->getAddr_in(),&size);
    if(INVALID_SOCKET==s2){
      ...
}
        hClientThread=CreateThread(NULL,0,clientFunc,&s2,0,NULL);
        Form1->inc();
        Form1->servLog->Lines->Add("Client connected to "+IntToStr(s2)+" socket.");
        Form1->bar->Panels[0].operator[](3)->Text="Total users count:"+IntToStr(Form1->getUsers());
    }
//  return 0;
}

DWORD WINAPI acceptFunc(LPVOID){
  SOCKET s2;
  HANDLE hClientThread;
  while(1){
    s2=accept(/*твой сокет*/,/*твоя структурка*,...);
    if(INVALID_SOCKET==s2){
      ...
    }
    hClientThread=CreateThread(NULL,0,clientFunc,&s2,0,NULL);
    return 0;
}
DWORD WINAPI clientFunc(LPVOID s){
  SOCKET s2=*(SOCKET*)s;
  char mess[256];
  int rez;
  while(1){
    rez=recv(s2,mess,255,0);
    if(SOCKET_ERROR==rez){
     ...
    }
  }
  return 0;
}

HANDLE hThread;
hThread=CreateThread(NULL,0,acceptFunc,NULL,0,NULL);

#include <winsock2.h>
#include <stdio.h>



int main(void)
{
        printf("#### KLIENT ####\n\n\n");
    WSADATA wsd;
    struct hostent *hst;
    SOCKET s;
    char buf[1024],HOST_NAME[1024];
    strcpy(HOST_NAME,"127.0.0.1");


int er=WSAStartup(MAKEWORD(2,0),&wsd);
    if(er!=0){
        printf("Error:WSAStartup.\n\a");
    }
    else{
    printf("WSAStartup... ok\n");
        }

int err=(s=socket(AF_INET,SOCK_STREAM,IPPROTO_TCP));
    if(err==SOCKET_ERROR){
        printf("Error:SOCKET ERROR\n\a");
        }
    else{
        printf("SOCKET... ok\n");
        }
struct sockaddr_in adr;
adr.sin_family=AF_INET;
adr.sin_addr.s_addr=inet_addr(HOST_NAME);
adr.sin_port=htons(5050);

if(adr.sin_addr.s_addr==INADDR_NONE)
    {
         hst=gethostbyname(HOST_NAME);
    }


if((connect(s,(SOCKADDR*)&adr,sizeof(adr)))==SOCKET_ERROR){
        printf("Error:Connect failed!\n\a");
      }
        scanf("%s",&buf);
        send(s,buf,strlen(buf),0);

}

#include <winsock2.h>
#include <windows.h>
#include <stdio.h>

int main(void)
{
int iSize,s2;
char buf[256];
SOCKET s;
WSADATA wsd;
                printf("#### SERVER ####\n\n");
    int er=WSAStartup(MAKEWORD(2,2),&wsd);

if(er!=0){
            printf("Error WSAStartup\n\a");
          }
else{
            printf("WSAStartup... ok\n");
     }

if((er=(s=socket(AF_INET,SOCK_STREAM,IPPROTO_TCP)))==SOCKET_ERROR){
            printf("Socket error!\n\a");
    }
else{
            printf("SOCKET... ok\n");
    }
 struct sockaddr_in adr;
 adr.sin_family=AF_INET;
 adr.sin_addr.s_addr=htonl(INADDR_ANY);
adr.sin_port=htons(5050);

if((bind(s,(SOCKADDR*)&adr,sizeof(adr)))==SOCKET_ERROR)
    {
        printf("Error bind!\n\a");
    }
else
    {
        printf("bind... ok\n");
        listen(s,3);
        printf("listen... ok\n");
    }
iSize=sizeof(adr);

     while(1){
            accept(s,(SOCKADDR*)&adr,&iSize);
         }
     while(1){
            recv(s,buf,strlen(buf),0);
            printf("%s",buf);
         }

}

[SIZE=2]SOCKET sChild;[/SIZE]
 
[SIZE=2][COLOR=#0000ff]while[/COLOR][/SIZE][SIZE=2](1)[/SIZE]
[SIZE=2]{[/SIZE]
[SIZE=2]  sChild = accept(s,(SOCKADDR*)&adr,&iSize);[/SIZE]
[SIZE=2][COLOR=#0000ff]  if[/COLOR][/SIZE][SIZE=2](sChild != INVALID_SOCKET ) [/SIZE][SIZE=2][COLOR=#0000ff]break[/COLOR][/SIZE][SIZE=2];[/SIZE]
[SIZE=2]}[/SIZE]
[SIZE=2][COLOR=#0000ff]while[/COLOR][/SIZE][SIZE=2](1)[/SIZE]
[SIZE=2]{[/SIZE]
[SIZE=2]  recv(sChild,buf,strlen(buf),0);[/SIZE]
[SIZE=2]  printf([/SIZE][SIZE=2][COLOR=#800000]"%s"[/COLOR][/SIZE][SIZE=2],buf);[/SIZE]
[SIZE=2]}[/SIZE]

[SIZE=2][COLOR=#0000ff]while[/COLOR][/SIZE][SIZE=2](1)[/SIZE]
[SIZE=2]{[/SIZE]
[SIZE=2]strcpy(buf, [/SIZE][SIZE=2][COLOR=#800000]""[/COLOR][/SIZE][SIZE=2]);[/SIZE]
[SIZE=2][COLOR=#0000ff]int[/COLOR][/SIZE][SIZE=2] ret = recv(sChild ,buf , 256, 0);[/SIZE]
[SIZE=2]buf[ret] = [/SIZE][SIZE=2][COLOR=#800000]'\0'[/COLOR][/SIZE][SIZE=2];[/SIZE]
[SIZE=2]printf([/SIZE][SIZE=2][COLOR=#800000]"%s"[/COLOR][/SIZE][SIZE=2],buf);[/SIZE]
[SIZE=2]}[/SIZE]