Advantage TDataSet Descendant
Creates a new table with the same structure as the given dataset.
procedure AdsCopyTableStructure( strFileName : String );
|
strFileName |
File to create with the current dataset structure. |
The table created does not contain records, but has field structure identical to the original table. Indexes are not copied by AdsCopyTableStructure. The empty table must be opened in a separate table instance.
AdsTable1.TableName := ‘x:\data\employee.adt’;
AdsTable1.Active := TRUE;
AdsTable1.AdsCopyTableStructure( ‘x:\data\empty employee file.adt’ );