report builder tek sayfaya sığdırmak nasıl

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
tatu
Üye
Mesajlar: 25
Kayıt: 09 Nis 2005 06:13

report builder tek sayfaya sığdırmak nasıl

Mesaj gönderen tatu »

arkadaşlar

Report builder kullanarak çıktı alıyorum ve her çıktının bir sayfa olması lazım. Aldığım çıktıların bir kısmı 10-20 satır olduğu için sorun yok ama 60-70 satır olunca ikinci sayfaya geçiyor. Benim se bu durumda fix to one page gibi bir uygulamayla tek sayfaya sığdırtmam gerekiyor.

Nasıl yapabilirim beceremedim. saygılar.
danaci
Üye
Mesajlar: 178
Kayıt: 24 May 2005 01:45

Mesaj gönderen danaci »

Aslında soruyu tam anlayamadım ama satır sayısı arttıkça sonraki sayfaya geçmesi normal. 100-150 satır olsa bile tek sayfaya nasıl sığdırılabilr ki?

:roll:
Kullanıcı avatarı
mrmarman
Üye
Mesajlar: 4741
Kayıt: 09 Ara 2003 08:13
Konum: İstanbul
İletişim:

Mesaj gönderen mrmarman »

- Hangi sayıdaki satırda nasıl tepki verdiğini etüd etmişsindir. Mesela 50 satır'ı tek sayfada basıyor ama 51 olursa ikinci sayfaya taşıyor diyelim.

- Baskıdan önce kaç satır basılacağını tespit ederek global değişken vesaire ile bu sayıyı yazdırma formuna parametre geç.

- Before print olayında yazdırma bandı yüksekliğini satır sayısı ile ters orantılı olarak bir formül hazırla.

- Aşağıda basit bir formul hazırladık. İşlevi, artan satır sayısı yeni bir sayfa oluşturacak kadar çoksa dokunmayacak, ama 10'dan küçük ise band yükseklikleriyle oynayarak biraz daha sıkı sıkıya yazarak bir sayfaya sığacak. Sığmazsa biraz daha eksilt.

- Eksiltme eğer yazılara sirayet ederse, o zaman fontlarda da biraz oynama yapman gerekecektir.

Kod: Tümünü seç

ArtanSayisi := SatirSayisi mod 50;
If ArtanSayisi < 10 then PrintBand.Height := PrintBand.Height - 3;
Bu sana fikir verecektir.
Resim
Resim ....Resim
Cevapla