Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Наложение в Memo

paule © (2004-12-17 03:23:00)
Мастера, подскажите пожалуйста.

Имеется объект Memo. На нем текст в несколько строк.

Андрей петрович
,\ -------/
Петров
---
1922

Так вот можно из этого получить одну строку както:

Андрей ---петрович ,\ -------/ 1922 Петров

Заранее спасибо

ocean (2004-12-20 10:25:00) [1]
ну а просто как идею:
S := Memo1.Text;
for I := 1 to length (S) do
if Ord(s[I]) > Ord(' ') then result[I] := S[I]; //убрать пробелы и переносы строк

KilkennyCat (2004-12-20 08:24:00) [2]
если не известно скока строк и в какой они последовательности, то задача неразрешима. Если наоборот, то можно и через рисунок, и через лабел...

paule (2004-12-20 05:43:00) [3]
а если брать, строку и переносить её на канву компонента Image к примеру, потом брать другую строку и с тойже позиции TextOut делать.
Ониже наложатся? или одна строка дргую затрет?

KilkennyCat (2004-12-20 04:35:00) [4]
если это неизвестно, то ничего не покатит, кроме как задания дополнительных условий, чтоб стало известно.

paule (2004-12-20 04:25:00) [5]
такой алгоритм не покатит. не известно скока строк и в какой они последовательности :))

KilkennyCat (2004-12-17 04:48:00) [6]
А в частном так: result := replace(memo.lines[0], ' ', memo.lines[3]) + memo.lines[1]//c убраными с переди пробелами по любому алгоритму, на вкус,\\ + memo.lines[2] + memo.lines[4]

paule (2004-12-17 04:13:00) [7]
а в частном случае?

Palladin (2004-12-17 04:11:00) [8]
В общем случае твоя задача не имеет решения.

paule (2004-12-17 03:42:00) [9]
ну и как это поможет?
Они же не наложатся строки. а просто друг к другу приплюсуются

aus (2004-12-17 03:34:00) [10]
>если не ошибаюсь, у мемо есть lines...

а у lines есть св-во text типа string, уже готовая строка.

Palladin (2004-12-17 03:30:00) [11]
Это вопрос или утвеждение, как тема для статьи? :)

KilkennyCat (2004-12-17 03:28:00) [12]
если не ошибаюсь, у мемо есть lines...

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »