delphi - IARVisualStateDelphi統合

Question

DelphiでIARVisualStateのExpertR9.dllライブラリを使用する一般的な作業例を持っている人はいますか？

Answer 1

'late'バインディングを使用したSEMのロードのDELPHIの例を次に示します。

Var
       DLLhandle : THandle;

Function SEM_Load(sStatemachineFilename : String) : Byte;
var
  Foo: function (filename : PChar) : Byte; {$IFDEF WIN32} stdcall; {$ENDIF}
  ProcAddres : farproc;
  cc: Byte;
 begin
     ProcAddres := GetProcAddress(DLLhandle, 'SEM_Load');
     If @ProcAddres <> NIL then
     Begin
       Foo := ProcAddres;
       cc  := Foo(Pchar(sStatemachineFilename));
     End;
     Result := cc;
 end;