[Страдалецъ]

Да ладно, ради одной переменной целый класс зайдействовать. Это уже перебор.
Запись:

Код:

Var
 f: file of TTime;
begin
AssignFile(f, 'MySettings.dat');
Rewrite(f);
Write(Sec);
CloseFile(f);
end.

Чтение:

Код:

Var
 f: file of TTime;
 Sec: TTime;
begin
AssignFile(f, 'MySettings.dat');
Reset(f);
Read(Sec);
CloseFile(f);
end.