如何在DLL的输出函数中返回字符串给调用者

    技术2022-05-17  39

    function aa( outstr: PChar ): Boolean; stdcall; var straa: string; //必须通过局部变量中转,不能直接使用var参数 begin Result := False; straa := 'abcd'; Move(straa[1], outstr^, Length(straa)); Result := True; end;

     

    调用:

    function aa(var outstr: string ): Boolean; var buffer: array[0..MAX_PATH-1] of char; begin FillChar(buffer, MAX_PATH, 0); Result := Taa(funcaa)(buffer); outstr := buffer; end;

     


    最新回复(0)