delphi-5 - 我的应用程序中出现莫名其妙的错误类错误

Question

我有一个大问题，我不知道如何纠正它。出乎意料的是，当我编译然后尝试运行我的应用程序时——我已经工作了六个月——我得到了一个Class Not Registered错误。我也有一个弹出错误消息说dbx.dbl没有找到。在过去的几天里，我没有在该计划中添加任何内容，其中包括任何新课程。我正在使用Delphi 5。我不知道如何识别未注册的类。该程序将无法运行，我花了几个小时试图找出问题，但没有成功。

更多信息：我已将可执行文件和数据文件移至另一台计算机，一切正常。所以这似乎是我的开发框的问题。

更多信息：我按照 fpiette 的建议做了，但没有发现任何帮助。所以我创建了一个非常基本的应用程序：

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls, Db, ADODB;

type
  TForm1 = class(TForm)
    ADOConnection1: TADOConnection;
    ADOQuery1: TADOQuery;
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);
begin
   ADOConnection1.Connected := True;
   ADOQuery1.Close;
   ADOQuery1.Connection := ADOConnection1;
   ADOQuery1.SQL.Clear;
   ADOQuery1.SQL.Add('select * from tblsupplier');
   ADOQuery1.Open;
end;

end.

执行该行时Class Not Registered发生错误ADOQuery1.Open;。

我是否正确地假设由于程序中没有其他组件，所以错误必须在ADO代码中？ADOConnection1调用Access数据库中的点Suppliers并且连接测试成功。

标签： delphi-5