카이한센 님이 쓰신 글 :
: 작업을 하다보면 미리 만들어둔 테이블이 아닌곳에 접근을 하는 경우도
: 발생을 할것 같습니다.
:
: 이럴때는 에러메시지가 떠버리는데.
: 미리 접근하려는 테이블이 존재하는지 알아봐서
: 존재하지 않는다면 테이블을 하나 만들어라는 메시지를 출력하고.
: 존재한다면 작업을 수행하도록 하고싶은데.
:
: 테이블존재 여부를 어떻게 알 수 있을까요?

안녕하십니까?

한꼬맹이 입니다.

테이블 존재 여부를 알수 잇는 방법중 가장 안무식한 방법이 Session을 이용하는 방법

같습니다.

void __fastcall TForm1::Button1Click(TObject *Sender)
{
  bool Value = IsTableExist("BCDEMOS", "Animals.dbf");

  if(Value)
    ShowMessage("존재한다.");
  else
    ShowMessage("존재안한다.");
}
//---------------------------------------------------------------------------


bool __fastcall TForm1::IsTableExist(const AnsiString DatabaseName, const AnsiString TableName)
{
  TStringList *MyStringList = new TStringList;
  try
  {
    Session->GetTableNames(DatabaseName, TableName, False, False, MyStringList);
    if(MyStringList->Count == 0)
      return False;
    else
      return True;
  }
  __finally
  {
    delete MyStringList;
  }

}

그럼 참고하시길....