请教:FastReport 打印邮编

frefish 2008-06-10 10:10:08
如题.
做的是套打.
邮编是6个框框.
有一个字符串:315600.
如何去做???
...全文
36 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
frefish 2008-06-11
  • 打赏
  • 举报
回复
非常谢谢hhbbyy2000.
我不知道还有一个CharSpacing属性.
hhbbyy2000 2008-06-10
  • 打赏
  • 举报
回复
procedure TForm1.Button1Click(Sender: TObject);
begin

TfrxMemoView(FrxReport1.FindObject('memo1')).Text:='123459';//邮编
TfrxMemoView(FrxReport1.FindObject('memo1')).Font.Size:=10;//字体
TfrxMemoView(FrxReport1.FindObject('memo1')).CharSpacing:=3;//字符间距

FrxReport1.ShowReport(); // 预览

end;

procedure TForm1.frxReport1GetValue(const VarName: String;
var Value: Variant);
begin
TfrxReportPage(FrxReport1.Pages[0]).Paperheight:=10;//报表尺寸
TfrxReportPage(FrxReport1.Pages[0]).PaperWidth:=10;//报表尺寸
end;

5,388

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧