РАЗБИЕНИЕ ТЕКСТА НА ДВА ПОЛЯ Memo, Delphi

[kapiton]

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

Совсем не оптимально, особенно при работе с большим текстом - как идея ))

Спасибо,код вроде рабочий, только никак не удается понять одну маленькую штуку. в конце первого и второго полей появляются знаки препинания, а именно " и ! .
http://pixs.ru/showimage/10jpg_7510166_14129210.jpg

независимо от того, как располагался текст. в чем беда то.

[Step_UA]

Особо не тестил ... скорее всего остается последний символ

MaxPos-ChPos
//заменить на
MaxPos-ChPos+1

а также в условии окончания цикла

ChPos = MaxPos //заменить на ChPos >= MaxPos

или заменить цикл на While

[kapiton]

Особо не тестил ... скорее всего остается последний символ

MaxPos-ChPos
//заменить на
MaxPos-ChPos+1

да,помогло,спасибо большое

[min@y™]

А как эта программа будет применяться на практике и для чего?

[kapiton]

Сообщение от min@y™

А как эта программа будет применяться на практике и для чего?

сейчас это вопрос скорее риторический. просто вот сказали,сделай так, а чтобы было понятнее о чем речь привели пример с газетой.
хотя мемо удобно для редактирования на месте, например,изменения текста для подгона под поля.

[min@y™]

сейчас это вопрос скорее риторический

Понятно - "никак".