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

Вниз

Как вычетать из label формата 22:32:54 секунды. то есть каждую се   Найти похожие ветки 

 
mmmh   (2003-02-15 19:18) [0]

кунду должно вычитаться по секунде т.е в середине где-то будет 8:21:32 для примера. Короче надо просто реализовать обратный отсчет из времени в таком формате. И еще как вычесть из 22:00:00 3:00:00 т.е в конце получается 19:00:00


 
Романов Р.В. ©   (2003-02-15 19:23) [1]

Для вычитания используй знак "-" (минус)


 
VID ©   (2003-02-15 19:26) [2]

>>кунду должно вычитаться по секунде т.е в середине где-то будет >>8:21:32 для примера

procedure TForm1.Button1Click(Sender: TObject);
var t1, t2:tdatetime;
begin
t1 := strtotime("22:32:54");
t2 := t1 - strtotime("00:00:01");
end;

>> И еще как вычесть из 22:00:00 3:00:00 т.е в конце получается >>19:00:00
procedure TForm1.Button2Click(Sender: TObject);
Var t1, t2, t3:tdatetime;
begin
t1 := strtotime("22:00:00");
t2 := strtotime("03:00:00");
t3 := t1-t2;
end;


 
mmmh   (2003-02-16 00:36) [3]

Спасибо!!!! vid молодец



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

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

Наверх




Память: 0.47 MB
Время: 0.012 c
14-87680
Ниул
2003-02-10 19:36
2003.02.27
Как получить результат выполнения функции?


1-87473
Stager
2003-02-19 00:27
2003.02.27
Проверка строки по маске


4-87743
E_Dimon
2003-01-13 21:20
2003.02.27
Hook+Mouse(что-то магическое...)


14-87651
Начинающий програмер
2003-02-09 21:26
2003.02.27
Аглоритм


1-87561
Кило
2003-02-17 10:43
2003.02.27
Как обратится к Edit у которого разные владельцы ?