动态改变fastreport中Memo控件的高度! 比如:在设置时 Memo1的height属性值为:20,怎样动态将值改为40?谢谢! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Memo1.Height := 40; 不可以吗?没用过FastReport 你是想根据Memo1里数据的多少改变高度? 不知道你的是什么版本?我以前一直用2.34,今天用了3才真牛。如果是3的,那么在编辑状态下放一个ReportTitle,上面放个Memo,将color设置成clBlack,然后在此Memo的OnBeforeprint事件里面写TfrxMemoView(Sender).height :=100;就行了。 Memo1.height :=100;也行。 var t1:TfrMemoView;begin fastReport1.loadfromfile('test.frf'); t1:=TfrMemoView(fastReport1.FindObject('Memo1')); if t1<>nil then t1.height:=20; fastReport1.ShowReport;end; 如楼上所说。或者在OnBeforePrint里面也行。好像2.5的参数是Viewif View.name='Memo1' thenTfrMemoView(View).height :=20; 不可以var t1:TfrMemoView;begin fastReport1.loadfromfile('test.frf'); t1:=TfrMemoView(fastReport1.FindObject('Memo1')); if t1<>nil then t1.height:=20; fastReport1.ShowReport;end;运行时提示:[Error] Unit1.pas(45): Undeclared identifier: 'height' 哈哈,丢掉的分又回来啦! (!!!讨论)远程数据库应用程序宜采用分布式COM+技术?还是采用B/S技术? 使用多个TClientDataSet互相影响的问题 怎么浏览相应的函数 如何一次清空EDIT? 我的问题还是没有解决 心情愉快!散分! 高分求解,如何让quick report打印完后不走纸,或者控制纸的大小。 如何用delphi动态打开access数据库文件 求一office2000的序列号,谢谢! 求助一个很小的程序 请问在listview的标题行中如何获得MouseDown,MouseUp事件
我以前一直用2.34,今天用了3才真牛。
如果是3的,那么在编辑状态下放一个ReportTitle,上面放个Memo,将color设置成clBlack,然后在此Memo的OnBeforeprint事件里面写TfrxMemoView(Sender).height :=100;
就行了。
也行。
t1:TfrMemoView;begin
fastReport1.loadfromfile('test.frf');
t1:=TfrMemoView(fastReport1.FindObject('Memo1'));
if t1<>nil then t1.height:=20; fastReport1.ShowReport;
end;
或者在OnBeforePrint里面也行。
好像2.5的参数是Viewif View.name='Memo1' then
TfrMemoView(View).height :=20;
var
t1:TfrMemoView;begin
fastReport1.loadfromfile('test.frf');
t1:=TfrMemoView(fastReport1.FindObject('Memo1'));
if t1<>nil then t1.height:=20; fastReport1.ShowReport;
end;
运行时提示:
[Error] Unit1.pas(45): Undeclared identifier: 'height'