Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.08.05;
Скачать: CL | DM;

Вниз

Как сравнить дату и время с системной?   Найти похожие ветки 

 
vich   (2002-07-23 03:35) [0]

Хочу сравнить написанную мной в Едит дату и время и сравнить с системной, а потом выдать сообщение.


 
MBo ©   (2002-07-23 06:56) [1]

StrToDate и т.п.


 
vich   (2002-07-23 19:05) [2]

Я уже так делал, не получается.



 
Anatoly Podgoretsky ©   (2002-07-23 19:27) [3]

A что должно быть в результате сравнения, разница, отношение, другое, но в любом случае все нормально сравнивается.


 
vich   (2002-07-24 00:36) [4]

Должно быть , что-то напоминалки, при подходе определенной даты одно сообщение, при точной дате другое. Что-то вроде календаря с днями рождений.


 
Tornado ©   (2002-07-24 08:19) [5]

procedure TForm1.Button1Click(Sender: TObject);
var t:double;
begin
t := StrtoDate(Edit1.Text);
IF t = Date() THEN
Application.MessageBox("Дата равна системной", "Дата", MB_OK)
ELSE
Application.MessageBox("Дата не равна системной", "Дата", MB_OK);
end;


Со временем тоже самое :)


 
vich   (2002-07-24 19:04) [6]

Спасибо за помощь, очень признателен!!!!!
Все работает прекрасно.



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

Текущий архив: 2002.08.05;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.011 c
14-13772
Bboy
2002-07-09 11:17
2002.08.05
Что за хрень, не получается поиграть!!!


3-13568
aleksmax
2002-07-15 15:45
2002.08.05
Запрос на объединение значений полей


4-13844
xrip
2002-05-23 22:48
2002.08.05
Сделать на всей форме (в т.ч. и ее контролах) прозрачность. w9x


6-13746
undersun
2002-05-23 18:02
2002.08.05
Кто-нибудб помогите


1-13590
Xper
2002-07-24 13:49
2002.08.05
Два тупых вопроса. Один из них по NMHTTP.