用 Fr2.5,怎么在Memo的 begin end 中的字符串代码中加个回车? ( 积分: 100 )

  • 主题发起人 主题发起人 SeekMyself
  • 开始时间 开始时间
S

SeekMyself

Unregistered / Unconfirmed
GUEST, unregistred user!
我在Memo 中定义 [NameDesrc],在Memo 的脚本中写如下代码:
begin
NameDescr := '';
NameDesrc := [AQry."Name"] + #10#13 + [AQry."Age"];
end
想得到 名称和年龄分行显示,但有 #10#13 后,好像解析不了,如果不加,则两个数据在一行,怎样在 Name 和 Age 中加个回车呢?
最好是在FR的脚本中实现,Query的计算字段的解决方案不算!
 
我在Memo 中定义 [NameDesrc],在Memo 的脚本中写如下代码:
begin
NameDescr := '';
NameDesrc := [AQry."Name"] + #10#13 + [AQry."Age"];
end
想得到 名称和年龄分行显示,但有 #10#13 后,好像解析不了,如果不加,则两个数据在一行,怎样在 Name 和 Age 中加个回车呢?
最好是在FR的脚本中实现,Query的计算字段的解决方案不算!
 
那你加两个MOMO来显示不中吗???
 
to app2001:
问的好,如果用两个,比如下面三个字段在一个Memo中
[AQry."Name"]
[AQry."Age"]
[AQry."EngName"]
如果 [AQry."Age"] 为空的话,EngName不会自动往上对齐,而是空了一行!
其实我在Memo 中定义 [NameDesrc],在Memo 的脚本中写如下代码:
begin
NameDescr := '';
NameDesrc := [AQry."Name"];
if Trim([AQry.&quot;Age&quot;]) <> '' then
NameDesrc := NameDesrc + #10#13 + [AQry.&quot;Age&quot;];
end
通过上面的代码,就可以控制为空的字段不会空一行!
当然,通过Query的计算字段已经解决,但实在是想知道是否可以在FR中用脚本的方式完成!
 
对FR的tfrxVariable变量进行上述赋值似乎不行,因为变量的值是表达式,加入#10#13后EXPRESSION会出错。
可行的办法是在MEMO的事件脚本中定义STRING变量,例如myStr,对myStr进行控制,最后将myStr直接赋值给MEMO.TEXT。
 
后退
顶部