Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
fastreport tüm kayıtların listelenmesi
#1
Arkadaşlar Merhaba;
yaklaşık 6.000 kayıt olan bir tablonun kayıtlarını yazdırmak istiyorum. 

tablostokkart.Close;
  tablostokkart.SQL.Clear;
  tablostokkart.SQL.Add('select * from STOKKART Where STOKKARTID>0');

 case sRadioGroup1.ItemIndex of

 1: // Hiç Satılmayanlar
   tablostokkart.SQL.Add('AND GIDEN=0');
 2: // Sınırın Altında Olanlar
   tablostokkart.SQL.Add('AND KALAN<STOKSINIR');
 3: // Sınırda Olanlar
   tablostokkart.SQL.Add('AND KALAN=STOKSINIR ');
 4: // Eksi de olanlar
   tablostokkart.SQL.Add('AND KALAN<0 ');
 end;

 if sComboBox1.Text<>'' then
 begin
   case sComboBox1.ItemIndex of
     0:
     tablostokkart.SQL.Add(' AND lower(STOKAKRTBARCOD) LIKE '+QuotedStr('%'+edt_ara.Text+'%'));
     1:
     tablostokkart.SQL.Add(' AND lower(STOKKARTADI) LIKE '+QuotedStr('%'+edt_ara.Text+'%'));
     2:
     tablostokkart.SQL.Add(' AND lower(STOKAKRTKODU) LIKE '+QuotedStr('%'+edt_ara.Text+'%'));
     3:
     tablostokkart.SQL.Add(' AND lower(TURU) LIKE '+QuotedStr('%'+edt_ara.Text+'%'));
     4:
     tablostokkart.SQL.Add(' AND lower(MARKA) LIKE '+QuotedStr('%'+edt_ara.Text+'%'));
     5:
     tablostokkart.SQL.Add(' AND lower(DOVIZADI) LIKE '+QuotedStr('%'+edt_ara.Text+'%'));
     end;
 end;

   tablostokkart.SQL.Add('ORDER BY STOKKARTID ASC');
   tablostokkart.Open;

bu kodlar ile sorgulama yaptıktan sonra yazdırmak fastreport ile preview yapmak istediğim zaman ilk kayıttan başlayarak son kayda kadar kayıtları gezmeye başlıyor ve sonra yazdırıyor

ama başka bir query ekleyip herhangi bir kriter koymadan listelediğim zaman 6000 kayıt anında gözüküyor. Neden kaynaklanıyor yardımcı olabilir misiniz...
Cevapla
#2
(20-03-2019, Saat: 10:43)cvheneburi Adlı Kullanıcıdan Alıntı: Arkadaşlar Merhaba;
yaklaşık 6.000 kayıt olan bir tablonun kayıtlarını yazdırmak istiyorum. 

tablostokkart.Close;
  tablostokkart.SQL.Clear;
  tablostokkart.SQL.Add('select * from STOKKART Where STOKKARTID>0');

 case sRadioGroup1.ItemIndex of

 1: // Hiç Satılmayanlar
   tablostokkart.SQL.Add('AND GIDEN=0');
 2: // Sınırın Altında Olanlar
   tablostokkart.SQL.Add('AND KALAN<STOKSINIR');
 3: // Sınırda Olanlar
   tablostokkart.SQL.Add('AND KALAN=STOKSINIR ');
 4: // Eksi de olanlar
   tablostokkart.SQL.Add('AND KALAN<0 ');
 end;

 if sComboBox1.Text<>'' then
 begin
   case sComboBox1.ItemIndex of
     0:
     tablostokkart.SQL.Add(' AND lower(STOKAKRTBARCOD) LIKE '+QuotedStr('%'+edt_ara.Text+'%'));
     1:
     tablostokkart.SQL.Add(' AND lower(STOKKARTADI) LIKE '+QuotedStr('%'+edt_ara.Text+'%'));
     2:
     tablostokkart.SQL.Add(' AND lower(STOKAKRTKODU) LIKE '+QuotedStr('%'+edt_ara.Text+'%'));
     3:
     tablostokkart.SQL.Add(' AND lower(TURU) LIKE '+QuotedStr('%'+edt_ara.Text+'%'));
     4:
     tablostokkart.SQL.Add(' AND lower(MARKA) LIKE '+QuotedStr('%'+edt_ara.Text+'%'));
     5:
     tablostokkart.SQL.Add(' AND lower(DOVIZADI) LIKE '+QuotedStr('%'+edt_ara.Text+'%'));
     end;
 end;

   tablostokkart.SQL.Add('ORDER BY STOKKARTID ASC');
   tablostokkart.Open;

bu kodlar ile sorgulama yaptıktan sonra yazdırmak fastreport ile preview yapmak istediğim zaman ilk kayıttan başlayarak son kayda kadar kayıtları gezmeye başlıyor ve sonra yazdırıyor

ama başka bir query ekleyip herhangi bir kriter koymadan listelediğim zaman 6000 kayıt anında gözüküyor. Neden kaynaklanıyor yardımcı olabilir misiniz...

Merhabalar,

Bunun için ilgili Table veya SQL den sonra Preview yapmadan
önce DisableControls; yaparak işlemleri yaparsanız sorun olmayacaktır.

http://www.delphican.com/showthread.php?...ontrols%3B

Kolay gelsin.
Amaç, bilginin de/aklın da zekat'ını vermek.
Cevapla
#3
@cvheneburi tablostokkart tablosunun events kısmında bir işlem yapıyor olabilirmisin (AfterScrool, BeforeScrool vb..)
Bu dünyada kendine sakladığın bilgi ahirette işine yaramaz. 
Cevapla
#4
(20-03-2019, Saat: 10:47)hi_selamlar Adlı Kullanıcıdan Alıntı:
(20-03-2019, Saat: 10:43)cvheneburi Adlı Kullanıcıdan Alıntı: Arkadaşlar Merhaba;
yaklaşık 6.000 kayıt olan bir tablonun kayıtlarını yazdırmak istiyorum. 

tablostokkart.Close;
  tablostokkart.SQL.Clear;
  tablostokkart.SQL.Add('select * from STOKKART Where STOKKARTID>0');

 case sRadioGroup1.ItemIndex of

 1: // Hiç Satılmayanlar
   tablostokkart.SQL.Add('AND GIDEN=0');
 2: // Sınırın Altında Olanlar
   tablostokkart.SQL.Add('AND KALAN<STOKSINIR');
 3: // Sınırda Olanlar
   tablostokkart.SQL.Add('AND KALAN=STOKSINIR ');
 4: // Eksi de olanlar
   tablostokkart.SQL.Add('AND KALAN<0 ');
 end;

 if sComboBox1.Text<>'' then
 begin
   case sComboBox1.ItemIndex of
     0:
     tablostokkart.SQL.Add(' AND lower(STOKAKRTBARCOD) LIKE '+QuotedStr('%'+edt_ara.Text+'%'));
     1:
     tablostokkart.SQL.Add(' AND lower(STOKKARTADI) LIKE '+QuotedStr('%'+edt_ara.Text+'%'));
     2:
     tablostokkart.SQL.Add(' AND lower(STOKAKRTKODU) LIKE '+QuotedStr('%'+edt_ara.Text+'%'));
     3:
     tablostokkart.SQL.Add(' AND lower(TURU) LIKE '+QuotedStr('%'+edt_ara.Text+'%'));
     4:
     tablostokkart.SQL.Add(' AND lower(MARKA) LIKE '+QuotedStr('%'+edt_ara.Text+'%'));
     5:
     tablostokkart.SQL.Add(' AND lower(DOVIZADI) LIKE '+QuotedStr('%'+edt_ara.Text+'%'));
     end;
 end;

   tablostokkart.SQL.Add('ORDER BY STOKKARTID ASC');
   tablostokkart.Open;

bu kodlar ile sorgulama yaptıktan sonra yazdırmak fastreport ile preview yapmak istediğim zaman ilk kayıttan başlayarak son kayda kadar kayıtları gezmeye başlıyor ve sonra yazdırıyor

ama başka bir query ekleyip herhangi bir kriter koymadan listelediğim zaman 6000 kayıt anında gözüküyor. Neden kaynaklanıyor yardımcı olabilir misiniz...

Merhabalar,

Bunun için ilgili Table veya SQL den sonra Preview yapmadan
önce DisableControls; yaparak işlemleri yaparsanız sorun olmayacaktır.

http://www.delphican.com/showthread.php?...ontrols%3B

Kolay gelsin.
teşekkür ederim hocam sorgulamanın sonuna 
tablostokkart.DisableControls;
satırını ekledim sorunun halloldu. tekrar teşekkür ederim.
Cevapla


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  FastReport sayıyı yazıya çevirmek Mikdad 2 189 11-05-2020, Saat: 15:53
Son Yorum: adelphiforumz
Question fastreport pdf ve excell export Ekvador 6 419 03-05-2020, Saat: 22:28
Son Yorum: mcuyan
  FastReport yazıya çevirme adelphiforumz 4 1.580 11-04-2020, Saat: 22:46
Son Yorum: akuyumcu63
  fastReport sayfa sayısını okuma akuyumcu63 3 344 11-04-2020, Saat: 15:04
Son Yorum: hi_selamlar
  FastReport -> DesignReport için frxDesigner Belirleme hi_selamlar 7 1.044 03-12-2019, Saat: 18:22
Son Yorum: hi_selamlar



Konuyu Okuyanlar: 1 Ziyaretçi