multicast delphi7, xe6'da komutu tanımıyor

[must_sargin]

s.a arkadaşlar,
internette bulduğum multicast projesi delphi7 ile yazılmış mesaj gönderimi yapıyor.xe6'da projeyi açtığımda kod tanınmıyor hatası veriyor.hata veren kod bloğu

procedure TfrmMain.ClientIPMCastRead(Sender: TObject; AData: TStream;
ABinding: TIdSocketHandle);
var
Stream: TStringStream;
begin
Stream := TStringStream.Create('');
try
Stream.CopyFrom(AData, 0);
reReceive.Lines.Add(Stream.DataString);
finally
Stream.Free;
end;
reReceive.Perform(EM_SCROLLCARET, 0, 0);
end;

hata veren kod kısmı ise "Stream.CopyFrom(AData, 0);" verdiği hata " Main.pas(39): E2010 Incompatible types: 'TStream' and 'TIdBytes' "

acaba xe6'da farklı bir kodmu kullanmam gerekiyor. yardımlarınız için şimdiden teşekkürler.

[must_sargin]

s.a arkadaşlar,
sorunu kendim çözdüm. indy componenti yerine serversocket ve clientsocket componentlerini kullanarak istediğim olayı gerçekleştirdim.