создание файла в мемо

[ВалекFCRK]

Создаю файл в блокноте с несколькими строками например:
19160077
фывфыв
чсмчсмчсм
чсмчсм
чсмчсмчсмчсмчсм
чсмчсмчсм
3
Сохраняю его в блокноте и загружаю через ftp на сервер, позже скачиваю его вмемо и открыва. Все как и должно быть по строкам как и создавалось.

А вот теперь я создаю файл такогоже содержания с помощью мемо вот так:

Memo1.Lines.Add(floattostr(m+1));
Memo1.Lines.Add(edit1.text);
Memo1.Lines.Add(edit5.text);
Memo1.Lines.Add(edit2.text);
Memo1.Lines.Add(edit3.text);
Memo1.Lines.Add(edit4.text);
case ComboBox1.Itemindex of
0:Memo1.Lines.Add('1');
1:Memo1.Lines.Add('2');
2:Memo1.Lines.Add('3');
3:Memo1.Lines.Add('4');
end;
Memo1.Lines.SaveToFile('111.txt');

ЗАгружа. этот файл также через ftp на сервер , открываю в мемо то все в одну строку.


http://server-kazan.narod.ru/111.txt

Вот так я скачиваю файл в мемо:

try
Memo1.Text:=utf8toansi(idHTTP1.Get( 'http://server-kazan.narod.ru/111.txt'));
except
Application.Messagebox('Îøèáêà ñîåäèíåíèÿ ñ èíòåðíåòîì','Ðóññêèå çà ÇÎÆ (Êàçàíü)', mb_iconWarning or mb_ok);
end;


Подскажите как создать файл чтобы он в мемо после скачивания отображался в несколько строк как и создавалось

[mihali4]

А теперь прочитайте, наконец, правила раздела "Общие вопросы Delphi" и поймете, почему тема закрыта, а вам влеплен штраф...