isteğe göre dbedit'in aktif olması ve raporlama

[yakliii]

Arkadaşlar bnm şöyle bi sorum olacak. formumda bir checkbox ve yanında bir DBEdit var. Normalde ben dbedit satırının aktif olmamasını istiyorum ama chechbox işaretlenince aktif olacak ve bilgi girilebilecek.

Birde rapor butonu var yani DbGridte bu checbox'ı işaretli olanlar listelenecek.

table'ı dbgrid'e query ile bağladım.

[bobasturk]

Kod: Tümünü seç

if checkbox1.checked=true then
begin
  dbedit1.enabled:=true;
end;

if checkbox1.checked=false then
begin
  dbedit1.enabled:=false;
end;

diğer soruyu pek anlamadım. dbgrid içinde checkbox olan alanlar mı var yoksa dbedit aktif olunca süzülecek veriler mi var.

[Trial_Cooder]

[quote="yakliii"]Arkadaşlar bnm şöyle bi sorum olacak. formumda bir checkbox ve yanında bir DBEdit var. Normalde ben dbedit satırının aktif olmamasını istiyorum ama chechbox işaretlenince aktif olacak ve bilgi girilebilecek.
/quote]
CheckboxOnclick'ine Yazman Gereken;

Kod: Tümünü seç

 if Checkbox1.Checked then // CheckBox İşaretli İse
 DBEdit1.Enable := True                // Dbedit'i Active Hale Getir (Yazılabilir)
else
 DBEdit1.Enable := False;

// Dbedit'i DeActive Hale Getir (Yazılamaz)

[yakliii]

DbEdit aktif olunca süzülecek veriler var. Yani DbEdit'i aktif olanları listelesin istiyorum.Aktif olmayanlar DBGridte gözükmesin


ayrıca çözümleriniz için çok teşekkür ederim arkadaşalr.

[bobasturk]

merhaba,

dbedit içerisinde sabit veri mi duracak yoksa aktif hale gelen dbedit içerisine kullanıcı veri girecek sonra kayıtlar süzülecek mi?

eğer sabit veri olacaksa checkbox un onclick olayına hem dbediti aktif hale getirme hemde içinde bulunan kritere göre sorgulayıp sonuç alma kodunu yazabilirsin.

şayet edit içi boş kullanıcı girecekse editin onchenge olayına sorgu satırlarını yazarak girilen kritere göre sonuç alabilirsin

kolay gelsin

[yakliii]

edit'in içi boş ve pasif eğer kullanıcı isterse yanına chec işaretini koyacak ve içine bilgi girebilecek. Süzme işleminde ise butona tıkladığımda dbedit'i checked edilmiş kayıtları listeliycek.

Örneğin

Adı(label) : ilkay (dbedit)
soyadı(label) : özen (dbedit)
doğum Yeri(checkbox) : tekirdağ(dbedit)

eğer doğum yerini girmek istersem check edicem ve bilgiyi giricem ama normalde bilgi girilemiycek. Buraya kadar sorun yok bunu yaptım sayenizde. süzme işleminde ise butona tıkladığım zaman doğum yeri girilmiş olanları listeliycek yani checked edilmiş olanları.

[bobasturk]

merhaba,

hangi vt kullanıyorsun bilmiyorum ama,

Kod: Tümünü seç

if checkbox1.checked=true then
begin
  ibquery1.close;
  ibquery1.sql.clear;
  ibquery1.sql.add('select*from tabloadın');
  ibquery1.sql.add('where ADI=:adi and SOYADI=:soyadi and DOGUM_YERI=:dyeri');
  ibquery1.parambyname('adi').asstring:=dbedit1.text;
  ibquery1.parambyname('soyadi').asstring:=dbedit2.text;
  ibquery1.parambyname('dyeri').asstring:=dbedit3.text;
  ibquery1.open;
end
else
begin
  ibquery1.close;
  ibquery1.sql.clear;
  ibquery1.sql.add('select*from tabloadın');
  ibquery1.sql.add('where ADI=:adi and SOYADI=:soyadi');
  ibquery1.parambyname('adi').asstring:=dbedit1.text;
  ibquery1.parambyname('soyadi').asstring:=dbedit2.text;
  ibquery1.open;
end;
 

bu şekilde sorgulamanı yapabilir ve sonucu grid içine alabilirsi. aslında forumda bu tür konular çok çok çok konuşuldu query, ibquery, sorgulama şeklinde aratırsan işine yarayacak pek çok sonuç dönecektir.

Arama özelliğini denemeni tavsiye ederim.
kolay gelsin

[yakliii]

Eywallah arkadaşlar çok yardımcı oldunuz hepinize teşekkür ederim.

[ulu coder]

Kod: Tümünü seç

if checkbox1.checked=true then
begin
  ibquery1.close;
  ibquery1.sql.clear;
  ibquery1.sql.add('select*from tabloadın');
  ibquery1.sql.add('where ADI=:adi and SOYADI=:soyadi and DOGUM_YERI=:dyeri');
  ibquery1.parambyname('adi').asstring:=dbedit1.text;
  ibquery1.parambyname('soyadi').asstring:=dbedit2.text;
  ibquery1.parambyname('dyeri').asstring:=dbedit3.text;
  ibquery1.open;
end
else
begin
  ibquery1.close;
  ibquery1.sql.clear;
  ibquery1.sql.add('select*from tabloadın');
  ibquery1.sql.add('where ADI=:adi and SOYADI=:soyadi');
  ibquery1.parambyname('adi').asstring:=dbedit1.text;
  ibquery1.parambyname('soyadi').asstring:=dbedit2.text;
  ibquery1.open;
end;

Bunun biraz daha kısası var;
viewtopic.php?t=14895