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

Вниз

Функция возвращает кол-во секунд, прошед. после полуночи   Найти похожие ветки 

 
jiny   (2006-04-22 09:58) [0]

Доброго времени суток !!!
У меня задача все что сделано одной фирмой по Фокспро изваять в Дельфи, при генерации одного ключа в поле задействована функция SECONDS() есть ли аналог этой функции в Дельфи ?


 
Leonid Troyanovsky ©   (2006-04-22 10:17) [1]


> jiny   (22.04.06 09:58)  

> в Дельфи, при генерации одного ключа в поле задействована
> функция SECONDS() есть ли


Round(Frac(Now)*SecsPerDay)

Только, от таких ключей надо избавляться, IMHO.

--
Regards, LVT.


 
jiny   (2006-04-22 10:32) [2]

Спасибо, но у меня все на генераторах работает, просто программа эта министерская, так что отправляемый файл буду генерить в ДБФ и сувать туда ентот долбанный ключ, я нашел другой способ
SecondsBetween(StrToTime("00:00:00"),time)

Но в любом случае спасибо !


 
Leonid Troyanovsky ©   (2006-04-22 11:09) [3]


> jiny   (22.04.06 10:32) [2]

> SecondsBetween(StrToTime("00:00:00"),time)


StrToTime("00:00:00") = 0.

Сл-но, просто : Round(Time*SecsPerDay)

--
Regards, LVT.


 
Anatoly Podgoretsky ©   (2006-04-22 16:50) [4]

Leonid Troyanovsky ©   (22.04.06 11:09) [3]
И Round не обязателен, это только если целое нужно, но тогда возможно нужен Trunc (по задаче)


 
Leonid Troyanovsky ©   (2006-04-22 16:57) [5]


> Anatoly Podgoretsky ©   (22.04.06 16:50) [4]

> И Round не обязателен, это только если целое нужно,


А, точно, SECONDS возращало с мсек, забыл уже все.
Спасибо.

--
Regards, LVT.



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

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

Наверх




Память: 0.47 MB
Время: 0.055 c
1-1144049500
DelphiLexx
2006-04-03 11:31
2006.05.14
FindDialog и Delphi2005 проблема с русскмим буквами


3-1143011278
kyn66
2006-03-22 10:07
2006.05.14
Переход через поле в DBGrid


15-1145206429
geserx
2006-04-16 20:53
2006.05.14
Работа с e--mail на Delphi


3-1142690509
__Misha
2006-03-18 17:01
2006.05.14
Как получить коллекцию таблиц и полей базы


11-1126114007
KirillT
2005-09-07 21:26
2006.05.14
Открытие програмным путем общего доступа к папке на своей машине