关于indy10中建立连接和发送消息，问个很简单，但很急的问题
请问如何用TidTCPClient和TIdServer建立连接并发送String消息？
如何发送Tstream？
虽然网上有demo，但是都不太能编译..
另外，TIdFTPClient中使用get函数，如何填写函数参数保存文件到本地？
大家帮帮忙~~~~这边项目要结束了....

[解决办法]

C/C++ code

void __fastcall TForm1::Button1Click(TObject *Sender){  IdTCPClient1->Port = 8000;  IdTCPClient1->Host = "127.0.0.1";  IdTCPClient1->Connect();  IdTCPClient1->IOHandler->WriteLn(Edit1->Text);  IdTCPClient1->Disconnect();}//---------------------------------------void __fastcall TForm1::FormCreate(TObject *Sender){  IdTCPServer1->DefaultPort = 8000;  IdTCPServer1->Active = true ;}//---------------------------------------void __fastcall TForm1::IdTCPServer1Execute(TIdContext *AContext){   Memo1->Lines->Add(AContext->Connection->IOHandler->ReadLn());}
[解决办法]
传送文件
IdTCPClient->IOHandler->LargeStream = True;
IdTCPClient->IOHandler->Write(FileStream, FileStream.Size);