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

Вниз

Помогите!   Найти похожие ветки 

← →
Demon[DZ]   (2002-07-30 14:55) [0]

Помогите переделать функц. из 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:10) [1]

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

---

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

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

---

← →
Demon[DZ]   (2002-07-30 15:42) [3]

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

---

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

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

Наверх

Память: 0.47 MB
Время: 0.025 c