Главная страница
    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.04 c
14-1092198599
Skyle
2004-08-11 08:29
2004.08.29
Вторую жизнь пожилому железу!


14-1091879805
able
2004-08-07 15:56
2004.08.29
Ночной дозор


3-1091520232
}|{yk
2004-08-03 12:03
2004.08.29
Sequences


14-1092317600
Ломброзо
2004-08-12 17:33
2004.08.29
Оффтоп про бухучёт


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