Konuyu Paylaş : facebook gplus twitter

Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
ado dataset eof veya bof hakkında
#1
iyi günler 
dataset deki bilgileri dbgrid da gösteriyorum.
yapmak istediğim dbgrid deki ilk veya son kayda tıkladığım
buttonların enabled özelliklerini değiştirmek.
aşağıda gibi yaptım çalışmadı. hata vermiyor.

procedure Trenk_form.renk_gridDblClick(Sender: TObject);
begin
 boya_edit_temizle;
 boya_data_al;
 if data_form.renk_dataset.bof then
 begin
   tus_ilkkayit;
 end;

 if data_form.renk_dataset.eof then
 begin
 tus_sonkayit;
 end;

 edit_enabled_true;
end;

eof veya bof olayının gerçekleşmesi için
dataset.next veya dataset.prior kullanmak gereklimi
griddeki ilk kayıt veya son kayda tıklayınca 
yapılma imkanı var mı;
"…De ki: "Hiç bilenlerle bilmeyenler bir olur mu? Şüphesiz, temiz akıl sahipleri öğüt alıp-düşünürler" (Zümer Suresi, 9)
Cevapla
#2
RecNo özelliğinide kullanabilirsin. RecNo = 1 ise ilk kayıt RecNo = query.Count-1 ise son kayıt
WWW
Cevapla
#3
(10-05-2017, Saat: 16:47)witalihakko Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye OlRecNo özelliğinide kullanabilirsin. RecNo = 1 ise ilk kayıt RecNo = query.Count-1 ise son kayıt

Sayın witalihakko ilginiz için teşekkür ederiz verdiğiniz kod örneğini aşağıdaki gibi düzenleyerek çalıştırdık.
procedure Trenk_form.renk_gridDblClick(Sender: TObject);
begin
 if data_form.renk_dataset.RecNo=1 then
 begin
   tus_ilkkayit;
 end
 else if data_form.renk_dataset.RecNo=data_form.renk_dataset.RecordCount then
 begin
   tus_sonkayit;
 end

 else
 begin
   tus_ortadaki;
 end;

 edit_enabled_true;
end;
"…De ki: "Hiç bilenlerle bilmeyenler bir olur mu? Şüphesiz, temiz akıl sahipleri öğüt alıp-düşünürler" (Zümer Suresi, 9)
Cevapla
#4
query nesnesinin oncrool özelliğinden recno yu alabilir ona göre enabled disabled özelliklerini yapabilirsin..
WWW
Cevapla

Konuyu Paylaş : facebook gplus twitter



Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  Puanların Önemi Hakkında... Tuğrul HELVACI 20 6.774 Dün, Saat: 17:42
Son Yorum: Tuğrul HELVACI
Question SFTP Hakkında elixir84 3 138 25-06-2018, Saat: 10:02
Son Yorum: SimaWB
  Veritabanı hakkında mehmetalpgozbasi 4 217 19-06-2018, Saat: 12:57
Son Yorum: mehmetalpgozbasi
  Firedac Hakkında Tuğrul HELVACI 8 639 01-06-2018, Saat: 00:33
Son Yorum: nguzeller
  winusb protokolü hakkında yardım seci20 1 107 31-05-2018, Saat: 10:26
Son Yorum: SimaWB



Konuyu Okuyanlar: 1 Ziyaretçi