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

Вниз

Вычитание времени из времени   Найти похожие ветки 

 
Romka ©   (2003-09-17 17:13) [0]

У меня 3 компонента:Label, Edit, StatusBar. В Label"е и Edit"е показывается время, естественно в строковом типе. Как мне вычесть время из Edit-Label и показать ответ в StatusBar"е,т.е. сколько времени осталось.


 
Jeer ©   (2003-09-17 17:17) [1]

F1 TDateTime


 
BillyJeans ©   (2003-09-17 17:18) [2]

StatusBar.Panels[0].Text := TimeToStr(StrToTime(Edit1.Text)-StrToTime(Label.Caption));


 
Jeer ©   (2003-09-17 17:19) [3]

BillyJeans © (17.09.03 17:18) [2]

Ходячий F1


 
BillyJeans ©   (2003-09-17 17:47) [4]

Jeer © (17.09.03 17:19) [3]

:о)


 
Romka ©   (2003-09-17 17:51) [5]

Не работает При выполнении Выдается ошибка в новом окне


 
Anatoly Podgoretsky ©   (2003-09-17 17:54) [6]

Может у тебя StatusBar.Panels[0].Text нет или ты не так скопировал. А насчет ошибки ты не ошибаешься, может тебе разницу показывает?


 
ZEE ©   (2003-09-17 17:55) [7]

значит в StrToTime подсовываешь не время
разделитель проверь...


 
Verg ©   (2003-09-17 18:06) [8]


> Может у тебя StatusBar.Panels[0].Text нет


Скорее всего нет самой Panels[0] в StatusBar-е

Т.е. дважды кликни на компоненте StatusBar, появится конструктор панелей. Там добавь хоть одну (панель) - она и будет под индексом 0.


 
Romka ©   (2003-09-18 12:36) [9]

Verg Спасибо, помог!! А ты не мог бы объяснить мне это.
StatusBar.Panels[0].Text := TimeToStr(StrToTime(Edit1.Text)-StrToTime(Label.Caption));
Почему если я пишу
StatusBar.Text := TimeToStr(StrToTime(Edit1.Text)-StrToTime(Label.Caption));
то он выдает ошибку, а если с Panels[0] тогда все нормально.


 
Verg ©   (2003-09-18 13:48) [10]

Как почему?

А разве у TStatusBar есть Text?

Ты бы хоть в Help заглядывал что ли.



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

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

Наверх




Память: 0.48 MB
Время: 0.076 c
3-3717
Dream
2003-09-13 14:09
2003.10.02
Как подсчитать общую сумму в 1 колонке ?


1-3892
Andrey V.
2003-09-18 09:03
2003.10.02
Не удается подключить компонент


9-3700
Agent[007]
2003-03-26 17:58
2003.10.02
Какое событие?


6-4005
Maks Realov
2003-08-06 14:15
2003.10.02
Получение размера удалённого файла без его скачивания.


3-3784
Maxx_f
2003-09-15 08:11
2003.10.02
General SQL error приработе с датами