[FreeUser]

Возможно ли такое? Чтобы весь текст из memo можно было записать одной, пусть и длинной строкой?

[lmikle]

Memo1.Lines.Text

только там переводы строк будут (#13#10). Можно их вырезать или заменить на пробел.

[FreeUser]

Спасибо вам lmikle! Все проще, этот текст загоняем в Edit и он сам все делает.

[lmikle]

Не совсем. Он символы перевода строк не уберет, а покажет их как "квадратики". Если хочешь от них избавиться, то надо руками это сделать.

[Кодер]

либо в цикле в переменную занести каждую строчку

[:S.p.a.m.]

Уточните, вам нужно чтобы в memo было написанно одной строкой или чтобы содержимое memo кудато скопировать и чтобы оно было одной строкой?

В самом memo можно сделать чтобы было написанно в одну строку, правда Enter'ы останутся

Свойство WordWrap

[Phedor]

Сообщение от FreeUser

Возможно ли такое? Чтобы весь текст из memo можно было записать одной, пусть и длинной строкой?

Код:

var
  s: string;
begin
  s := StringReplace(Memo1.Lines.Text, #13, ' ', [rfReplaceAll]);
  s := StringReplace(s, #10, ' ', [rfReplaceAll]);
  ...
end;

[FreeUser]

Спасибо! Большое! Огроменное!