Текущий архив: 2002.01.08;
Скачать: CL | DM;
Вниз
Как сравнить даты и разницу между ними получить Integer Найти похожие ветки
← →
DerZky (2001-12-19 18:14) [0]Как сравнить две даты и разницу между ними записать в переменную типа Integer. Например чтобы 21.12.2001 минус 19.12.2001 было равно 2.
← →
Mick (2001-12-19 18:18) [1]Trunc(EncodeDate(2001,12,21) - Trunc(EncodeDate(2001,12,19) как раз и равно 2
← →
DerZky (2001-12-19 19:46) [2]Написал я следующее
procedure TForm1.Button1Click(Sender: TObject);
var
Cifra:Integer;
begin
Cifra:=Trunc(EncodeDate(2001,12,21))-Trunc(EncodeDate(2001,12,19));
end;
а Дельфи пишет - [Hint] Unit1.pas(30): Value assigned to "Cifra" never used
В чем дело?
← →
LLL (2001-12-19 21:16) [3]Это просто предупреждение, что Cifra более нигде не используется.
Беспокоится - не забыли ли Вы о Cifra?
← →
a100 (2001-12-19 21:16) [4]и правильно пишет ! А где вообще используется полученный результат ?! Переменная - то локальная
Страницы: 1 вся ветка
Текущий архив: 2002.01.08;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.011 c
