Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 2002.08.19;
Скачать: [xml.tar.bz2];

Вниз

Помогите ! У меня проблема с 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 вся ветка

Форум: "Базы";
Текущий архив: 2002.08.19;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.006 c
1-60647
AL2002
2002-08-08 16:21
2002.08.19
Подсчёт совпадений в массиве


3-60533
RUMATA_LEE
2002-07-30 15:02
2002.08.19
База ACCESS


1-60590
VS2001
2002-08-05 06:24
2002.08.19
Использование невизуальных компонент в приложении без формы


1-60730
Poirot
2002-08-05 05:33
2002.08.19
Создать свой ScrollBar в компоненте от TCustomControl


4-60924
Sour
2002-06-12 09:37
2002.08.19
Как принудительно убить чужое приложение, зная handle





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский