Menu

#8 Work in Win64 (Delphi 12.x)

1.0
open
nobody
None
2024-12-24
2024-12-24
Stalker4
No

Hi,

For the library to work under Win64, you need to make the following small changes in the VKDBFDataSet.pas module:

1) In class TVKDBFFieldDef

    {$IFDEF WIN64}
    FTag: NativeInt;
    {$ELSE}
    FTag: Integer;
    {$ENDIF}

and

{$IFDEF WIN64}
property Tag: NativeInt read FTag write FTag;
{$ELSE}
property Tag: Integer read FTag write FTag;
{$ENDIF}

2) In function HideBindDBFFieldDef

      {$IFDEF WIN64}
      F.Tag := NativeInt(Pointer(FD));
      {$ELSE}
      F.Tag := Integer(Pointer(FD));
      {$ENDIF}

Discussion


Log in to post a comment.

MongoDB Logo MongoDB