...

Arsip: [ASK]procedur pencarian data di data grid

 
user image
more 18 years ago

Iansx

ada yang tw gak cara buat procedure pencarian data di data grid...klo bisa ada contohnya ya dan gimana cara'a kita nyisipin code buat error handling'a klo data yang dicari tidak ketemu...mohon bantun'a... :P :shock: :D
user image
more 18 years ago

kupretkutu

mungkin begini procedure yg sederhana... procedure TForm1.Button1Click(Sender: TObject); begin ADOQuery1.SQL.Clear; ADOQuery1.SQL.Add('select * from tb_barang where namabarang="'+Edit1.Text+'"'); ADOQuery1.Open; if ADOQuery1.RecordCount=0 then ShowMessage('Data Tidak Ketemu'); end; datagrid nya udah terkoneksi langsung ke ADOQuery1 ya... Bisa juga sih pake ADOQuery1.Filter,tapi.... lupa... Mudah2an bisa membantu...
user image
more 18 years ago

EkoIndri

Jika anda menggunakan GridView, anda bisa menggunakan contoh program berikut ini. 

...
...
with HistoryMobilTangkiInISG do
    if SearchNext(<Indek field yang dicari>,<data yang dicari>) then
      // jika ketemu
    else
      // jika tidak ketemu
...
...
user image
more 18 years ago

widi

saya biasanya pake ADOTable : ADOTable1.Filter := 'namabarang ='+Edit1.text; ADOTable1.Filtered := true; if ADOTable1.RecordCount=0 then ShowMessage('Data Tidak Ketemu'); kalau pake filter yang di ADOQuery piye yo?
user image
more 18 years ago

EkoIndri

mungkin kalau yang ada hubungannya dengan databaset, lebih baik kalau menggunakan fungsi locate aja. Gampang koq mas, dan simple bgt. silahkan mas lihat contoh potongan kode program berikut ini : 

procedure TForm1.Button1Click(Sender: TObject);
begin
ADOQuery1.Close;
ADOQuery1.Open;
if ADOQuery1.Locate ('Nomor DO',edit1.Text,[loCaseInsensitive]) then
  MessageDlg('Data DO diketemukan...',mtInformation,[mbOK],0)
else
  MessageDlg('Data DO tidak diketemukan...',mtInformation,[mbOK],0);
end;
Semoga contoh potongan kode program diatas bisa membantu mas widi
user image
more 18 years ago

kupretkutu

@widi Oiya mas, aku juga pake ADOTable kalo mo menggunakan fungsi filter... :: tapi ada printah nya loh ADOQuery.Filter , cuman 'tak coba error wae...
user image
more 18 years ago

EkoIndri

kalau saran saya, baik adotable maupun ADOQuery, maka sebaiknya menggunakan fungsi locate aja... bahkan simple n praktis
user image
more 18 years ago

simba

Pake table? Hari gini masih pake table? :D
user image
more 18 years ago

EkoIndri

ya gpp to... bagi mereka yang baru belajar kan ini mungkin sangat penting dan mungkin sangat berharga semua butuh proses mas, mungkin karena mas simba dah expert, jadi hal ginian mungkin dah g pernah dipakai
user image
more 18 years ago

Iansx

apa cara yang diatas bisa dipake klo saya pake mysql?
more ...
|
Share to

AI Forward

🚀 We're thrilled to partner with Alibaba Cloud for "AI Forward - Alibaba Cloud Global Developer Summit 2025" in Jakarta! Join us and explore the future of AI. Register now: https://int.alibabacloud.com/m/1000400772/
#AlibabaCloud #DeveloperSummit #Jakarta #AIFORWARD

Last Articles

Last Topic

Random Topic

Local Business Directory, Search Engine Submission & SEO Tools FreeWebSubmission.com SonicRun.com