Как из Tstream перевести в строку?

[FessAectan]

Привет All, подскажите пожалста как можно перевести поток AData в строку?
Вот код события компонента IdUDPServer мне нужно отобразить принятые данные ... например в Label

void __fastcall TForm1::IdUDPServer1UDPRead(TObject *Sender,
TStream *AData, TIdSocketHandle *ABinding)
{

}

Спасибо.

 

[zubr]

У TStream есть свойство Size и метод Read - создаешь буфер размером Size и читаешь в него методом Read.

 

[FessAectan]

Если не сложно напиши сам код )))