fastreport的打印模板中，能否去掉左上角的那个保存按钮哪？(0分)

L

leoruby

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-15

• #1

如题所示....
打印预览的时候，左上角有一个保存按钮，能否去掉那个保存按钮不让它显示出来哪？

 

H

halley

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-15

• #2

自己改下fastreport的源码就可以了

 

超

超级牛X

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-15

• #3

findComponent那个图标的名字，然后Enabled掉或者Hide掉就行了，不用改源码

 

L

leoruby

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-15

• #4

超级牛X，我还是不会，在哪里使用findComponent哪？
能否说的详细些哪？
谢谢了。

 

L

leoruby

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-15

• #5

我这样弄：
procedure TTestForm.Button1Click(Sender: TObject);
begin
frxReport1.FindComponent('save').enabled:=false;// 根本不行的
frxreport1.ShowPreparedReport;
end;

frxReport1.FindComponent('save').enabled:=false;//根本不行的。
frxReport1.FindComponent('save')没有 enabled或者hide属性啊

 

风

风铃夜思雨

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-15

• #6

有属性可以隐藏的
frxreport1.PreviewOptions.Buttons中去掉pbsave

 

L

leoruby

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-16

• #7

来自：风铃夜思雨, 时间：2006-5-15 19:15:36, ID：3443074
有属性可以隐藏的
frxreport1.PreviewOptions.Buttons中去掉pbsave
report的属性没有frxreport1.PreviewOptions.Buttons啊，只有frxreport1.PreviewOptions.outlinevisible和outlinewidth两个属性

 

超

超级牛X

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-16

• #8

风铃夜思雨的方法是正确的

 

L

leoruby

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-16

• #9

来自：超级牛X, 时间：2006-5-16 9:03:32, ID：3443377
风铃夜思雨的方法是正确的
可是，我怎么没有找到frxreport1.PreviewOptions.Buttons哪
只有frxreport1.PreviewOptions.outlinevisible和outlinewidth啊

 

超

超级牛X

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-16

• #10

那你还是在rpt的OnManualBuild事件中加入下面的语句把
想隐藏什么就隐藏什么,别忘了uses里面加入 ComCtrls, ToolWin
procedure TForm1.rpt1ManualBuild(Page: TfrxPage);
begin
if rpt1.PreviewForm<>nil then
if rpt1.PreviewForm.FindComponent('SaveB')<>nil then
(rpt1.PreviewForm.FindComponent('SaveB') as TToolButton).Visible:=False;
end;

 

L

leoruby

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-16

• #11

谢谢 超级牛X ，我去试试，：）

 

L

leoruby

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-16

• #12

接受答案了.