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

Вниз

Как получить сегодняшнюю дату?   Найти похожие ветки 

 
Makssim   (2004-08-15 18:03) [0]

И еще вопрос: Как зная номер строки в файле, считать эту строку?


 
Anatoly Podgoretsky ©   (2004-08-15 18:09) [1]

Now переводится как Сегодня
Date переводится как дата


 
antonn ©   (2004-08-15 18:17) [2]

time текущее время

Memo1.lines.loadFromFiles("ssc.txt");
Label1.caption:=memo1.lines.strings[ номер строки(счет от нуля!) ];


 
Юрий Зотов ©   (2004-08-15 18:34) [3]

> Makssim   (15.08.04 18:03)  
> Как зная номер строки в файле, считать эту строку?

Прочитать и проигнорировать предыдущие строки (в цикле).

var
 F: TextFile;
 S: string;
 i: integer;
begin
 AssignFile(F, "C:\MyFile.txt");
 ReSet(F);
 for i := 1 to 10 do
   ReadLn(F, S);
 CloseFile(F);
 ... // Теперь S - это 10-я строка файла "C:\MyFile.txt"
end;


 
TUser ©   (2004-08-15 21:21) [4]


> Как зная номер строки в файле, считать эту строку?

Тут рядом ветка есть.


 
Makssim   (2004-08-15 22:52) [5]

Юрий Зотов ©   (15.08.04 18:34) [3]
Прочитать и проигнорировать предыдущие строки (в цикле).

Спасибо за ответ, но если в файле много строк? Никак нельзя считать сразу нужную строку?


 
TUser ©   (2004-08-15 23:18) [6]


> Никак нельзя считать сразу нужную строку?

В общем случае - нет. Если известно, что все строки одинаковой длины, тогда - да. Быстрый способ загрузить строки - через TStringList


 
Makssim   (2004-08-15 23:40) [7]

спасибо, помогли



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

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

Наверх




Память: 0.45 MB
Время: 0.039 c
14-1091338374
ИМХО
2004-08-01 09:32
2004.08.29
Cartoon Network


4-1090178231
nea
2004-07-18 23:17
2004.08.29
Работа с ком портом


1-1092222804
Voland777
2004-08-11 15:13
2004.08.29
Как ее остановить???


4-1089779383
Константин
2004-07-14 08:29
2004.08.29
нажатие на TMenuItem


1-1092413547
Briz
2004-08-13 20:12
2004.08.29
Прозрачный пиксель на объекте...





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский