Tampilkan postingan dengan label BDE. Tampilkan semua postingan
Tampilkan postingan dengan label BDE. Tampilkan semua postingan

Senin, 09 Desember 2013

charticha.blogspot.com/
Penggunaan alias BDE sangat dibutuhkan dalam program, utamanya aplikasi dekstop dengan database paradox. dengan alias BDE akan memudahkan pengesetan database. Karena cukup menggunakan satu pintu atau gateway yaitu cukup memanggil nama alias. Keuntungannya kita bisa mengubah ubah alamat direktory database.
Untuk membuat alias BDE kita bisa membuka stting control Panel pada windows. namun cara tersebut sangat memakan waktu dan tidak efisien karena delphi menyediakan fungsi untuk membuat 
alias pada BDE.

Syntax :

procedure AddStandardAlias(const Name, Path, DefaultDriver: String); 
sekarang kita buat aplikasi baru :
  • File --> New --> Application
  • Tambahkan 1 buah button
  • tekan F12 untuk masuk ke form listing
  • Tambahkan dibagian uses sebuah unit DBTables sehingga seperti di bawah ini :

interface
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, DBTables, StdCtrls;


procedure TForm1.Button1Click(Sender: TObject);
var
t:tsession;
begin
t:=tsession.Create(self);
t.SessionName:='sesionku';
t.AddStandardAlias('coba','c:\data','paradox');
t.SaveConfigFile;
t.Free;
end;

 Catatan :
  • Nama alias coba
  • alamat folder database C:\data
  • driver paradox
jalankan program dan buka BDE apakah sudah terbentuk atau belum.

                     => Drag Files ke FROM Delphi
                     => Menampilkan SEARCH dalam Tabel Delphi