Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

текст строки, зная ее номер [D6, WinXP]


my_name ©   (2004-08-15 15:35:00) 

Доброго...!
скажем нужно мне, зная номер строки в текстовом файле получить  сам текст этой строки и записать его в memo1. Но номера строк идут не с 1, а с 0, т.е.
1 строка файла xxx.txt-"0"
2 строка файла xxx.txt-"1"
и т.д.
помогите, плиз.


my_name   (2004-08-15 17:20:00) [1]

TUser огромное спасибо! все вышло, выражаю ОГГГРОМНУЮ признательность всем, кто мне помог! короче всем СПАСИБО!!!


TUser   (2004-08-15 16:55:00) [2]

Вот, Анатолий меня опередил. Но у меня комментарии подробнее ...


TUser   (2004-08-15 16:54:00) [3]

sl:=TStringList.Create;
try
sl.LoadFromFile();
Memo1.Lines.Add(sl.Strings[Nomer -1];
{Выделенная часть кода нужна для того, чтобы отнимать единицу. Кстати, имей в виду - если тебе потребуется когда-нибудь отнять 2 или 3, то надо будет просто заменить константу. А если тебе захочется прибавить или умножить ... . Одним словом Delphi  понимает инфиксную запись выражений.
Кстати, еще в выражениях можно ставить скобки. Тут правда есть одна сожность. Если рядом со скобками в определенном порядке поставить вот такие * (а согласитесь они ведь на клаве рядом - легко ошибиться) звезочки, то Delphi просто проигнорирует все то, что заисано в скобках.  Есть мнение (его тут недавно кто-то из мастеров высказывал), что в Борланде считают такие части кода комментариями. Так или иначе, эту особеность надо всегда иметь в виду при написании арифметических выражений в Delphi.
Между прочим, в логических выражениях тоже возможны скобки. Возможно там проявляется такая же особенность.
А это все вообще-то был пооооооодробный комментарий.
Продолжим писать текст самой программы ...}
finally
sl.free;
end;


Anatoly Podgoretsky   (2004-08-15 16:50:00) [4]

my_name   (15.08.04 16:09) [2]
Ой ну это просто Num - 1


YurikGL   (2004-08-15 16:38:00) [5]

Ты лучше свой код приведи, где единица не отнимается. Его и поправим


my_name   (2004-08-15 16:09:00) [6]

да вот, что-то невыходит, может кто приведет полный код, для такого действия?
спасиб заранее


YurikGL   (2004-08-15 15:37:00) [7]

Ну и отнимай от номера строки единицу...


Наверх

Титульная страница Поиск, карта сайта Написать письмо