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

Вниз

Edit2.Text минус Edit1.Text   Найти похожие ветки 

 
Sensor   (2003-07-18 04:41) [0]

Народ, подскажите plz, как зделать следующее: у меня есть три Edit"a. В одном текущее время постоянно обновляется:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
Edit1.Text := TimeToStr(now);
end;

Т.е. время вида 12:47:00
В Edit2.Text написано другое время, например 18:49:00.
Вопрос, как мне в Edit3.Text вывести это оставшееся время (т.е. написать 6:02:00)
Заранее пасиба


 
Goorus   (2003-07-18 04:54) [1]

Edit3.Text:=TimeToStr( StrToTime(Edit2.Text)-StrToTime(Edit1.Text) );


 
sensor-x   (2003-07-18 05:02) [2]

Пасиба, все работает



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

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

Наверх




Память: 0.46 MB
Время: 0.021 c
3-100575
Nikky
2003-07-07 19:06
2003.07.31
Можно ли поменять значения Case Sensitivity/Insensitivity?


1-100785
Beginner3000
2003-07-16 00:46
2003.07.31
Модули


7-100991
Velikan
2003-05-20 02:16
2003.07.31
Как получить доступ к USB?


14-100942
Князь Мышкин
2003-07-15 12:13
2003.07.31
Как на Делфи написать свою внеплатформенную операционную систему?


1-100705
II
2003-07-18 12:50
2003.07.31
Как можно сделать снифер сообщений от конкретного окна?