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

Вниз

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

 
Demon[DZ]   (2002-07-30 12:15) [0]

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

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.


 
Digitman   (2002-07-30 12:27) [1]

форматы структур, хранящих дату/время в формате IB и в формате OP, совершенно разные.

Загляни на ib.demo.ru, там есть примеры конвертации из одного формата в другой



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

Форум: "Основная";
Текущий архив: 2002.08.12;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.006 c
1-35368
wonder_boy
2002-07-29 12:19
2002.08.12
HTML HELP через API


1-35264
beginner25
2002-07-31 11:52
2002.08.12
Проблема с Object Pascal, помогите!!!


1-35280
BAY
2002-07-31 14:39
2002.08.12
Как сохранить GIF?


1-35355
maxim2
2002-07-30 13:24
2002.08.12
Как вызвать функцию API


1-35298
Slavik_D
2002-07-29 15:02
2002.08.12
Как поменять цвет TabSheet.Highlited





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