RichEdit İçeriği Yazdırma

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Hikmet
Üye
Mesajlar: 4
Kayıt: 16 Ara 2003 04:19
Konum: İstanbul

RichEdit İçeriği Yazdırma

Mesaj gönderen Hikmet »

s.a Arkadaşlar yardıma ihtiyacım var :( .Sorun şu; RichEdit 'in içeriğini yazdırmak istiyorum ama bunu yaparken sayfayı iki sütuna bölüp, birinci sütun dolduğunda kaldığı yerden ikinci sürundan devam etsin sonra oda dolarsa ikinci sayfaya geçsin istiyorum.Kolay gelsin herkese...
Kullanıcı avatarı
fahrettin
Admin
Mesajlar: 2619
Kayıt: 11 Haz 2003 10:38
Konum: İstanbul
İletişim:

Mesaj gönderen fahrettin »

Qucik report 'ta sayfayı iki kolona bolun. Yani colums ozelligini 2 yapın. Kullanılabilir sayfa yarıya inecektir. O sayfayı komple kaplayan bir qrrichedit componenti koyup elinizdeki bilginin oldugu irichedit'in icerigini bu QRRichEdit icine atın.....
Aynen soylediginizi yapabilmesi lazım....
* http://www.fahrettin.org Manzara Fotoğraflarım... :)
* http://delphiturkiye.gunduz.info Seminerler... ;)
* http://www.hakmar.com.tr Kalite bir haktır... 8)
Hikmet
Üye
Mesajlar: 4
Kayıt: 16 Ara 2003 04:19
Konum: İstanbul

QReport

Mesaj gönderen Hikmet »

Yok abi olmuyor.Ben aynı şeyi Delphi 7 deki RaveReport da denemiştim onda da olmamıştı.Acaba QReport falan kullanmadan yapılabilirmi bilmiyorumki.Off yaa valla kaç gündür bununla uğraşıyorum.Bilen birileri varsa çok dua ederim.
Kullanıcı avatarı
fahrettin
Admin
Mesajlar: 2619
Kayıt: 11 Haz 2003 10:38
Konum: İstanbul
İletişim:

Mesaj gönderen fahrettin »

olmama noktası neresi? yani ilk sayfada gorunup diger sutun ve sayfalara mi taşarak devam etmiyor?
* http://www.fahrettin.org Manzara Fotoğraflarım... :)
* http://delphiturkiye.gunduz.info Seminerler... ;)
* http://www.hakmar.com.tr Kalite bir haktır... 8)
Kullanıcı avatarı
TRSoft
Kıdemli Üye
Mesajlar: 636
Kayıt: 13 Şub 2004 11:39
Konum: Konya
İletişim:

Mesaj gönderen TRSoft »

@hikmet ben şimdi denedim..
quickreportda @fahrettin hocamın dediği gibi oluyor. İstersen nasıl yaptığımı biraz açayım.

yeni bir rapor oluşturup page-columns değerini 2 yaptım. ColumnSpace (kolon aralığı) değerini verdim ve daha sonra
bir band koydum BandType ını summary yaptım ki sen ihtiyacına göre yaparsın. Daha sonra bir tane qrrichtext koydum ve bu raporu çağırırken richtext in içine bayağı uzun bir text dosya load ettim ve :) sonuç istediğin gibi...

Bu arada richtextin genişliği kolom genişliğinden fazla olmaması gerekiyor yoksa rapor birbirine karışıyor..
İlimle geçen bir gece,
ibadetle geçen bin geceden hayırlıdır.
HZ. MUHAMMED (S.A.)
Hikmet
Üye
Mesajlar: 4
Kayıt: 16 Ara 2003 04:19
Konum: İstanbul

RichEdit içeriğini iki sütun halinde yazdırmak

Mesaj gönderen Hikmet »

TRSoft yazdıklarını aynen yaptım :) ve istediğim oldu.Yalnız önemli bir nokta var, ikinci sütuna geçmesi için RichEdit 'in AutoStrech özelliğinin true olması gerekiyor!!!Allah Razı Olsun.Herkese İyi Çalışmalar... :lol: :lol:
Pimapen_Nuri
Üye
Mesajlar: 10
Kayıt: 10 Nis 2006 10:16
Konum: İZMİR

Mesaj gönderen Pimapen_Nuri »

richedit içeriğini iki yana yasla olayını nasıl halledebiliriz. Aynı şekildede çıktı alırkende iki yana yaslı çıkmalı
Delphi Öğrenmenin yolu nedir.?
ikutluay
Üye
Mesajlar: 2341
Kayıt: 03 Tem 2007 10:13

Mesaj gönderen ikutluay »

standart richedit bunu yapmıyor. richedit 2 sürümünü kullanan bir dll ile yapmalısın. yeni richeditler bunu kullanıyorlar. jvrichedit gibi. ordaki kodlara bakıp justified paragraf tipini kendinde ekleyebilrsin.
Kişi odur ki, koyar dünyada bir eser. Eseri olmayanın yerinde yeller eser./Muhammed Hadimi
http://www.ibrahimkutluay.net
http://www.ibrahimkutluay.net/blog
Kullanıcı avatarı
chnyildirim
Üye
Mesajlar: 39
Kayıt: 25 Haz 2003 01:51
İletişim:

Re: RichEdit İçeriği Yazdırma

Mesaj gönderen chnyildirim »

Verilen 2nci kolona geçmesi için 2nci Yol:

Listemde Gruplama yaptığım için QRGroup kullandım.

QRGroup1 'in AfterPrint 'in de Querynizin değeri istediğiniz değere ulaştığında yeni kolona aşağıda ki gibi geçebilirsiniz.

Kod: Tümünü seç

   if Query.Value = '4' then
   begin
      QRGroup1.ForceNewColumn := True;
   end
    else
   begin
      QRGroup1.ForceNewColumn := False;
   end;
Quik Report 2 kolon
QReport 2 kolon
Page Columns
QuikReport Column
QuikReport Kolon
QReport Column
Cevapla