Помогите ! У меня проблема с UDF (Interbase 6.0) [D5, IB6.x]
Demon[DZ] © (2002-07-30 12:09:00)
У меня есть база и библеотека 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:00) [1]
Откуда такая суперская уверенность, что придет TDateTime?
И почему возвращается real?
Наверх 
ЧАТ |
Орешник |
|
