At 07:57 PM 9/03/2004 +0000, you wrote:

>Hello,
>I created a DLL with Delphi 7, where do i place it so FireBird can
>find it? I am using FB 1.5 on XP. Here is the code of my DLL, maybe
>something is wrong. It seems it cant find is, says about error,
>cant find entry point or module. Thanx.
>
>library WFUDF;
>
>uses
> WFUDFFunctions in 'WFUDFFunctions.pas';
>
>{$R *.res}
>
>begin
>end.
>
>unit WFUDFFunctions;
>
>interface
>
>uses
> SysUtils, Classes, DateUtils;
>
>const
> MSecsPerDay10 = MSecsPerDay * 10;
> IBDateDelta = 15018;
>
>type
> PIBDateTime = ^TIBDateTime;
> TIBDateTime = record
> Days,
> MSec10 : Integer;
> end;
>
>implementation
>
>function IBYearsBetween(var ADate: TIBDateTime): Integer; cdecl;
>export;
>var
> DateTime: TDateTime;
>begin
> with ADate do
> DateTime := Days - IBDateDelta + MSec10 / MSecsPerDay10;
> Result := YearsBetween(DateTime, Date)
>end;
>
>exports
> IBYearsBetween;
>
>end.

Try studying this whitepaper:

http://www.ibphoenix.com/main.nfs?a=ibphoenix&l=;IBPHOENIX.PAGES;NAME='ibp_howto5'

/hb