Вниз
Скачать: CL | DM;

Cравнение Time() с переменной типа TTime   Найти похожие ветки 

 
aadamov   (2005-10-21 22:32) [0]

Как сравнить значение возвращаемоеTime()  со значением переменной типа TTime.

Делаю..

varTime: TTime;

if Time() > varTime them

работает неправильно, т.е. хотя текущее время больше чем значение varTime, условие не работает. Пожалуйста поиогите....

Благодарю


 
irishka001 ©   (2005-10-21 23:22) [1]

Попробуй так:

procedure TForm1.Button1Click(Sender: TObject);
var
 varTime: TTime;
begin
 vartime:=strtotime("12:00:00") ;
 if time > varTime then
 begin
   label1.caption:="OK"
 end;
end;

end.


 
Германн ©   (2005-10-22 02:12) [2]

Ну да. А с каких это пор в Дельфи существует "значение возвращаемоеTime()"
Имхо, тут либо С, либо Паскаль - выбери что-то одно.


 
ShiFT   (2005-10-22 08:31) [3]


 TDate = type TDateTime;
 TTime = type TDateTime;
 function Time: TDateTime;


 
Sergey Masloff   (2005-10-22 09:36) [4]

Германн ©   (22.10.05 02:12) [2]
>А с каких это пор в Дельфи существует "значение возвращаемоеTime()"
Не поверишь - с самой первой Delphi

ShiFT   (22.10.05 08:31) [3]
По фиг, TTime это алиас для TDateTime

Резюме: ошибка в 17 строке а так все должно работать



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.026 c
1-1129899360
kyn66
2005-10-21 16:56
2005.11.13
Компонент текста под углом 90 гр.


3-1127815972
ANB
2005-09-27 14:12
2005.11.13
(Oracle) Как правильно написать триггер для автоприсвоения ID


2-1129888595
Eugene_T
2005-10-21 13:56
2005.11.13
Элементарный вопрос по булевской функции


6-1122621029
vajo
2005-07-29 11:10
2005.11.13
Загрузка файла из Интернета, а не с прокси


2-1129731750
-=SaM=-
2005-10-19 18:22
2005.11.13
Последнее неравная нулю цифра числа N! (N факториал)




   Наверх