Интерфейсы C++ в Delphi

[error404ru]

у меня есть .dll на с++ из которой я получаю функцию инициализации интерфейса INXForce

InitNXForce = function(var ppVal: INXForce): UInt32; cdecl;

на С++ INXForce выглядит так

class __declspec(novtable) INXForce
    {
    public:
       virtual uint32_t __stdcall GetValue (uint8_t* value) = 0;
       virtual uint32_t __stdcall SetValue (uint8_t value) = 0;
       virtual bool __stdcall IsValid (uint8_t value) = 0;
     }

я описал этот интерфейс на Delphi следующим образом:

INXForce = class abstract
  public
    function GetValue(var Value: Byte): Cardinal; virtual; stdcall; abstract;
    function SetValue(Value: Byte): Cardinal; virtual; stdcall; abstract;
    function IsValid(Value: Byte): Boolean; virtual; stdcall; abstract;
end

Дальше начинается для меня непонятное:

procedure TFormMain.FormCreate(Sender: TObject);
var
  lNXForce: INXForce;
  lValue: Byte;
begin
  InitNXForce(lNXForce); // возвращает 0, все хорошо. NativeUInt(lNXForce) = $145276181E0
  lNXForce.GetValue(lValue); // lValue получает 7 и переменная lNXForce получает другой адрес NativeUInt(lNXForce) = $14527610000
  lNXForce.GetValue(lValue);  // тут вываливается Exception class $C0000005 with message 'c0000005 ACCESS_VIOLATION'.
end;

есть другие интерфейсы и методы. они аналогично частично работают, но почти у всех после вызова какого-то из методов слетает указатель в переменной интерфейса.
не могу понять что не так. куда смотреть?

[error404ru]

проблема решилась описанием интерфейсов таким образом. мож кому будет полезно

  INXForce = ^TNXForce;
  TNXForceVTable = record
    GetValue: function (pThis: INXForce; var Value: Byte): Cardinal; stdcall;
    SetValue: function (pThis: INXForce; Value: Byte): Cardinal; stdcall;
    IsValid: function (pThis: INXForce; Value: Byte): Boolean; stdcall;
  end;
  TNXForce = record
    pVTable: ^TNXForceVTable;
  end;