Delphi Examples: DbiFormFullName

<< Click to Display Table of Contents >>

Navigation:  »No topics above this level«

Delphi Examples: DbiFormFullName

Return to chapter overview

Return the fully qualified table name and path.

This example uses the following input:

 FullName:=fDbiFormFullName(Table1);

 

The function is defined as:

function fDbiFormFullName(Tbl: TTable): String;

var

 Props: CurProps;

begin

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

 SetLength(Result, DBIMAXPATHLEN);

 Check(DbiFormFullName(Tbl.DBHandle, PChar(Tbl.TableName),

   Props.szTableType, PChar(Result)));

end;