mesaj versin istiyorum

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
kafkasyali2002
Üye
Mesajlar: 37
Kayıt: 18 Haz 2003 11:48

mesaj versin istiyorum

Mesaj gönderen kafkasyali2002 »

Merhaba
Edit e girilen metni, veritabanı dosyası içerinde aratıp
bulduysa Aranan kayıt bulunmuştur bulamadııysa kayıt bulunamadı mesajı vemek istiyoeum
Aramada
table1.locate('adi',edit1.text,[]); yontemını kullanıyorum
Teşekkürler
Kullanıcı avatarı
mussimsek
Admin
Mesajlar: 7588
Kayıt: 10 Haz 2003 12:26
Konum: İstanbul
İletişim:

Mesaj gönderen mussimsek »

if not table1.locate('adi',edit1.text,[]) then
ShowMessage('Kayıt bulunamadı');

Kolay gelsin.
Kullanıcı avatarı
Kuri_YJ
Moderator
Mesajlar: 2247
Kayıt: 06 Ağu 2003 12:07
Konum: İstanbul
İletişim:

Ek bilgi

Mesaj gönderen Kuri_YJ »

Merhaba,

Locate aslında (bence) çok efektif bir kullanım olmaz bunun yerine

SetKey, GotoKey, GotoNearest

gibi fonksiyonları kullansan daha iyi olur. Ayrıca Exact Matching yaptırmak istersen GotoKey, Yakın Arama (Aradığın yoksa ona benzer ilk sonraki kayıt) yaptırmak istersen GotoNearest'ı kullanabilirsin.

Yukarıda verdiğim fonksiyonlar Index'lenmiş alanlar için geçerlidir, table'da indexin var mı? Yoksa çalışmaz o zaman locate kullanman gerekir.

Kolay Gelsin
Kuri Yalnız Jedi
Harbi Özgürlük İçin Pisi http://www.pisilinux.org/
Kullanıcı avatarı
mussimsek
Admin
Mesajlar: 7588
Kayıt: 10 Haz 2003 12:26
Konum: İstanbul
İletişim:

Mesaj gönderen mussimsek »

Merhaba,

bence Locate kayıt bulmak için en uygun yöntem. Ayrıca Locate eğer index varsa, kaydı bulmak için indexi kullanır.

Kolay gelsin.
Kullanıcı avatarı
mehmet_turecan_cakmak
Üye
Mesajlar: 132
Kayıt: 02 Tem 2003 01:08
Konum: Afyon
İletişim:

kayıt bulma

Mesaj gönderen mehmet_turecan_cakmak »

mustafa hocam sizin yazdığınız koda şöyle bir alternatif sunsam ayıp olmaz heralde :D

if table1.locate('adi','edit1.text',[]) then
else
showmessage('Aradığınız Kayıt Bulunamadı!!!');

eger ado kullandıysanız table1. yerine adodataset1 yazarsanız sorun çözülür

iyi çaılışmalar...
Kullanıcı avatarı
mussimsek
Admin
Mesajlar: 7588
Kayıt: 10 Haz 2003 12:26
Konum: İstanbul
İletişim:

Mesaj gönderen mussimsek »

niye ayıp olsun, tabi ki yazabilirsin :wink:

Kolay gelsin.
kafkasyali2002
Üye
Mesajlar: 37
Kayıt: 18 Haz 2003 11:48

tesekkurler

Mesaj gönderen kafkasyali2002 »

Hepinize tesekkur ederim
Tamam halletim
Iyi calismaalar :P :P
Cevapla