안녕하세요

원래 기본 유닛에 ODBC에 관한 유닛이 없으니 이렇게 함수 선언부를 적어주시고여..

function SQLConfigDataSource(hwndParent: HWND; fRequest: WORD; lpszDriver: PChar;
  lpszAttributes: PChar): BOOL; stdcall; external 'odbccp32.dll';
이렇게 하면 정적링크가 될거입니다.

그담에 필요한 상수를 odbcinst.h를 보구 선언해주시고여...

const
  ODBC_ADD_DSN        = 1;    // Add data source
  ODBC_CONFIG_DSN     = 2;    // Configure (edit) data source
  ODBC_REMOVE_DSN     = 3;    // Remove data source
  ODBC_ADD_SYS_DSN    = 4;    // add a system DSN
  ODBC_CONFIG_SYS_DSN = 5;    // Configure a system DSN
  ODBC_REMOVE_SYS_DSN = 6;    // remove a system DSN

그담에 여기 FAQ에 있는 내용대로 사용하시면 되겠네여..


procedure TForm1.Button1Click(Sender: TObject);
var
  bResult: boolean;
begin
  bResult := SQLConfigDataSource(0, ODBC_ADD_DSN, 'Microsoft Access Driver (*.mdb)', 'CREATE_DB=c:\ATest.mdb General');
  if bResult then ShowMessage('Success') else ShowMessage('Fail');
end;

제가 테스트 해본거라 별 문제 없을거여요..
그럼 즐거운 하루 되세여..


델파이언 님이 쓰신 글 :
: Delphi에서 MDB를 만들고 관련 Table을 만들려고 합니다.(DataDump 말구요^^)
:
: 코딩으로 직접 만드는 방법이요!!!
:
: 아시는 분 계시나요?
:
: 소스와함께 부탁드립니다.