各位大大好!小弟先向各位大大報告自己的程式碼：  

if (CheckListBox2->Count==0 && Socket->RemoteHost==Memo1->Lines[0].Text.SubString(1,Memo1->Lines[0].Text.Length()-2) )
  {
   CheckListBox2->Items->Add(Socket->RemoteHost);
   Memo1->Lines->Delete(0);
  }
else
    {
     for (i=0;iCount;i  )
        {
         if (Socket->RemoteHost==Memo1->Lines[i].Text.SubString (1,Memo1->Lines[i].Text.Length()-2))
           Memo1->Lines->Delete(i);
        }
     CheckListBox2->Items->Add(Socket->RemoteHost);
    }
Label12->Caption=IntToStr(Memo1->Lines->Count);
Label2->Caption=IntToStr(CheckListBox2->Items->Count);
clientadd=clientadd 1;
 

小弟上列的程式碼是要做到當ServerSocket收到ClientSocket的連線時， 會自動加入CheckListBox2之中。當第一條Client加入時，沒有問題。 但是當第一條Client加入時，就會出現以下的錯誤… 「Access violation at address 00000000. Read of Address 00000000」 導致接下來Server無法正常收到Client的HostName。 請問各位大大，我該怎麼做呢?? 發表人 - Gemi0305 於 2003/09/19 14:36:55

引言: 各位大大好!小弟先向各位大大報告自己的程式碼：

if (CheckListBox2->Count==0 && Socket->RemoteHost==Memo1->Lines[0].Text.SubString(1,Memo1->Lines[0].Text.Length()-2) )
  {
   CheckListBox2->Items->Add(Socket->RemoteHost);
   Memo1->Lines->Delete(0);
  }
else
    {
     for (i=0;iCount;i  )
        {
         if (Socket->RemoteHost==Memo1->Lines[i].Text.SubString (1,Memo1->Lines[i].Text.Length()-2))
           Memo1->Lines->Delete(i);
        }
     CheckListBox2->Items->Add(Socket->RemoteHost);
    }
Label12->Caption=IntToStr(Memo1->Lines->Count);
Label2->Caption=IntToStr(CheckListBox2->Items->Count);
clientadd=clientadd 1;
 

小弟上列的程式碼是要做到當ServerSocket收到ClientSocket的連線時， 會自動加入CheckListBox2之中。當第一條Client加入時，沒有問題。 但是當第一條Client加入時，就會出現以下的錯誤… 「Access violation at address 00000000. Read of Address 00000000」 導致接下來Server無法正常收到Client的HostName。 請問各位大大，我該怎麼做呢??

chance 你好: 請參考以下的連結文章

我剛剛try過你的程式， 沒有發現問題... 可以兩個Client同時連線， 但我是在同一台電腦，可否再描述一下你的情況， 或是再測一下你的程式 國泰平安