현재 사용중인 DB를 다른이름으로 저장하시려면
CopyFiled이라는 함수를 이용하여 복사하시고
Table을 새로 만들려면 프로그램내에서 동적으로Create해 주시면 됩니다.
예를들어
Number와 Name의 필드를 갖는 테이블을 만들거면 아래와 같이 하십시오.

//---------------------------------------------------------------------------
void __fastcall TMainForm::CreateTable(void)
//Directory : c:\test
//FileName  : temp.db
{
    CreateDir("C:\\test");
    AnsiString DatabaseName = "C:\\Test";
    AnsiString TableName = "temp.db";

    if(FileExists(DatabaseName+"\\"+TableName)==true) return;

    Table1->Active = false;
    Table1->DatabaseName = DatabaseName;
    Table1->TableName = TableName;
    Table1->TableType = ttParadox;
    Table1->FieldDefs->Clear();
    Table1->FieldDefs->Add("Number", ftInteger, 0, False);
    Table1->FieldDefs->Add("Name", ftString, 20, False);
    Table1->CreateTable();
    Table1->Close();
}
//---------------------------------------------------------------------------