IBX

Question

에서 TIBDatabaseInfo에 대한 Firedac 교체하여 데이터베이스 정보를 얻을 난 Firedac 에 IBX (인터베이스/파이어 버드) 연결을 마이그레이션해야하지만 우리는 Firedac에 의해 TIBDatabaseInfo 구성 요소에 의해 가지고 같은 방법은 내가 특정 공급 업체의 정보를 얻을 수 있습니까? 나는 카운터에 관심이 있습니다. BackoutCount, DeleteCount, ExpungeCount ...

Firedac에서이 정보를 얻으려면 어떻게해야합니까?

Answer 1

FireDAC.Phys.IBWrapper 단위의 TIBDatabase 개체를 통해 이러한 정보를 얻을 수 있습니다. 예를 들어이 방법은 (FDConnection1를 가정하는 것은 IB 데이터베이스에 연결된 연결 개체입니다) :

uses 
    FireDAC.Phys.IBWrapper; 

procedure TForm1.Button1Click(Sender: TObject); 
var 
    IBDatabase: TIBDatabase; 
begin 
    IBDatabase := TObject(FDConnection1.CliObj) as TIBDatabase; 

    Memo1.Lines.Assign(IBDatabase.backout_count); 
    Memo2.Lines.Assign(IBDatabase.delete_count); 
    Memo3.Lines.Assign(IBDatabase.expunge_count); 
end;