<< Click to Display Table of Contents >> Navigation:  »No topics above this level« Delphi Examples: DbiGetTableOpenCount

Return the number of open cursors on the specified table. This example uses the following input:

 NumCursors := fDbiGetTableOpenCount(InterBaseTable);

 

The function is:

function fDbiGetTableOpenCount(Table: TTable): Word;

var

 Props: CURProps;

begin

 Check(DbiGetCursorProps(Table.Handle, Props));

 Check(DbiGetTableOpenCount(Table.DBHandle, PChar(Table.TableName),

   Props.szTableType, Result));

end;