Tüm Platformlar için Hızlı Uygulama Geliştirme Kitabı... Delphi
Ön Sipariş Talebinde Bulunan Üyelerimiz
Sipariş Talebinde Bulunan Üyelerimiz

Konuyu Paylaş : facebook gplus twitter

Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
dbgrind visible olmuş alanlara veri giriliyor
#1
Arkadaşlar,

aşağıdaki dbgrind üzerinde puantaj giriyor eğer ay 30 çekiyorsa dbgrind sadece 30 sütünü gösteriyor veya gizliyor aşağıdaki kod ile

şöyle bir sorun var diyelim ki ay 30 gün olsun dbgrind üzerinde klavye ile sağ tuşa basında 31 de gidiyor ve bilgi girilebiliyor nasıl oluyor bu ?

Bir fikri olan var mı acaba ?

Teşekkürler

     
     dbgrdPUANTAJ_LISTESI.Columns[30].Visible:=False;
     dbgrdPUANTAJ_LISTESI.Columns[31].Visible:=False;
     dbgrdPUANTAJ_LISTESI.Columns[32].Visible:=False;


    if NX_AY_KAC_GUN.Value=29
    then dbgrdPUANTAJ_LISTESI.Columns[30].Visible:=True;

    
    if NX_AY_KAC_GUN.Value=30
    then begin
     dbgrdPUANTAJ_LISTESI.Columns[30].Visible:=True;
     dbgrdPUANTAJ_LISTESI.Columns[31].Visible:=True;
     end;

     if NX_AY_KAC_GUN.Value=31
    then begin
     dbgrdPUANTAJ_LISTESI.Columns[30].Visible:=True;
     dbgrdPUANTAJ_LISTESI.Columns[31].Visible:=True;
     dbgrdPUANTAJ_LISTESI.Columns[32].Visible:=True;
     end; 
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
Cevapla
#2
Merhaba..
Mantığı anlamadım. Eğer puantaj girdiğiniz tabloya daha önceden ayın günlerini insert ediyorsanız, select ile 0 ayı göstermeniz kafi olackatır. tek lazım olan dbgridde inserti kapatmak. bu sayede aşaı ok tuşuna basıp kullanıcı insert edemeyecektir.
// Bilgi paylaştıkça çoğalır.. 

WWW
Cevapla
#3
Aynı anda enable özelliğinide kapat yada column ları dinamik oluştur.
Bu dünyada kendine sakladığın bilgi ahirette işine yaramaz. 
Cevapla
#4
Arkadaşlar, aşağıdaki gibi yaparak sorunu çözebildim.

Teşekkürler.

     
dbgrdPUANTAJ_LISTESI.Columns[30].Visible:=False;
     dbgrdPUANTAJ_LISTESI.Columns[31].Visible:=False;
     dbgrdPUANTAJ_LISTESI.Columns[32].Visible:=False;

     
     dbgrdPUANTAJ_LISTESI.Columns[30].ReadOnly:=True;
     dbgrdPUANTAJ_LISTESI.Columns[31].ReadOnly:=True;
     dbgrdPUANTAJ_LISTESI.Columns[32].ReadOnly:=True;

    if NX_AY_KAC_GUN.Value=29
    then begin
       dbgrdPUANTAJ_LISTESI.Columns[30].Visible:=True;
       dbgrdPUANTAJ_LISTESI.Columns[30].ReadOnly:=False;
     end;

    if NX_AY_KAC_GUN.Value=30
    then begin
     dbgrdPUANTAJ_LISTESI.Columns[30].Visible:=True;
     dbgrdPUANTAJ_LISTESI.Columns[31].Visible:=True;
     
     dbgrdPUANTAJ_LISTESI.Columns[30].ReadOnly:=False;
     dbgrdPUANTAJ_LISTESI.Columns[31].ReadOnly:=False;
     end;

     if NX_AY_KAC_GUN.Value=31
    then begin
     dbgrdPUANTAJ_LISTESI.Columns[30].Visible:=True;
     dbgrdPUANTAJ_LISTESI.Columns[31].Visible:=True;
     dbgrdPUANTAJ_LISTESI.Columns[32].Visible:=True;
     
     dbgrdPUANTAJ_LISTESI.Columns[30].ReadOnly:=False;
     dbgrdPUANTAJ_LISTESI.Columns[31].ReadOnly:=False;
     dbgrdPUANTAJ_LISTESI.Columns[32].ReadOnly:=False;
     end;
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
Cevapla

Konuyu Paylaş : facebook gplus twitter



Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  array den veri okuma klavye 3 82 05-11-2018, Saat: 13:28
Son Yorum: klavye
  Comporttan veri bittiğini nasıl anlarız ? seci20 11 257 21-10-2018, Saat: 17:54
Son Yorum: arsl01
  Unidac veri ekleme arsl01 3 167 29-09-2018, Saat: 17:06
Son Yorum: arsl01
  Delphi & FTP txt veri işleme Mr.Developer 21 711 28-09-2018, Saat: 08:21
Son Yorum: Fesih ARSLAN
  Veri Tabanı Bağlantı Yöntemi emrahgs 6 342 12-09-2018, Saat: 18:24
Son Yorum: emrahgs



Konuyu Okuyanlar: 1 Ziyaretçi