就是我在预览或打印的时候不要把那个背景图打印出来(但预览时可以显示背景图),实现套大的功能!在FR中有picuture1 的 visible属性可以控制,但在代码中能否控制?
我写的代码如下,但无法实现:
-------------------
procedure TFrm_mb_15.Btn_printClick(Sender: TObject);
var
T :TfrPictureView;
begin
t:= TfrPictureView(frReport1.FindObject('Picture1')); //是否显示背景
if t <> nil then
BEGIN
T.Picture.Destroy;
end;
-----------
end;
T.Picture.Destroy;为什么不能写成T.Picture.Visible :=False;
或 T.Picture.height :=0;
T.Picture.width :=0;
呢?
我写的代码如下,但无法实现:
-------------------
procedure TFrm_mb_15.Btn_printClick(Sender: TObject);
var
T :TfrPictureView;
begin
t:= TfrPictureView(frReport1.FindObject('Picture1')); //是否显示背景
if t <> nil then
BEGIN
T.Picture.Destroy;
end;
-----------
end;
T.Picture.Destroy;为什么不能写成T.Picture.Visible :=False;
或 T.Picture.height :=0;
T.Picture.width :=0;
呢?
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货