Membuat Koneksi Database SQLite Dengan Zeos di Lazarus [ Part 2 ]

Dibagian  kedua ini asumsi kita sudah membuat data.db dan sudah di taruh dalam sebuah foder misalnya d:\viralSMS\

langkah selanjutnya adalah membuat project baru di lazarus, Pilih menu File lalu New pilih dibagian Project Application lalu ok

Setelah terbentuk project baru lakukan penyimpanan project dan Unit.
kemudian tambahkan Component Zconnection pada Form, ini adalah component Zeos untuk menghubungkan ke database SQLite dengan perantara file lib32.dll

Langkah selanjutnya tambahkan button kemudian double button tersebut lalu kita buat coding untuk konek dengan database SQLite

berikut ini codingnya

procedure TForm1.Button1Click(Sender: TObject);
var
sfolder:string;

begin
sfolder:=extractfilepath(application.ExeName);

ZConnection1.Database := sfolder+’data.db‘;
ZConnection1.LibraryLocation:=sfolder+’lib32.dll‘;
ZConnection1.Protocol:=’sqlite-3‘;
ZConnection1.ClientCodepage:=’cCP_UTF8‘;
ZConnection1.LoginPrompt:=false;
ZConnection1.Connect;
end;

Compile dan Run Project lalu klik button1, jika tidak muncul error berarti koneksi berhasil

 

 

Views: 0

You may also like...

Popular Posts

Leave a Reply

Your email address will not be published. Required fields are marked *