Доброго дня господа
Delphi DLL - делаю вызов из VBA
Описываю функцию в Delphi
function MyFunction(const filename: PAnsiChar): Integer; stdcall;
Описываю функцию в VBA
Private Declare Function MyFunction Lib "mydll.dll" (ByVal filename As String) As Long
Конструкции ясны и работоспособны
Хотелось бы иметь в качестве параметра передать пользовательский класс (или указатель него)
function MyFunction(const filename: TmyClass): Integer; stdcall;
function MyFunction(const filename: PmyClass): Integer; stdcall;
Как описываю тип в VBA
Private Declare Function MyFunction Lib "mydll.dll" (ByVal filename As Object) As Long - не подходит
Private Declare Function MyFunction Lib "mydll.dll" (ByVal filename As Any) As Long - не подходит
Private Declare Function MyFunction Lib "mydll.dll" (ByVal filename As Variant) As Long - не подходит
Возможно так = LONG ?
Private Declare Function MyFunction Lib "mydll.dll" (ByVal filename As
Long) As Long
Но как описать длинную целую в исходном коде DLL и применительно к классу или указателю на этот класс
Спасибо