我寫了一個獨立的module    是這樣的    

unit DatabaseModuleUnit;    interface    uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  DBTables;    type
  TDatabaseModule = class(TForm)
    Database1: TDatabase;
  private
    { Private declarations }
  public
    { Public declarations }
    Procedure GetDBTableList(Parameter : string;var DataBaselist:tstringlist);
  end;    var
  DatabaseModule: TDatabaseModule;    implementation    {$R *.DFM}    Procedure TDatabaseModule.GetDBTableList(Parameter : string;var DataBaselist:tstringlist);
begin
     Session.GetTableNames(Database1.DatabaseName , Parameter ,False, False, DataBaselist);
end;    end.

然後是給其他project 用的 我一直都只有給一個project 用到 但現在有另外一個project 要用到 然後我把這個module加到上面 然後就出現error 我反覆測試確定是這出來的 以下是第二個加上去之 run 出來的error 請問有沒有大大知道 謝謝

我知道問題了