Contoh Syntax Delphi ZQuery menampilkan Data ke ComboBox. Kode ini berfungsi agar combobox berisi pilihan sesuai data yang diambil dari database.
Konsepnya pilih data dari database dengan metode select dan data diurutkan berdasarkan abjad. Kemudian data hasil query di tambahkan ke item combobox dengan melakukan perulangan sesuai jumlah data hasil query.
Berikut contoh combobox untuk memilih nama dokter yang datanya diambil dari database.
Var sql, p : string;
begin
p:='''';
sql := 'select * from dokter where aktif='+p+'1'+p+' ORDER BY nama ASC';
ZQuery1.Close;
ZQuery1.SQL.Clear;
ZQuery1.SQL.Add(sql);
ZQuery1.Open;
ZQuery1.First;
While not ZQuery1.Eof do
begin
CBSp.items.Add(ZQuery1.FieldValues['spesialis']);
ZQuery1.Next;
end
end;
Demikian contoh Syntax Delphi ZQuery menampilkan Data ke ComboBox. Semoga bermangfangat.
Posting Komentar