IBX TIBDatabase.GetTableNamesは私のFirebirdのデータベースに新しいテーブルを作成し、私が呼び出した場合、新しく作成されたテーブル

Question

は表示されません。問題に最初に持っている：

IBDatabase1.Connected := False; 
IBDatabase1.Connected := True; 

そして私はTIBDatabase.GetTableNamesを呼び出して、新しく作成されたテーブルを列挙することができます。

次関数は、パラメータのFirebirdで

function TableExists(const aTableName: String): Boolean; 
var 
    ListOfExistingTables: TStringList; 
begin 
    Result:= False; 
    ListOfExistingTables:= TStringList.Create; 
    try 
    IBDatabase1.GetTableNames(ListOfExistingTables); 
    Result:= (ListOfExistingTables.IndexOf(aTableName) > - 1); 
    finally 
    ListOfExistingTables.Free; 
    end; 
end; 

Answer 1

もメタデータ変更がトランザクションに分離されているとして渡された所定のテーブル名の存在を決定するためにTIBDatabase.GetTableNamesを使用します。したがって、テーブルの作成に使用したトランザクションをコミットする必要があります。 IBXがテーブル名を読み取るために使用するトランザクションをコミットする必要があるかもしれません。