搜索已有问题得到的答案如下。
在 Band 的 BeforePrint 事件给 TQRRichText 值:procedure TForm1.DetailBand1BeforePrint(
Sender: TQRCustomBand; var PrintBand: Boolean);
{
QRRichText1.Lines.Clear();
QRRichText1.Lines.Add(Table1.FieldByName("FIELDNAME").AsString);
}
可是我这么做的时候,运行抛出EOutOfResource异常,“RichEdit Line Insert Error”。
请大家帮忙。
在 Band 的 BeforePrint 事件给 TQRRichText 值:procedure TForm1.DetailBand1BeforePrint(
Sender: TQRCustomBand; var PrintBand: Boolean);
{
QRRichText1.Lines.Clear();
QRRichText1.Lines.Add(Table1.FieldByName("FIELDNAME").AsString);
}
可是我这么做的时候,运行抛出EOutOfResource异常,“RichEdit Line Insert Error”。
请大家帮忙。
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货