发一个挨骂贴，qr问题

Question

在一个窗体上，三个文本框，输入内容，通过一个“打印按钮”，弹出打印预览窗体， 把文本框中的内容显示在上面。如何做？ 狂谢了 ,用的是QR

Answer 1

//是该挨骂的
//yourform为你打印的那个窗体,前面uses 上你引用的单元文件
//加上QuickRep，加上qrband
procedure TForm1.Button1Click(Sender: TObject);
beginyouform.QuickRep1.qrlabel1.Caption:=edit1.Text;
youform.QuickRep1.qrlabel2.Caption:=edit2.Text;
youform.QuickRep1.qrlabel3.Caption:=edit3.Text;youform.QuickRep1.Preview;end;