Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.08.29;
Скачать: [xml.tar.bz2];

Вниз

текст строки, зная ее номер   Найти похожие ветки 

 
my_name   (2004-08-15 15:35) [0]

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


 
YurikGL ©   (2004-08-15 15:37) [1]

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


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

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


 
YurikGL ©   (2004-08-15 16:38) [3]

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


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

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


 
TUser ©   (2004-08-15 16:54) [5]

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


 
TUser ©   (2004-08-15 16:55) [6]

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


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

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



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2004.08.29;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.033 c
6-1088624469
AndersoNRules
2004-06-30 23:41
2004.08.29
servertype stBlocking


14-1092019928
inew
2004-08-09 06:52
2004.08.29
Начальник уходит на повышение.


1-1092402136
Лёня
2004-08-13 17:02
2004.08.29
Функция GetCurrentThread


1-1092643707
an-na2002
2004-08-16 12:08
2004.08.29
Возврат к проверке


1-1092288096
Марат
2004-08-12 09:21
2004.08.29
Изменение StringGrid





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский