Delphi学了忘了差不多的.有一个dll调用格式PB里面是 Function Integer PB_Read(Long APort, Ref String ACard) Library "Encrypt.dll"
Acard是返回一串字符,字符需要初始化.PB程序如下
string ACard
ACard= space(64)
PB_Read(0,ACard)
sle_1.text= ACard但是我用delphi写的 要不就是内存错误,要不就没有反应求高手告诉我怎么写dll调用
function PB_Read(_APort:integer;_ACard:pchar):Word;
stdcall external 'Encrypt.dll';
var
p:string ;
x:string ;
begin p := DupeString('', 64);
PB_Read(0,pchar(p)); x := 'aa';end;
Acard是返回一串字符,字符需要初始化.PB程序如下
string ACard
ACard= space(64)
PB_Read(0,ACard)
sle_1.text= ACard但是我用delphi写的 要不就是内存错误,要不就没有反应求高手告诉我怎么写dll调用
function PB_Read(_APort:integer;_ACard:pchar):Word;
stdcall external 'Encrypt.dll';
var
p:string ;
x:string ;
begin p := DupeString('', 64);
PB_Read(0,pchar(p)); x := 'aa';end;
var
p:string ;
begin p := DupeString(' ', 64);
PB_Read(0,P); edit1.text := p;end;