Delphi编写的dll在C++Builder中的调用问题！

[Chimae]

Delphi编写的dll源码如下：
library FSearch;

uses
SysUtils, Classes, FastSearch, DB, ADODB;

var
FastSearch1: TFastSearch;

{$R *.res}
function FastSearch(ADOQuery1: TADOQuery):String;stdcall;
var strSQL:String;
begin
strSQL:='';
FastSearch1.DataSet:=ADOQuery1;
if FastSearch1.Search() then
begin
strSQL:=FastSearch1.QueryCondition;
end;
Result:=strSQL;
end;

exports
FastSearch;

begin
end.

C++Builder中调用如下：
typedef AnsiString (GetValue)(TADOQuery*);
__declspec(dllimport) AnsiString __stdcall FastSearch(TADOQuery *adoQuery);
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
HINSTANCE nDLL;
GetValue *theValue;
nDLL = LoadLibrary("FSearch.dll");
if(nDLL != NULL)
{
theValue = (GetValue*)GetProcAddress(nDLL, "FastSearch");
if(theValue != NULL)
Edit1->Text = (*theValue)(ADOQuery1);
}
FreeLibrary(nDLL);
}
//---------------------------------------------------------------------------
跟踪运行到Edit1->Text = (*theValue)(ADOQuery1);报错，也就是说调用Dll函数出错，请指教！

[shadowstar]

这个问题会经常有人问。

最好不要用AnsiString，改用PChar。

[ThinkX]

也不要用TADOQuery，天知道D6,D7和C6的TADOQuery一样不。

[shadowstar]

总之保持语言中立。

[Chimae]

都有道理，但总的解决问题，我的目的是因为我下载的控件只支持DELPHI，不支持C++BUILDER，该控件友没有源码，是个万能查询控件；
下载地址：http://www.twsoft.cn/download/software/zqpackage.exe

[Chimae]

结贴，免得被扣信誉分，呵呵！