procedure TForm1.Button1Click(Sender: TObject);
var
a: timapi;
ip : PChar;
username : PChar;
password : PChar;
db : PChar;
apicode : PChar;
begin
a := Timapi.Create;
ip := '192.111';
username := 'sa';
password := 'sa';
apicode := 'as';
db := 'as';
a.init(ip,username,password,db,apicode);
end;
以上是在Delphi中的代码,执行a.init时候,过一段时间出一个错误(Privilage?? error)
可以肯定从平台上调用已经经如了imapi.dll了,至于为什么出错就要看看imapi.dll是怎么写的了 |