![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
|
Приветствую всех.
Перейду сразу к делу. Код:
// Получаем префикс времени
function GetTimePrefix(N: Integer): String;
const
pref: array [0..6] of string = (' г. ', ' м. ', ' н. ', ' д. ', ' ч. ', ' мин. ', ' сек. ');
del: array [0..6] of Integer = (31536000, 2592000, 604800, 86400, 3600, 60, 1);
var
a: array [0..6] of Integer;
i: integer;
begin
Result := '';
a[6] := N;
for i := 0 to 5 do
begin
a[i] := a[6] div del[i];
a[6] := a[6] mod del[i];
if a[i] <> 0 then
Result := Result + IntToStr(a[i]) + pref[i]
end
end;После строки Код:
for i := 0 to 5 do Код:
for i := 0 to N do В чем причина?! Более в коде под "i" никакой другой переменной нет. Поясните, пожалуйста |