QuickReport

benim müşteri tablomda 3 tip müşterim var ve bunların tipi bir filedla tutuluyor.bir form yaptım,bir combobox koydum ve bu comboboxa tipleri yazdım.sonra bir butona basınca istenilen tipteki müşterileri listeliycem.ama nereye ne atıycam,şöyle bişeyler yazdım ama attım tabi:
if ComboBox1.Items[ComboBox1.itemindex]='A tipi müşteri' then
form34.QuickRep1.DetailBand1:=form34.table1mustipi.asstring='A tipi müşteri'

yani raporda bunu nasıl kontrol edicem?

QuickReport içinde bu şekilde bir kullanımdan sonuç elde edemzsiniz.

işlemlerinizin sırası aşağıdaki gibi olmalıdır.

Oluşturduğunuz QuickReport içindeki dateset e tableadı tanımlayınız.
DetailBand1 içinde müşteri türü ve adı-soyadı..vs gibi bilgileri her biri bir field olacak şekilde yan/yana (liste olursa) QRDBText ler oluşturunuz.

QRDBText içindeki field isimlerini ilgili değerlerle tanımlayınız. Bu QuickReport içindeki hazırlıklardır.

Şimdi Form içinde oluşturduğunuz combobox içinde :
1.tür müşteri
2.tür müşteri
3.tür müşteri

değerleri varsa, Kayıt içindeki müşteri türü değerleride yanı olmalıdır. Bu aynılığı sağladıktan sonra aşağıdaki satırları uygulayınız.


Liste ButtonClick içine

Begin
if Table1.Active=True Then Table1.Close;
Table1.Filterede:=False;
Table1.Filter:='mustipi ="'+combobox1.items[combobox1.itemindex]+'"';
Table1.Filterede:=True;
if Table1.Active=False Then Table1.Open
QuickRep1.Preview;
End;


Kolay Gelsin.

Saygılarımla.

QuickPink

QuickReport içinde bu şekilde bir kullanımdan sonuç elde edemzsiniz.

işlemlerinizin sırası aşağıdaki gibi olmalıdır.

Oluşturduğunuz QuickReport içindeki dateset e tableadı tanımlayınız.
DetailBand1 içinde müşteri türü ve adı-soyadı..vs gibi bilgileri her biri bir field olacak şekilde yan/yana (liste olursa) QRDBText ler oluşturunuz.

QRDBText içindeki field isimlerini ilgili değerlerle tanımlayınız. Bu QuickReport içindeki hazırlıklardır.

Şimdi Form içinde oluşturduğunuz combobox içinde :
1.tür müşteri
2.tür müşteri
3.tür müşteri

değerleri varsa, Kayıt içindeki müşteri türü değerleride yanı olmalıdır. Bu aynılığı sağladıktan sonra aşağıdaki satırları uygulayınız.


Liste ButtonClick içine

Begin
if Table1.Active=True Then Table1.Close;
Table1.Filtered:=False;
Table1.Filter:='mustipi ="'+combobox1.items[combobox1.itemindex]+'"';
Table1.Filtered:=True;
if Table1.Active=False Then Table1.Open
QuickRep1.Preview;
End;


Kolay Gelsin.

Saygılarımla.

QuickPink