Форум: "Основная";
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];
ВнизКак сравнить даты и разницу между ними получить Integer Найти похожие ветки
← →
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
В чем дело?
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.006 c