Uzun zamandan sonra yeniden Delphi’ye el atayım dedim. Bilgisayarımda kullanmak üzere kendi ihtiyaç duyduğum birkaç program hazırlamak için kollarımı sıyırmışken size bir iki ipucu vereyim ;) Bu yazımdaki ipuçları Delphi ile veritabanında arama yapmanıza yarayan basit ama kullanışlı iki kod.
Veritabanınıdaki verileri yönetmek için TTable nesnesi kullanmışsak bu nesnenin FindNearest fonksiyonunu kullanabilirsiniz. Oldukça basit ve kullanışlı bir fonksiyondur. Örnek bir kod ile göstermem gerekirse;
[php]Table1.indexname := ‘SOYAD’;
Table1.FindNearest([‘Edit1.text’]);[/php]
1nci satırda arama yapacağımız sütunu belirttik. 2nci satırda da Edit1 kutusundan gelen kelimeyi arattık.
Veritabanınıdaki verileri yönetmek için TTable değil de SQL cümlelerini kullanmamıza yarayan TQuery nesnesini kullanmışsak, uygulamamıza şöyle bir SQL cümlesi ekleyerek arama yapabiliriz;
[php]Query1.Active := False;
Query1.SQL.Clear;
Query1.SQL.Add(‘select * from ozetler where SOYAD like ‘ + QuotedStr(‘%’ + Edit1.Text + ‘%’));
Query1.Active := True;[/php]
Bu örnekte öncelikle Query’yi durduruyoruz. Daha sonra SQL cümlesini sıfırlayıp yeni cümlemizi (arama cümlesi) ekliyoruz ve tekrar çalıştırıyoruz. Hepsi bu kadar.
Yukarıda en basit haliyle iki örnek verdim. Sorularınız için Delphi Dünyası’na başvurabilirsiniz.
Bu arada yakında hazırlamış olduğum bir Delphi uygulamasını kodlarıyla birlikte paylaşacağım, haberiniz olsun ;)
delphi hep öğrenmek istediğim bir dil olarak kaldı içimde. okulda pascal öğrenmiştik ilk olarak, sonrasın da delphi diye beklerken visual basic çıkınca piyangodan delphi kala kaldı öyle.
Erhan şu paylaşacağın delphi uygulaması ne üzerine merak ettim :)
Bu aralar delphi yüzünden kafayı yedim
Okul bitirme projesi olarak emlak takip otomasyonu aldım.
Delphi dersi içinde ortak okul takip otomasyonu projemiz var.Delphi delphi yeter kardeşim :)
Bitirme projem ile uğraşıyorum.Yukarıdaki kodlar çok işime yaradı. Çok teşekkürler.
mrhaba ben bilgisayar programcılığını okuyorum.bir projem var ve google sayfasına benzer bir arama motoru yapacagız.delphi 7 ben görselliğini hepsini yaptım yani görünüş google nin aynısı yanlız bunu internet üzerinde basit bir arama motoru yapmalıyım acilllllll yardım lütfen :((((((