http://www.ibphoenix.com/main.nfs?a=ibphoenix&s=1098772271:16727&page=ibp_howto2#Windows
tam naideote "Let's build some date routines"
Здравствуйте, Disa, Вы писали:
D>Я пишу в делфи5.
D>Надо из хранимой процедуры вызвать ф-ию из udf_my.dll такого типа
D>Это в базе данных
D>
D>DECLARE EXTERNAL FUNCTION NowBetweenDay
D> DATE
D>RETURNS INTEGER BY VALUE
D>ENTRY_POINT 'NowBetweenDay' MODULE_NAME 'Ecran_UDF.DLL';
D>
D>Это в самой УДФ
D>D>function NowBetweenDay(Date1:TDateTime):PChar;stdcall;
D>begin
D> Result:=DateUtil.DaysBetween(Date1,Now);
D>end;
D>
D>Так вот все вороде вызывается, но результат всегда один и тотже каку не передавай дату(DATE) в ф-ию и он равен
D>38920 (Если память не изменяет)
D>Я нечего не понимаю наверно тип DATE что ли как то не правильно конвертируется в TDateTime
D>Как решить этот вопрос?
D>Юзаю сервер FireBird 1.5