IAR VisualState德爾福集成

Question

沒有人有使用Delphi的IAR VisualState的ExpertR9.dll庫的通用工作示例嗎？

Answer 1

這裏是SEM的使用「late'binding裝載的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;