Oralce 调用Delphi写DLL去访问C# WebService

Question

存储过程 CALL 外部dll?你厉害。分两步走吧：
建立测试的独立EXE， CALL 外部DLL 看是否成功；
建立测试DLL， 存储过程 CALL 测试DLL看是否成功；

Answer 1

  这个一般是在使用COM或者调用ADO控件时出现的错误，通常情况下都是程序的问题。调用了com,ole函数库前就要coinitialize,因为在应用程序中，delphi会自动在initialize 单元加上对co...函数的调用，在dll中要自己调用。
    但在Delphi开中的PubDBConn中的如下代码竞也提示“尚未调用 CoInitialize”procedure CreateadocSQL;
begin
  adocSQL := TADOConnection.Create(nil);
  try
    if adocSQL.Connected then
      adocSQL.Close;
    adocSQL.ConnectionString := StrIS;
    adocSQL.LoginPrompt := FALSE;
    adocSQL.Connected := TRUE;
    adocSQL.CommandTimeout := 600;
  except
    on e: EOleException do
      Application.MessageBox(PChar(e.Source), PChar(e.Message), MB_OK + MB_ICONSTOP);
  end;
end;initialization        CreateadocSQL;
end.    最终在CreateadocSQL前后加上CoInitialize(nil)和CoUninitilize()，即try  
  coinitialize(nil);  
  ....  
  finally  
  .....  
  couninitialize;  
  end;    当然单元中要uses   activex。