Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2007.01.28;
Скачать: [xml.tar.bz2];

Вниз

DateTimePicker   Найти похожие ветки 

 
Kcor   (2007-01-10 13:55) [0]

Скажите что не правильно, почему сообщение не показывается?

procedure TForm1.Timer1Timer(Sender: TObject);
var
 T: TDateTime;
begin
 T:= Time;
 if T = DateTimePicker1.Time then
   ShowMessage("fuck");
end;


 
Джо ©   (2007-01-10 13:59) [1]

> T:= Time;

T := Now()?


 
Правильный Вася   (2007-01-10 14:00) [2]

таймер-то включен?

а протрассировать в отладчике?


 
Сергей М. ©   (2007-01-10 14:03) [3]


> почему сообщение не показывается?


Потому что условие T = DateTimePicker1.Time ложно


 
Anatoly Podgoretsky ©   (2007-01-10 14:15) [4]

> Kcor  (10.01.2007 13:55:00)  [0]

Покажется, если повезет.
Нельзя проводить точное сравнение для чисел с плавающей запятой.


 
Virgo_Style ©   (2007-01-10 14:16) [5]

afaik, .Time возвращает полностью datetime, так что если целая часть (дата) не совпадет, то ничего и не произойдет


 
Рамиль ©   (2007-01-10 14:22) [6]

Вообще то надо сравнивать так
if abs(T - DateTimePicker1.Time) < Eps


 
evvcom ©   (2007-01-10 14:27) [7]

> [6] Рамиль ©   (10.01.07 14:22)

это для бесконечно приближающегося ряда T к DateTimePicker1.Time, а в случае с Time, Now и т.п. получится

> [4] Anatoly Podgoretsky ©   (10.01.07 14:15)
> Покажется, если повезет.


 
Ega23 ©   (2007-01-10 14:30) [8]

if Now >= DateTimePicker1.Time then


 
dr_craigan   (2007-01-10 14:35) [9]


> if Now >= DateTimePicker1.Time then


ага



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

Форум: "Начинающим";
Текущий архив: 2007.01.28;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.039 c
11-1145454143
Unknown Mystic
2006-04-19 17:42
2007.01.28
Обновление измененного kol.pas


2-1168359487
Stalp
2007-01-09 19:18
2007.01.28
Пара вопросов по Delphi


11-1145021247
AndreyRus
2006-04-14 17:27
2007.01.28
Выравнивание по правому краю


6-1156418891
Орион
2006-08-24 15:28
2007.01.28
TidTCPServer и HTTP-запросы


4-1158338051
@!!ex
2006-09-15 20:34
2007.01.28
GetSystemTime возвращает не правильное время





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский