|
음~ 의심이 가는 부분이라면
: Table1->TableName = FileName;
: Table1->TableType << ttParadox;
일것 같은데요.
: Table1->TableType << ttParadox;
은
: Table1->TableType = ttParadox; 일것 같구요,
: Table1->TableName = FileName; 에서
FileName 이 c:\\test\\aaa.db 의 형태로 경로가 있는가 하는것과
경로가 없다면
Table1->DatabaseName = "c:\\test\\" (뒤의 두번째 \\는 붙는지 안붙는지는 테스트바람)
또는
Table1->DatabaseName = (alias 명)
으로 제대로 설정이 되었다면 이상은 없는듯합니다.
[만해] 님이 쓰신 글 :
: 안녕하세요 만해 입니다.
:
: 에러 가는 부분은 밑에 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;
: }
:
: 왜 에러가 나는지 조차 모르겠네요
:
: 좀 알려 주세요
:
: 그럼 이만~
:
|