当单击按钮打开报表预览窗体时,如何将工具栏中的一些按钮设为无效(enabled=false)
 如将"保存'和"导入报表"设为无效。
 

解决方案 »

  1.   

        frmpreview:=TForm(QuickRep1.QRPrinter.Client.Parent);    for i:=0 to frmpreview.controlcount-1 do
          if frmpreview.controls[i] is ttoolbar then
           for j:=0 to ttoolbar(frmpreview.controls[i]).controlcount-1 do
              begin
                if tspeedbutton((ttoolbar(frmpreview.controls[i])).controls[j]).name='Print' then
                   tspeedbutton((ttoolbar(frmpreview.controls[i])).controls[j]).enabled:=false;
              end;
      end;
      

  2.   

    大侠,frmpreview是如何定义的?