Newsgroups : Borland : borland.public.delphi.internet.winsock : 2007 Dec : Re: HTTP Content Question
| Subject: | Re: HTTP Content Question |
| Posted by: | "Remy Lebeau (TeamB)" (no.spam@no.spam.com) |
| Date: | Fri, 21 Dec 2007 10:05:54 |
"Tom Russell" <tom.russell@nospam.com> wrote in message
news:476bf23e$1@newsgroups.borland.com...
> I want to present it in a memo which I am able to do, however
> it just shows up as a single line in the memo.
That is because you are adding the data as a single line to your
TStringList. Use the Text property instead of the Add() method. That way,
line breaks get parsed, ie:
procedure TForm1.AdvGlowButton1Click(Sender: TObject);
var
MyString: TStringList;
begin
MyString := TStringList.Create;
try
MyString.Text := IdHTTP1.Get(Edit1.Text);
AdvMemo1.Lines.AddStrings(MyString);
finally
MyString.Free;
end;
end;
Gambit