Source berikut ini untuk membackup data (PARADOX) beserta isi-isinya.
kalo nggak mo jalan programnya coba tambahkan
petikan kode-nya:
untuk memanggil procedure copytable, gunakan komponen apa aja saya pake komponen button
uses DB, DBTables, DBIProcs |
petikan kode-nya:
procedure copyTable( const strSource, strTarget : String ); var hDB : HDBIDB; // Handle ke database const OVERWRITE_FLAG = Bool( TRUE ); begin with TTable.Create( Application ) do try DatabaseName := extractFilePath( strSource ); TableName := extractFileName( strSource ); open; hDB := DBHandle; close; // buat backup check( dbiCopyTable( hDB, OVERWRITE_FLAG, pChar( strSource ), 'PARADOX', pChar( strTarget ) ) ); finally free; end; end; |
untuk memanggil procedure copytable, gunakan komponen apa aja saya pake komponen button
procedure TForm1.Button1Click(Sender: TObject); begin copyTable( 'C:\Program Files\Common Files\Borland Shared\Data\Country.db', 'C:\My Documents\Table\Pindahan.db' ); // buatkan dulu directory C:\My Documents\Table end; |
Silahkan mencoba.
Random Articles
- Project Group dalam Lazarus
- Procedure Dan Function di Delphi
- open Ms-Exell dari delphi
- PascalTalk #1: Pemanfaatan Artificial Intelligence di Masa Covid-19
- Tulisan berjalan di form Delphi
- Melarang Alt+F4 dan Alt+Tab
- Menyimpan data Memo kedalam file MS Word
- komponen TMyDateEdit
- Terbilang versi Indonesia dan english
- Aplikasi Delphi Konek database layaknya php namun dengan Zeos, Mysql dan TIniFiles Ber Enkripsi
Last Articles
Recent Topic
- PascalTalk #6: (Podcast) Kuliah IT di luar negeri, susah gak sih?
by LuriDarmawan in Tutorial & Community Project more 3 years ago - PascalTalk #5: UX: Research, Design and Engineer
by LuriDarmawan in Tutorial & Community Project more 3 years ago - PascalTalk #4: Obrolan Ringan Seputar IT
by LuriDarmawan in Tutorial & Community Project more 3 years ago - PascalTalk #2: Membuat Sendiri SMART HOME
by LuriDarmawan in Tutorial & Community Project more 3 years ago - PascalTalk #3: RADically Fast and Easy Mobile Apps Development with Delphi
by LuriDarmawan in Tutorial & Community Project more 3 years ago - PascalTalk #1: Pemanfaatan Artificial Intelligence di Masa Covid-19
by LuriDarmawan in Tutorial & Community Project more 3 years ago - Tempat Latihan Posting
by LuriDarmawan in OOT more 4 years ago - Archive
- Looping lagi...
by idhiel in Hal umum tentang Pascal Indonesia more 11 years ago - [ask] koneksi ke ODBC user Dsn saat runtime dengan ado
by halimanh in FireBird more 11 years ago - Validasi menggunakan data tanggal
by mas_kofa in Hal umum tentang Pascal Indonesia more 11 years ago