请用过reportbuild的大虾帮忙!

7030 2000-08-08 03:12:00
在使用reportbuild时碰到如下问题,请问大虾该如何解决?
1.在程序设计时报表里有一控件label,但内容是程序运行时由使用者输入才确定,
在代码中如何表达?
2.在程序设计时报表是空白一片,但在运行期动态添置label(从一文本文件中),
再问代码该如何表达?
...全文
93 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
chenlh 2000-08-09
  • 打赏
  • 举报
回复
建一个Tstrings的对象,用Tstrings的loadfromfile()方法把文本文件的内容读到其items中,再分别赋到label的text中。我还没有实验!
xiecc 2000-08-08
  • 打赏
  • 举报
回复
问题1:
procedure TForm1.ppLabel3Print(Sender: TObject);
var
lsFirstName: String;
lsLastName: String;

begin
lsFirstName := Table1.FieldByName('FirstName').AsString;
lsLastName := Table1.FieldByName('LastName').AsString;

if (Length(lsFirstName) > 0) then
ppLabel3.Caption := lsFirstName + ' ' + lsLastName
else
ppLabel3.Caption := lsLastName;

end;
问题2,可能和动态建立组件差不多
ppLabel1:=TppLabel1.Create(ppReport);
ppLabel1.Parent:=ppReport;
我猜的

5,386

社区成员

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

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