void __fastcall TForm1::SandToAll(AnsiString Text)
{
   TList *List;
   TIdContext *AContext;
   int Loop;
   List = IdTCPServer1->Contexts->LockList() ;

   try
    {
    for(Loop =0;Loop<List->Count;Loop++)
        {
          AContext = (TIdContext *) List->Items[Loop];
          AContext->Connection->IOHandler->WriteLn(Text);
        }
    }
    __finally
    {
       IdTCPServer1->Contexts->UnlockList();
    }
}
//---------------------------------------------------------------------------
void __fastcall TForm1::IdTCPServer1Execute(TIdContext *AContext)
{

    AnsiString Temp ;
    Temp = AContext->Connection->IOHandler->ReadLn();
    SandToAll(Temp);
}
이렇해 해서 써버를 만들었습니다 이것을 실행 시켜서 Telnet에서 자기 자신 아이티로 들어가서 창을 두개 띄어 놓고 대화를 하면 영문은 잘나오는데 한글은 ??이런식으러 나옵니다 이유가 무엇인지 알수가 없네요