editin OnExit Olayındaki kodlar ile bir sorunum var

[AliErdem]

bir dbeditin çıkış olayına yazdığım kodlar var programlarda olması gereken bir kontrol yaptım.. girilen numara eğer database de kayıtlı ise dbedit in içinden çıkışı engelliyor.... buraya kadar sorunum yok ancak o kayıtları locate ile buldurup düzenlemek istediğimde onexit olayı yazdığım kontrole girince çıkamıyorum...

begin
query1.SQL.Clear;
query1.SQL.Add('select* from ogrenci where TC_KMLK ="'+dbedit10.Text+'"');
query1.open;
if query1.RecordCount > 0 then
begin
Showmessage('BU ÖĞRENCİ KAYITLI');
dbedit10.SetFocus;
dbedit10.Text:='';
end

[nitro]

recordcountu almadan önce

Kod: Tümünü seç

query1.last;

yap böylece kayıtları fetch etmiş olursun ve recordcount sana doğru sonuç verir.
kolay gelsin

[AliErdem]

saol arkadaşım komutlar çalışıyor bu komutun yaptığı iş dbeditten aynı kayıt girilirse çıkılmasına izin vermemesi ancak ben bunun kontrolunu herzaman yapmak istemiyorum düzenlemek için aynı kaydı açtığımda gene kontrol ettiği için o dbedit e girildiğinde çıkmıyor bi daha

[nitro]

o zaman sen de oraya bi kontrol koy.

Kod: Tümünü seç

if table1.state=dsinsert then 
        begin
        ....
         end;

if table1.state=dsedit then 
      begin
      .....
      end;

böylece istediğin işlem tablo insert konumunda iken gerçekleişr. istediğin işlem tablo edit konumunda iken gerçekleşir. kolay gelsin

[AliErdem]

teşekürler ii oldu table1.state yi öğrendiğim benim programım için yeterli olur sanırım saolasın