Temen2 saya mau nanya nih, kalo di pemrograman delphi, bagaimana bentuk statement SQL like dengan variable sebagai parameternya. Misalnya saya mau membuat sebuah fasilitas pencarian dengan SQL LIKE berdasarkan nilai pada suatu masukan tertentu, misalkan textbox. Makasih atas bantuannya.

ehmmm... kamsudnya gini yach...

prosedure....
begin
with query1 do
  begin
    Active:=false;
    SQL.Clear;
    SQL.Text:='SELECT * from member where nama like '+QuotedStr('%'+edcari.Text+'%')+' ORDER BY id_member DESC';
    Active:=true;
  end;
end;

kira-kira gitu dech...

database nya apa? ni contoh di access isi query select * from table1 where field1 like :field1 in delphi with ADOQuery1 do begin Close; Parameters[0].Value:=textbox.Text+'%'; Open; end;

pertanyaan hampir mirip :oops: saya memiliki 2 bh tabel _________________________________ ID |nama |makanan |minuman | Total | ========================== C1| | | | | | | | | | ----------------------------------------------- apabila saya klik button tambah maka muncul form baru maka muncul form baru dan tabel baru : _________________________________ ID |nama_mknan |qty |harga| jumlah | ========================== C1| | | | | | | | | | ----------------------------------------------- apabila C1 sdh pernah membeli makanan maka makanan yg telah dibeli muncul pada tabel 2 dan tabel ke-2 append dengan ID C1 otomatis mengisi ID pd tebel 2 (klo belum prnah membeli tbel dua berati kosong tetapi tetep ID C1 tsb otomatis mengisi ID tabel2) ktnya menggunakan query tp sy belum memahaminya mohon petunjuknya sy menggunakan coding spt ini tp error :

procedure TForm2.ButtontambahClick(Sender: TObject);
begin
Formmakan.Show;
With querymakan do
  begin
    Active:=False;
    SQL.Clear;
    SQL.Add('Select * from Tbmakan where Tbmakan.ID=Tbcustomer.ID');
    Active:=True;
  end;
end;

muncul pesan error : Invalid use of keyword Token :ID = Tbcustomer.ID linenumber:1. Apa yang salah dan apa yg perlu saya tambahkan mohon petunjuk dr semua Terima kasih sebelumnya Saya menggunakan Paradox

@yanxs Saya bukan jawab pertanyaan intinya, saya cuma coba bantu yang error dibawah kenapa, karena tabel TBCustomer belum anda ikutkan, jadi mustinya query nya seperti ini: select * from tbmakan, TBCUSTOMER where tbmakan.id = tbcustomer.id CMIIW

@fresh: @yanxs Saya bukan jawab pertanyaan intinya, saya cuma coba bantu yang error dibawah kenapa, karena tabel TBCustomer belum anda ikutkan, jadi mustinya query nya seperti ini: select * from tbmakan, TBCUSTOMER where tbmakan.id = tbcustomer.id CMIIW

saya dah coba spt itu tetep muncul pesan error spt begitu sya sngt mengharapkan bantuan semua, klo perlu adakah artikel yg menjelaskan semua itu cz saya cari2 nggak nemu2 :d thnk's before

@yanxs terus terang saya masih bingung maksud anda, xixiixix. btw itu Query buat nampilin semua data kah? soalnya ga ada yg spesifik, mungkin Query tersebut sepadan dengan [sql] SELECT FROM tbmakan Inner Join tbcustomer ON tbmakan.id = tbcustomer.id [/sql] klo yg di tulis @fresh itu juga bener cuman ada beberapa database yg tidak support perintah seperti itu. klo memang mau menampilkan sesuatu data dengan criteria tertentu jua, misal sample simple [sql] SELECT FROM tbmakan Inner Join tbcustomer ON tbmakan.id = tbcustomer.id WHERE tbcustomer.id='C1' [/sql]

Tolong donk kirim contoh program sistem pengolahan data penjualan yang pake paradox

Tlg ya... email : [email protected] Thanks..

ini masih dalam topik yang sama atau ganti topik nih?