一个关于字符串的小问题请大侠帮忙。

Question

为了处理一个字符串，我用vc6.0做了一个dll。编写了一个函数：
extern "c" _declspec(dllexport) int kkk( char * ss);
现在我想在delphi中调用，但是由于vc和delphi的字符串格式不匹配，怎么也无法使用该函数。请教各位大侠，delphi中在引用此函数之前该如何声明。调用时该如何写函数中的参数。入方便请写出关键代码，小弟不胜感激。

Answer 1

function kkk(ss:Pointer):integer;stdcall; external 'kkk.dll';
//===================================================
var
  s:array[0..99] of char;
  p:Pointer;
  i:integer;
begin
   s:='信息';
   p:=@s;
   i:=kkk(p);
   ShowMessage('ReturnValue:'+IntToStr(i));
end;

Answer 2

不好意思，引出函数不应该是:
function kkk(ss:Pointer):integer;stdcall; external 'kkk.dll';
而是:
function kkk(ss:Pointer):integer;cdecl; external 'kkk.dll';