Время в минутах
Почему у меня не компилится MinutesBetween? Ошибка: "Undeclared identifier 'MinutesBetween'". Процедура вида:
procedure TForm1.Button1Click(Sender: TObject);
Var d: TDateTime;
i: integer;
begin
d := StrToDateTime('05.09.2012');
i := MinutesBetween(Now, d);
ShowMessage('Разность в минутах ' +IntToStr(i));
end;
|