Главная страница
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.012 c
1-13606
Dmitry Toropov
2002-07-24 18:04
2002.08.05
New & Dispose


14-13785
McKenzie
2002-07-10 18:13
2002.08.05
В борьбе с вирусами


14-13795
roev
2002-07-11 05:50
2002.08.05
Помогите понять причину зависания программы...


14-13807
Jaja
2002-07-08 11:13
2002.08.05
Есть ли какие-нибудь книги для изучения Flash MX?


1-13682
IlyaGer
2002-07-23 19:59
2002.08.05
Как сделать Панель инструментов типа Outlook