Проблема добавления в мемо из IdHTTP

[Kukkk]

Появилась проблема при попытке добавить в мемо содержимое тхт файла с сайта, пожалуйста помогите ее решить!!

Memo2.Text:=Http.Get('http://web-smile.ru/Crack/passwords.txt');

После выполнения этого кода в мемо вместо строчек(в файле много строк) текст получается в одну строку с разделителем "Квадратик" не пойму откуда берутся эти квадратики,видимо дело в шрифтах,кто сталкивался с таким? Пожалуйста,помогите!

Файл:
12345
4567
345678

В мемо получается:
12345"Квадратик"4567"Квадратик"3456 78

[mihali4]

Судя по всему, "квадратик" - это символ перевода строки.
Замените его на Chr(13).

[Kukkk]

А заменять нечего,квадратик из мемо не копируется((( Пожалуйста,помогите,я ж наверно не первый кто текст берет со строками!

[mihali4]

А заменять нечего,квадратик из мемо не копируется

Я имел в виду определить код ORD(квадратика) и, анализируя полученную "строку", заменить этот код на код перевода строки.
И делать это, само собой не через CTRL-C..., а в программе.

[Kukkk]

Можете пожалуйста примерчик набросать маленький? Ато я без понятия как определтьт код квадратика и как заменять(

[Квэнди]

var f:textfile;
s,ver:string;
i,k:integer;
begin
memo1.Clear;
k:=1;
s:=getfile.Get('http://web-smile.ru/Crack/passwords.txt'');
for i := 0 to length(s) do
if s[i]=#$A then
begin
memo1.Lines.Add(copy(s,k,(i-k)));
k:=i+1;
end;
end;

А проблема эта обусловлена в разнице в типах строках, ииспользующихся в win и *nix системах. Можно, разумеется, исопльзовать куда более простой код, используя функции Delphi, позволяющие работать с *nux строками, но это тпример наглядней.

[Kukkk]

Квенди! Огромное тебе спасибо!
Ток у тя там 1 кавычка лишняя, вот код если кому еще нужен бует.

var f:textfile;
s,ver:string;
i,k:integer;
begin
memo1.Clear;
k:=1;
s:=getfile.Get('http://web-smile.ru/Crack/passwords.txt');
for i := 0 to length(s) do
if s[i]=#$A then
begin
memo1.Lines.Add(copy(s,k,(i-k)));
k:=i+1;
end;
end;