Главная страница
    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
6-60771
ogu
2002-06-05 20:25
2002.08.19
Серверное приложение на Delphi


1-60665
Дмитрий Баранов
2002-08-09 11:32
2002.08.19
Как прибить SYSTEM-процесс


14-60832
AlexanderVasjuk
2002-07-24 18:30
2002.08.19
Вопрос не в тему


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


1-60719
НАИВый панк
2002-08-04 19:09
2002.08.19
как поменять байтики в файле...





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский