level 12
library pdll;
procedure writefile;cdecl;
var res:text;
begin
assign(res,*C:\dll.txt*);
rewrite(res);
writeln(res, *success in cdecl*);
close(res);
end;
procedure writefile2; stdcall;
var tx:text;
begin
assign(tx,*C:\dll2.txt*);
rewrite(tx);
writeln(tx,* success in stdcall*);
end;
exports
writefile,
writefile2;
end.
LoadLibrary返回NULL
2014年11月10日 11点11分
4