delphi如和设置DLL返回字符型供其它语言调用.

来源：百度知道 编辑：UC知道 时间：2024/07/05 20:07:28
function test( const Str: string ):string ; Stdcall ;
begin

Result := 'computer2009';
end ;

exports
test;

Procedure AnsiFunction(var Src:Pchar);stdcall;

Src:=Pchar('AnsiOK');

这样便可以，若想要更详细你可以从以下地址下载我的一个程序作品，在它的PLUS子目录里面有制作DLL返回字符串的代码完整说明。
http://www.skycn.com/soft/38975.html

我这里有个参照列表。你自己看下：
ShorInt 8位有符号整数 char
Byte 8位无符号整数 BYTE,unsigned short
SmallInt 16位有符号整数 short
Word 16位无符号整数 unsigned short
Integer,LongInt 32位有符号整数 int,long
Cardinal,LongWord/DWORD 32位无符号整数 unsigned long
Int64 64位有符号整数 _int64
Single 4字节浮点数 float
*Real48 6字节浮点数
Double 8字节浮点数 double
*Extended 10字节浮点数 long double
Currency 64位货币类型
TDate/TDateTime 8字节日期/时间
Variant,OleVariant 16字节可变类型 VARIANT,^Variant,^OleVariant
Char,AnsiChar 1字节字符 char
WideChar 2字节字符 WCHAR
*ShortString 短字符串
AnsiString/String 长字符串 ^AnsiString
WideString 宽字符串 ^WideString
PChar,PAnsiChar NULL结束的字符串 ch