DBEdit1 Kontrol!!

[ozcank]

Arkadaşlar ben DBEdit1 e müşteri kodu yazdırıyorum ve bunu Table1 de kontrol ettirmek istiyorum kayıt varsa "Bu kayıt Mevcut" yoksa "Böyle bir kayıt yok" ve tekrar DBEdit1 e dönüş yapacak böyle bir döngü nasıl kurarım?

[Battosai]

[ozcank]

Arkadaşlar DBEdit1 alanını kontrol ettirmek istiyorum "BU KAYIT MEVCUT" veya "KAYIT BULUNAMADI" şeklinde yardım ederseniz sevinirim?

[NeverFear]

if Table1.FindKey([DBEdit1.Text]) then ShowMessage('Bu kayıt veritabanında var')
else ShowMessage('Bu kayıt veritabanında yok');

buna benzer bir kontrol satırı ile istediğin sonuca ulaşabilirsin

[ozcank]

DBEdit1.text alanına geri dönüş yaptırmalıyım
DBEdit1.Setfocus; bunu kullandığım zaman bir türlü form dan çıkamıyorum takılıyor daha basit ve etkili bir yol var mı?

[NeverFear]

formdan çıkış için hangi komutu kullanıyorsun (soru biraz komik ama).
Action:= caFree veya Application.Terminate ile çıkış yapabilirsin. Ayrıca, DBEdit1'e geri dönüş için önce --> if DBEdit1.CanFocus then DBEdit1.SetFocus olarak kodlama yaparsan daha iyi olur.