Rapor açılırken ekranda sürekli reflaksiyon yaşıyorum.Özellikle richeditte memo textti gösterirken bu sorunu yaşıyorum.Ayrıca zoom %100 olunca bu sorun aşılıyor?Açılırken ekran görüntüsünü geniş olarak değilde %100 olarak açmanın imkanı yok mu?
Kod: Tümünü seç
procedure TForm13.QuickRep1BeforePrint(Sender: TCustomQuickRep;
var PrintReport: Boolean);
begin
QRLabel15.Caption:='0';
QRLabel16.Caption:=IntToStr(Form1.gno);
QRLabel17.Caption:=Form1.DBComboBox7.Text;
QRLabel18.Caption:=Form1.DBEdit6.Text;
QRLabel20.Caption:=DateToStr(Form1.DateTimePicker8.Date);
QRLabel21.Caption:=Form1.DBComboBox8.Text;
QRLabel22.Caption:=DateToStr(Form1.DateTimePicker9.Date);
QRLabel23.Caption:=DateToStr(Form1.gtarih);
QRLabel24.Caption:=Form1.DBComboBox9.Text;
QRLabel25.Caption:=Form1.DBEdit9.Text;
QRLabel26.Caption:=Form1.DBEdit8.Text;
QRLabel27.Caption:=Form2.user;
QRRichText1.Lines.Add(Form1.DBMemo3.Text);
end; 