Advantage TDataSet Descendant
Creates a new table with the same structure as the given dataset.
procedure AdsCopyTableStructure( strFileName : String );
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’ );