Главная страница
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.009 c
8-13737
zveroboy
2002-03-30 04:07
2002.08.05
Обработка jpeg


1-13683
BKV
2002-07-23 21:32
2002.08.05
Как узнать текущее координаты Курсора мыши?


1-13678
hard
2002-07-22 23:32
2002.08.05
Как отслеживать минимизацию формы?


6-13760
SerVS
2002-05-20 00:48
2002.08.05
Как писать Firewall?


14-13792
Человек в белом халате
2002-07-10 15:23
2002.08.05
Чувак13