名前 題名 ▼ Mr.XRAYさん > で，やってみました． > > 開発環境は，Windows 7 U64(64bitですね) + Delphi 2010 VCL-32(Win32です) > サンプルプログラム集の[630_ADOでJETデータベースの新規作成と最適化]の > [01_JETデータベースの新規作成]です． > > データベース名をEdit1に入力できるように編集しています． > > (1) [管理者として実行]で実行してmdbファイル新規作成して終了 > (2) [管理者として実行]でEXEを起動 > (3) データを入力して終了 > (4) 再度[管理者として実行]で起動して，データを確認 > > 以上です．これ以外の細かいテストはしていません． > こちらの環境では，データの編集が可能でした． > 追加したのは > > procedure TForm1.FormShow(Sender: TObject); > begin > Edit1.Text := 'K:\AAA\TEST.mdb'; //K:\はUSBです > end; > > 修正したのは， > > procedure TForm1.btnCreateClick(Sender: TObject);の > > // ADatabaseName := '..\TEST.mdb'; > ADatabaseName := Trim(Edit1.Text); //このコードにした > > さて，何が違うのでしょう? 困りました． > > > http://mrxray.on.coocan.jp/Delphi/zipothers/MDB_CreateTest.zip GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示). (上限122000(120k)バイト) 削除キー Link