char HostName[80];
  LPHOSTENT lpHostEnt;
  struct in_addr addr[2];
  for (int i=0 ; i< 2; i++)
    memset(&addr[i], 0, sizeof(in_addr));
  if(gethostname(HostName, sizeof(HostName)) == SOCKET_ERROR)
  {
    MessageBox(NULL,"Can't getting local host name.","Error", MB_OK);
    return;
  }
  Edit3->Text = HostName;
  lpHostEnt = gethostbyname(HostName);
  if(!lpHostEnt)
  {
    MessageBox(NULL, "Yow! Bad host lookup.","Error", MB_OK);
    return;
  }
  for(int i=0; lpHostEnt->h_addr_list[i] != 0; i++)
  {
    memcpy(&addr[i], lpHostEnt->h_addr_list[i], sizeof(in_addr));
  }  Edit1->Text = inet_ntoa(addr[0]);  Edit2->Text = inet_ntoa(addr[1]);