Главная страница
    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.035 c
14-1092116835
Иван Шихалев
2004-08-10 09:47
2004.08.29
Вопросик по аське


3-1091651790
Li
2004-08-05 00:36
2004.08.29
SQL-запрос для IB


3-1091444847
Sectey
2004-08-02 15:07
2004.08.29
Расположение бизнес логики приложения.


4-1089994372
Dir
2004-07-16 20:12
2004.08.29
OpenDir


3-1091710441
Alexander1966
2004-08-05 16:54
2004.08.29
ODBC Drivers создание базы данных





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