RadioButton Raporlama !!!

[ozcank]

Arkadaşlar ;
RadioButton1,RadioButton2,RadioButton,RadioButton4 ve RadioButton5 var RadioButton1 seçilince RO5MICRON ve DataTimePicker1 ve DataTimePicker2 SQL de DBGrid1 e rapor almalıyım.Bu işlemde

RadioButton1.checked ise
RO5MICRON ve ROMONTAJTAR arası rapor alacak
RadioButton2.checked ise
RO1MICRON ve ROMONTAJTAR arası rapor alacak
RadioButton3.checked ise
MEBMRAN ve ROMONTAJTAR arası rapor alacak
RadioButton4.checked ise
SEDIMENT ve ROMONTAJTAR arası rapor alacak
RadioButton5.checked ise
SONKARBON ve ROMONTAJTAR arası rapor alacak

yapmak istiyorum ama bir turlu bu işlemi yapamadım
yardım ederseniz çok sevinirim.

[vedatkaba]

Kod: Tümünü seç

if RadioButton1.checked then
begin
RO5MICRON ve ROMONTAJTAR arası rapor alacak 
end;
if radiobutton2.checked then
begin
RO1MICRON ve ROMONTAJTAR arası rapor alacak 
end;
.............................................
............................................
...........................................
//////////////////// 

diye devam etttir.neden olmadı neden yapamadın acaba hata filan mı verdi.

[ozcank]

ben burda
SQL de sadece RO5MICRON ve iki tarih arası olanları listeleyemedim SQL komutunu yazamadım bu kodu nasıl yazmalıyım?

[Uğur1982]

merhaba;

Kod: Tümünü seç

RO5MICRON ve ROMONTAJTAR arası rapor alacak 

// ilkTarih.Date , SonTarih.Date = DateTimePicker

Kod: Tümünü seç

Select * from TabloAdi where RO5MICRON<=''' + DateToStr(ilkTarih.Date) + ''' and ROMONTAJTAR>=''' + DateToStr(SonTarih.Date)+'''

[vedatkaba]

Kod: Tümünü seç

SQL.Add('select * from tablo where tarih>='+quatetostr(datetimepicture1.date)+'and tarih<='+quatetostr(datetimepicture2.date));

iki tarih arası sorgu çeşidi.diğer bir olay

Kod: Tümünü seç

between

kullanarak ta yapabilirsin.

RO5MICRON

ama bunun ne olduğunu anlayamadım sorunu biraz daha açarsan.kolay gelsin.

[ozcank]

Arkadaşlar bu şekilde yaptım ama hata veriyor yanlışım var ise düzeltebilirminiz?

If RadioButton1.Checked Then
Begin
query1.sql.add("select * from rokayit")
query1.sql.add("where romontajtar between :ilktar and :sontar)
Query.ParamByName('RO5MIKRON').AsString=ComBoBox1.Text; // burda BAKIM YAPILDI - BAKIM YAPILMADI alanlarını sorgulayacak
Query.ParamByName('Ilktar').AsDateTime:= DateTimePicker1.DateTime;
Query.ParamByName('Sontar').AsDateTime:=DateTimePicker2.DateTime;
End
Else
If RadioButton2.Checked Then
Begin
query1.sql.add("select * from rokayit")
query1.sql.add("where romontajtar between :ilktar and :sontar)
Query.ParamByName('RO1MIKRON').AsString=ComBoBox1.Text; // burda BAKIM YAPILDI - BAKIM YAPILMADI alanlarını sorgulayacak
Query.ParamByName('Ilktar').AsDateTime:= DateTimePicker1.DateTime;
Query.ParamByName('Sontar').AsDateTime:=DateTimePicker2.DateTime;
End
Else
If RadioButton3.Checked Then
Begin
query1.sql.add("select * from rokayit")
query1.sql.add("where romontajtar between :ilktar and :sontar and
Query.ParamByName('MIKRON').AsString=ComBoBox1.Text; // burda BAKIM YAPILDI - BAKIM YAPILMADI alanlarını sorgulayacak
end;
end;
end;

[vedatkaba]

Kod: Tümünü seç

Query.ParamByName('RO5MIKRON').sString=ComBoBox1.Text; // burda BAKIM YAPILDI - BAKIM YAPILMADI alanlarını sorgulayacak 

****
Yukarıda parametre geçmişsin ama SQL de bunu belirtmemişsin..

('RO5MIKRON').

bu nedir alanmı, kritermi, kayıtmı nedir anlamadım .hadi ilktar ve sontar anlaşıldıda bunu neye göre hangi alana göre sorgu yapıcaksın,ilktar ve sontar ı tarihe sorgu yapmışsın da bunu neye göre ???.

[ozcank]

RO5MIKRON , RO1MIKRON , MIKRON Alan adları bu alanlarda BAKIM YAPILDI , BAKIM YAPILMADI tutuluyor

[vedatkaba]

Şimdi anlaşıldı ,,yapmak istdiğin sorgu hem iki tarih arasında olucak hemde bakım yapılan veya yapılmayan (isteğe göre hangisni istersen ) gibi sorgu yaptıracaksın. o zaman ikitarih arası kontolden sonra

Kod: Tümünü seç

query1.sql.add('select * from rokayit') 
query1.sql.add('where romontajtar between :ilktar and :sontar and :RO5MIKRON') ; 

Böyle bir dene..

Kodlarını

Kod: Tümünü seç

code

arasına almayı unutmassan daha anlaşılır olur..kolay gelsin.