|
안녕하세요 만해 입니다.
에러 가는 부분은 밑에 Try { Table1->CreateTable() } 인데요
에러 메세지는 런타임시에 젤 많이 나는 액세스 바이얼레이션이던가
하는 그 에러입니다.
bool TForm1::CreateTable(AnsiString FileName)
{
AnsiString Dir = ExtractFilePath( FileName );
TIndexOptions IdxOpt;
IdxOpt << ixPrimary;
if (!DirectoryExists( Dir )) ForceDirectories( Dir ); // 디렉토리 생성.
// Table1->Close();
Table1->FieldDefs->Clear();
Table1->FieldDefs->Add( "이름", ftString, 20, False );
Table1->FieldDefs->Add( "전화번호", ftString, 20, False );
Table1->IndexDefs->Clear();
Table1->IndexDefs->Add( "mainindex", "이름;전화번호", IdxOpt );
IdxOpt >> ixPrimary;
Table1->IndexDefs->Add( "이름", "이름",IdxOpt );
Table1->TableName = FileName;
Table1->TableType << ttParadox;
try
{Table1->CreateTable();} <<---- 요가 에러가 나는 구역
catch (...)
{
ShowMessage("디비를 못맹글겠는디유?~");
}
Table1->Open();
return Table1->Active;
}
왜 에러가 나는지 조차 모르겠네요
좀 알려 주세요
그럼 이만~
|