我的程序产生了莫名的错误，请指教！！！

Question

情况是这样的，我有一个c/s结构的程序（我自己写的），可是在另外机子上的客户端程序时，就出现了“***.exe产生了错误，会被windows关闭，您需要重新启动程序，正在创建错误日志！”.在这种情况下，我把程序在本机运行，却一切正常。我怀疑中了病毒，我做杀毒处理。结果发现是是有病毒，叫“爱情后门”这种病毒。。现在在机子上清除干净了（我检查过很多次）。。可是在别的机子上还是一样的出现这个错误，真的无力了请好心人帮我一下！

Answer 1

装了连接数据库所需的dll没有，如果是midas则需要midas.dll

Answer 2

如果是没装这个，去微软下一下，但估计你不是这个问题。
你的问题很有可能是写的软件里装了某个控件，我装了aniGif这个控件就出现这个问题，后来不用这个控件就好了。
注意在Build with runtime packages前不要打勾。

Answer 3

非常感谢你的解答。
嗯。Build with runtime packages前我没有打勾。程序里是装有第三方控件。可是在前不久这个程序还能照运行。本软件是我们公司以前的人写的（一个ERP）。现在我来接手了，问题多如牛毛。

Answer 4

顶，关注中，我也出现那样的错误，我连数据库是用的ODBC，也没有用什么控件，而且“Build with runtime packages”前面没有打勾。为什么啊？

Answer 5

你的服务器端是不是有delphi的环境
如果有,那就不是midas.dll的问题
如果服务端没有安装,就有可能是那个文件的问题midas.dll放到2000    
c:\winnt\system32下     如果是98 放到   c:\windows\system中
就可以了,(但是这个实在三层结构中才能涉及到)

Answer 6

//截获打开网页的事件，利用URL来区别处理(URL的格式可以自己扩充)～～
procedure TForm1.WebBrowser1BeforeNavigate2(Sender: TObject;
  const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData,
  Headers: OleVariant; var Cancel: WordBool);
begin
  Cancel := True; //取消打开
  if URL = 'http://新建' then
  begin
    { TODO : 新建 }
  end else if URL = 'http://保存' then
  begin
    { TODO : 保存 }
  end else if URL = 'http://载入' then
  begin
    { TODO : 载入 }
  end else Cancel := False;
end;

Answer 7

这个程序是用ODBC连接的。。用了database这个控件来连接数据库的。。
在初始化database的时候我设为了false的

Answer 8

database1的具体连接是这样的：
DATABASE NAME=
USER NAME=
ODBC DSN=syerp3　
OPEN MODE=READ/WRITE
SCHEMA CACHE SIZE=8
SQLQRYMODE=
LANGDRIVER=
SQLPASSTHRU MODE=SHARED AUTOCOMMIT
SCHEMA CACHE TIME=-1
MAX ROWS=-1
BATCH COUNT=200
ENABLE SCHEMA CACHE=FALSE
SCHEMA CACHE DIR=
ENABLE BCD=FALSE
ROWSET SIZE=20
BLOBS TO CACHE=64
PASSWORD=原始的参数就是这样，还有哪些重要的参数没写呢？

Answer 9

我的问题已经解决了，我的是在Tdatabase组件中的那个connected属性设为TRUE了，我把它设为false，然后在程序中把它设置为True就可以了。楼主你看一下，如果还不行的话，应该就是第三方控件的问题了。