Форум: "Сети";
Текущий архив: 2003.03.31;
Скачать: [xml.tar.bz2];

Вниз

IdUDPServer вопрос   Найти похожие ветки 

← →
IronWit   (2003-02-06 15:21) [0]

очень глупый но...

IdUDPServer1UDPRead(Sender: TObject; AData: TStream;
ABinding: TIdSocketHandle);

как получить данные?

adata.readbuffer(buf,adata.Size);
выпадает с ошибкой.

Понятно, что какая то мелочь, но какая?

---

← →
neodiX   (2003-02-07 12:24) [1]

попробуй так:
procedure TClient.UDPServerUDPRead(Sender: TObject; AData: TStream;
ABinding: TIdSocketHandle);
var
DataStringStream: TStringStream;
s:string;
begin
try
DataStringStream := TStringStream.Create("");
DataStringStream.CopyFrom(AData, AData.Size);
s:=DataStringStream.DataString;
finally
DataStringStream.Free;
end;
end;
у меня работает...

---

Страницы: 1 вся ветка

Форум: "Сети";
Текущий архив: 2003.03.31;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.006 c