bool __fastcall TFrmMain::InsertDB(AnsiString ROOTID, AnsiString LINKID)
{
    TTable *LinkTable = new TTable(FrmMain);

    LinkTable->Active = false;
  // テーブルの型と名前を定義する
    LinkTable->DatabaseName = "STANDARD1";
    LinkTable->TableType = ttParadox;
    LinkTable->TableName = "test0718.db";



    if(LinkTable->Exists)
    {
        ShowMessage("Exists");
        LinkTable->Append();
        LinkTable->FieldByName("NUM")->AsInteger = 1;
        LinkTable->FieldByName("ROOT_ID")->AsString = ROOTID;
        LinkTable->FieldByName("LINK_ID")->AsString = LINKID;

        LinkTable->Post();
    }

    return true;
}

계속 에러가 나는데 잘못된부분이 있나요?????