我做了一个DELPHI的DLL,我想给别人调用,我应该在我的方法前面加什么?各位大哥能写给我看看吗?以下是我写的类
library dbpack;uses
SysUtils,
Dbf,
Dialogs,
Classes;{$R *.res}function pack (tbname:string): Integer;
var dbf1:TDbf ;
OpenDialog1: TOpenDialog;
begin
Dbf1:=TDbf.Create(nil);
dbf1.Close ;
dbf1.TableName:=tbname ;
dbf1.Open ;
try
dbf1.PackTable ;
Result:=0;
except
Result:=1;
end;
end;beginend.
library dbpack;uses
SysUtils,
Dbf,
Dialogs,
Classes;{$R *.res}function pack (tbname:string): Integer;
var dbf1:TDbf ;
OpenDialog1: TOpenDialog;
begin
Dbf1:=TDbf.Create(nil);
dbf1.Close ;
dbf1.TableName:=tbname ;
dbf1.Open ;
try
dbf1.PackTable ;
Result:=0;
except
Result:=1;
end;
end;beginend.
function pack (tbname:string): Integer;stdcall;
var dbf1:TDbf ;
OpenDialog1: TOpenDialog;
begin
Dbf1:=TDbf.Create(nil);
dbf1.Close ;
dbf1.TableName:=tbname ;
dbf1.Open ;
try
dbf1.PackTable ;
Result:=0;
except
Result:=1;
end;
end;
exports
pack;
beginend.
function pack (tbname:Pchar): Integer;stdcall;