Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Как получить сегодняшнюю дату? [D6, WinXP]

Makssim © (2004-08-15 18:03:00)
И еще вопрос: Как зная номер строки в файле, считать эту строку?

Makssim (2004-08-15 23:40:00) [1]
спасибо, помогли

TUser (2004-08-15 23:18:00) [2]

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

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

Makssim (2004-08-15 22:52:00) [3]
Юрий Зотов © (15.08.04 18:34) [3]
Прочитать и проигнорировать предыдущие строки (в цикле).
Спасибо за ответ, но если в файле много строк? Никак нельзя считать сразу нужную строку?

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

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

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

Юрий Зотов (2004-08-15 18:34:00) [5]
> 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;

antonn (2004-08-15 18:17:00) [6]
time текущее время

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

Anatoly Podgoretsky (2004-08-15 18:09:00) [7]
Now переводится как Сегодня
Date переводится как дата

Наверх

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