|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Перенос строк в TMemo
Здравствуйте!
У меня возникла небольшая проблема. После выполнения кода: str:=str1+#10+#13+str2; memo1.text:=str; В поле мемо не производится перенос строки, а только символы неверной кодировки. Что мне сделать чтобы организовать перенос строки? Помогите , пожалуйста |
#2
|
||||
|
||||
Цитата:
Код:
Memo1.Lines.Add('FirstString'); Memo1.Lines.Add('SecondString'); ... TAleD = class(TUser) public function HelpMe(ASubject, ARequest: String): String; function GiveMeExample(ASubject: String): TStringList; procedure WriteReview(APost: Integer; ADescription: TStringList); end; |
#3
|
|||
|
|||
Спасибо за помощь!
|
#4
|
||||
|
||||
Извините, не соглашусь. Прекрасно все отображается, никаких лишних символов - как вы их добились?
Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. |
#5
|
||||
|
||||
Цитата:
Код:
Memo1.Lines.Add("Ab"+#13+"de"); TAleD = class(TUser) public function HelpMe(ASubject, ARequest: String): String; function GiveMeExample(ASubject: String): TStringList; procedure WriteReview(APost: Integer; ADescription: TStringList); end; |
#6
|
||||
|
||||
Так
Код:
Memo1.Lines.Add("Ab"+#13+"de"); А вот так Код:
Memo1.Lines.Add('Ab'+#13#10+'de'); Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. Последний раз редактировалось Admin, 24.04.2009 в 11:43. |
#7
|
||||
|
||||
Цитата:
TAleD = class(TUser) public function HelpMe(ASubject, ARequest: String): String; function GiveMeExample(ASubject: String): TStringList; procedure WriteReview(APost: Integer; ADescription: TStringList); end; |