Listing pencarian di delphi 7

Listing pencarian merupakan scrip yang tentunya selalu digunakan dalam pemrograman delphi baik itu program sederhana karena disinilah bisa dilakukan pemanggilan database untuk ditampilkan ke program yang bisa dilihat user.

Lihat screen shotnya:

Berikut ini listing pencariannya;

procedure Tfolappenduduk.btcariClick(Sender: TObject);

var

  s: string;

begin

  if RadioButton1.Checked = True  then

      begin

         s :=('select * from tbpenduduk');

         dm.qpenduduk.sql.Clear;

         dm.qpenduduk.sql.Add (s);

         dm.qpenduduk.open;

      end;

Bagaimana merut teman-teman delphier sangat mudah bukan lihat juga memasukkan isi cara memasukkan isi database ke combobox.