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

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

Помогите! [D5, Win2k]


Demon[DZ] ©   (2002-07-30 14:55:00) 

Помогите переделать функц. из Delphi под InterBase для UDF, please!!

function TimeToFloat(InTime : TDateTime): SmallInt;
var Hour, Min, Sec, MSec: word;
begin
DecodeTime(InTime, Hour, Min, Sec, MSec);
Result := Hour+(Min/60);
end;

А то у меня чото неполучается :(
Заранее благодареню


Demon[DZ]   (2002-07-30 15:42:00) [1]

Я извеняюсь за свою навязчивость.
Но если бы вы дали код моей функции под InterBase, мне бы было легче разобраться с этим.


Виктор Щербаков   (2002-07-30 15:15:00) [2]

Если уж что-то не получается, попробовал бы поотлаживать функцию, посмотрел бы что приходит в качестве параметра. А тут и усомнился бы в соответствии форматов для даты/времени в IB и OP.
http://delphi.mastak.ru/cgi-bin/forum.pl?look=1&id=1028016933&n=0


Demon[DZ]   (2002-07-30 15:10:00) [3]

Жаль, что нпкто неможет мне помочь. Видимо мою затею придется похоронить :(((


Наверх

Титульная страница Поиск, карта сайта Написать письмо