while do döngüsü

[kohlil]

iki tane butonum var ikiside arama yapıyor.yanlız buton1 kayıttürü=1 olanları buton2 de kayıttürü=2 olanları listeliyor. kodlarım şöyle ;

*****buton1;
with arama do begin
close;
sql.clear;
sql.add('select * from kayit');
sql.add('where kayitturu=1');
open;
end;

*****buton2;
with arama do begin
close;
sql.clear;
sql.add('select * from kayit');
sql.add('where kayitturu=2');
open;
end;

şöyle bir sorunla karşılaşıyorum ; eğer aradığım kayıt yoksa EOF yada BOf hatası hatasıyla karşılaşıyorum. veritabnım access. yardımcı olabilrmisiniz bu hatayı nasıl yok edebilirim

[Ancestor]

Aramayı yaptıktan sonra verileri herhangi bir yere eşitleden önce yada eşitlerken (ben query olarak yazıyorum)

Kod: Tümünü seç

if query1.eof = True or query1.recordcount = 0 then //(yani son kayıttaysa yada hiç kayıt yoksa)
begin
exit do;  //while döngüsünden çık
end;

[spoke25]

Kullandıgın veri tabanını degiştir.. Ado ile bağlanıyorsun sanırım.. ado nesnelerini update etmen lazım.. kullandıgın delphi surumunude yazz .. Ben sana Fire bird tavsiye ederimm.. Delphi 5 kullanıyorsan update etmen lazımm Kolay gelsinn