我在'mydll'中封装了这样一个函数,在delphi中也成功调用了,这个readcardno 函数能被其他语法不同的编程语言调用吗?谢谢前辈们指点,如果不能,打个比方我想要它被VC++调用,这个函数应该怎么改造,再次谢谢!
function readcardno(var icdev,cardno:integer):integer;stdcall;export;
var
    st,lengths,offset:integer;
    data2:Array[0..256] of char;
begin
    icdev:=ic_init(1-1,9600);
    cardno:=12345 ;
    offset:=29;          
    lengths:=3;
    data2:='';  
    st:=srd_4442(icdev,offset,lengths,data2);   
    if st<>0 then
      begin
        showmessage(inttostr(st)+':read cardno error');
        exit;
      end ;                                     
      ///////////////////////////////
end;

解决方案 »

  1.   

    function readcardno(var icdev,cardno:integer):integer;stdcall;
    var
        st,lengths,offset:integer;
        data2:Array[0..256] of char;
    begin
        icdev:=ic_init(1-1,9600);
        cardno:=12345 ;
        offset:=29;          
        lengths:=3;
        data2:='';  
        st:=srd_4442(icdev,offset,lengths,data2);   
        if st<>0 then
          begin
            showmessage(inttostr(st)+':read cardno error');
            exit;
          end ;                                     
          ///////////////////////////////
    end;EXPORT
       readcardno;在你的VC里直接调用倒入,然后调用就可以了啊