Непонятная проблема с timetostr

← →
Wolfram (2004-08-31 13:11) [0]

Привет всем. Откровенно ламерский вопрос, сам ничего не пойму, раньше вроде разбирался. Объявляю переменную tdatetime, пишу t1:=now, смотрю через step, t1=0. Пробовал и ttime (для переменной), и gettime как функцию, не помогает. Как так?

← →
Mim1 © (2004-08-31 13:14) [1]

Есть еще одна now котрая возвращает 0?

← →
Квэнди © (2004-08-31 13:22) [2]

Это канечно изврат, но поробуй...
var t1:Tdatetime begin t1:=strtodatetime(datetimetostr(now)); end;

Мне помогло....

← →
Wolfram (2004-08-31 13:30) [3]

procedure Tnomf.Timer1Timer(Sender: TObject); var t1,t2,t3: ttime; begin t1:=now; t2:=strtotime(q1.fieldbyname("t").asstring); t3:=t1-t2;
в q1 в чаре время типа чч:мм:сс, но t2 = 0 (?)
на t3 вобще нет точки останова

← →
КаПиБаРа © (2004-08-31 13:39) [4]

Wolfram (31.08.04 13:30) [3]
Оптимизация... туды ее в качель....
Если хочешь - отключи...

← →
Wolfram (2004-08-31 13:51) [5]

>КаПиБаРа © (31.08.04 13:39) [4]

как ее отключить?

Project options - Compiler - Optimization

При компиляции финальной версии советую включить.

Можно еще попробовать и просто time написать, мне помогало...
ну а если уж ничего не получится, то попробуй использовать TSystemTime, там сам сложешь формат даты как тебе угодно!

Непонятная проблема с timetostr Найти похожие ветки