Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Delphi: Общие вопросы > Пронумеровать строки


Автор: Serhik_z 14.8.2007, 16:04
Здравствуйте!
Подскажите как пронумеровать строки в Memo
Имеется текст в Memo нужно пронумеровать как N1 N2 N3...N100 и т.д. , но номер должен быть впереди строки.

Автор: MetalFan 14.8.2007, 16:09
ручками пронумеровать. в цикле.
Код

Memo.Lines[i] := IntToStr(i) +' ' + Memo.Lines[i];

Автор: Serhik_z 14.8.2007, 16:14
Спасибо!

Код

for i:=1 to n do
a[i]:=Form1.Memol.Lines[i-1]; // строки пронумеровать


Вставить перед текстом.
 smile 

Автор: Snowy 14.8.2007, 16:33
Цитата(Serhik_z @  14.8.2007,  16:14 Найти цитируемый пост)
Вставить перед текстом.
Тогда ты не тот компонент выбрал smile 

Автор: EvilsInterrupt 14.8.2007, 17:07
Snowy, А какой бы ты посоветовал бы?

Автор: pseud 14.8.2007, 17:25
Serhik_z, 

?

MetalFan все верно написал
ну разве что добавлю

Код

  for i := 0 to Memo1.Lines.Count - 1 do
    Memo1.Lines[i] := IntToStr(i + 1) + '. ' + Memo1.Lines[i];



Автор: Snowy 14.8.2007, 17:30
Цитата(EvilsInterrupt @  14.8.2007,  17:07 Найти цитируемый пост)
Snowy, А какой бы ты посоветовал бы?
SynEdit

Автор: aktuba 14.8.2007, 18:04
pseud, как я понимаю, он хотел, чтобы эти цифры не редактировались и курсор на них не попадал... SynEdit тут действительно идеальный вариант...

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)