| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Непонятная проблема с timetostr [D7, WinXP]

Wolfram ©   (2004-08-31 13:11:00) 

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

---

_sulent   (2004-08-31 14:23:00) [1]

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

---

КаПиБаРа   (2004-08-31 14:03:00) [2]

Project options - Compiler - Optimization

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

---

Wolfram   (2004-08-31 13:51:00) [3]

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

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

---

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

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

---

Wolfram   (2004-08-31 13:30:00) [5]


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:22:00) [6]

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

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

---

Mim1   (2004-08-31 13:14:00) [7]

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

---

Наверх