如何将Delphi中IBX组件的Firedac数据库信息替换为长尾词实现?
- 内容介绍
- 文章标签
- 相关推荐
本文共计147个文字,预计阅读时间需要1分钟。
我需要将IBX(Interbase/Firebird)连接迁移到Firedac,但不知道如何获取Firedac的TIB+DatabaseInfo组件所提供的特点供应商信息。我对BackoutCount、DeleteCount、ExpungeCount等计数器感兴趣。如何通过Fire获取这些信息?
但是我怎样才能获得Firedac的TIB DatabaseInfo组件所获得的特定供应商信息?
我对计数器BackoutCount,DeleteCount,ExpungeCount感兴趣……
如何通过Firedac检索此信息?
您可以通过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;
本文共计147个文字,预计阅读时间需要1分钟。
我需要将IBX(Interbase/Firebird)连接迁移到Firedac,但不知道如何获取Firedac的TIB+DatabaseInfo组件所提供的特点供应商信息。我对BackoutCount、DeleteCount、ExpungeCount等计数器感兴趣。如何通过Fire获取这些信息?
但是我怎样才能获得Firedac的TIB DatabaseInfo组件所获得的特定供应商信息?
我对计数器BackoutCount,DeleteCount,ExpungeCount感兴趣……
如何通过Firedac检索此信息?
您可以通过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;

