Скачать: CL | DM;

Помогите ! У меня проблема с UDF (Interbase 6.0)   Найти похожие ветки 

← →
Demon[DZ]   (2002-07-30 12:09) [0]

У меня есть база и библеотека UDF.
В этой DLL есть функция, которая преобразует Time в Float (
"12:30:00" -> 12,5). Если я эту функ. использую в Delphi5 не из DLL, а вставляю прямо в код программы, то всё работает как надо!
Но если я пишу в InterBase процедуру, то эта функция всё время возвращает 0.00:(. Помогите, если кто сталкивался с этой проблемой, а то я уже запарился.
Код этой функ.:

library tplan_udf;
uses SysUtils, Classes, Math;

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

exports
TimeToFloat name "fn_TimeToFloat";
begin
end.


---

← →
3JIA9I CyKA ©   (2002-07-30 12:52) [1]

Откуда такая суперская уверенность, что придет TDateTime?
И почему возвращается real?

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.016 c