Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.10.02;
Скачать: [xml.tar.bz2];

Вниз

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

 
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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.01 c
1-3834
Starkom
2003-09-19 13:55
2003.10.02
вопрос о странном глюке стандартных цветовых констант


1-3975
Centurion
2003-09-19 21:29
2003.10.02
EOF


14-4106
otido
2003-09-09 12:16
2003.10.02
Поделитесь опытом.... перенос ВСЕГО с харда на хард....


14-4102
Igorek
2003-09-13 10:50
2003.10.02
Конкурс мистер (мисис) МАСТАК


3-3773
Юлия
2003-09-15 07:37
2003.10.02
Вопрос по установке программы





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский