|
Internet Direct (Indy) Version 9.0.1 Beta
|
iPos := AStream.Position;
AStream.Position := 0;
while (AStream.Position < AStream.Size) do
begin
SData := TIdStream(AStream).ReadLn;
AForm.DataMemo.Lines.Add(SData);
end;
AStream.Position := iPos;