dll接口调用问题

[piqimiss2]

我下了个 亦思验证码 delphi调用的时候 调用 GetCodeText.dll 即可
提供的接口 是

组件包文件列表：
GetCodeText.dll --编程接口库
Reco.svr --识别引擎
RecoLib.tc --样本库

---------------------
编程接口:
LPTSTR GetCodeText(); //识别验证码，返回识别结果

---------------------
求 在delphi 如何调用 这个 GetCodeText();

感谢 有具体代码最好了 再次感谢

[bdmh]

function GetCodeText():PChar

[白耗子]

//静态调用
function GetCodeText():pChar;stdcall;external 'GetCodeText.dll';

[YLCN2010]

动态调用DLL

var
  dll:Cardinal;
  P: function():PChar;
  PC: PChar;
begin
  dll:=LoadLibrary(PChar('GetCodeText.dll'));
  if dll<>0 then
  begin
    @P:=GetProcAddress(dll, 'GetCodeText');
    if @P<>nil then
      PC := P;
    FreeLibrary(dll);
  end;
end;