Database Terbuka Otomatis Pada Delphi

Maksud dari tulisan kali ini adalah, ketika kita membuat aplikasi database, maka data base tersebut masih tetap dapat terbuka ketika software kita pindahkan ke komputer lain. Kebanyakan aplikasi akan mengalami error dikarenakan file lokasi data base yang tidak sesuai.

kita tidak perlu melakukan pengaturan properti pada kommponen :
1. ADOconnection1
2. ADOTable1
3. DataSource1
4. RvDataSetConnection1
5. RvProject1
cukup dengan mengetikkan code berikut pada form1

procedure TForm1.FormCreate(Sender: TObject);
var alamatdb : WideString;
begin
alamatdb := ExtractFilePath(Application.ExeName) + 'database.mdb';  //Tulisan merah nama file data base
  with ADOConnection1 do begin
    Connected := False;
    LoginPrompt := False;
    Mode := cmShareDenyNone;
    ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' +alamatdb+ ';
    Persist Security Info=False';   // penentuan alamat database
  end;
  ADOConnection1.Connected := True;
  ADOtable1.Connection:= ADOConnection1;
  ADOtable1.TableName:='dataTemperature';  // penentuan nama table. ini adalah nama tabel dalam file data base yang telah kita buat

  ADOtable1.Active:=true;
  Datasource1.DataSet:= ADOTable1;
  DBGrid1.DataSource:=  DataSource1;

  RvProject1.ProjectFile:='project1.rav' ;  // ini adalah file reporting rave report. Tulisan merah nama file report
  form1.Position := poDesktopCenter;   //agar formnya pas tengah desktop
//listbox1.Visible := false;           //agar listbox1 tidak terlihat,tapi kalo mau ditampilkan boleh.
//label7.Caption:=timetostr(time);
end;
Persratan dari program diatas adalah dengan menyimpan semua file project dan data base kedalam satu folder.

Catatan :

Terdapat sebuah kasus biasanya ketika membuat file report, tidak dapat menampilkan hasil pembacaan data base. untuk mengatasi hal ini adalah dengan melakukan pengaturan pada komponen pendukung pada no 1 hingga 5. Jika telah melakukan pengaturan maka kembalikan seperti semula agar tidak terjadi error. Pengaturan ini dilakukan agar database dapat terbuka ketika dipindahkan pada komuter lain. untuk lebih jelasnya coba ikuti sesuai tabel dibawah dan  isi program sesuai cara di atas.