怎样在代码里控制打印设置**

atiger

好，
请问
1、7楼的代码写在哪个事件上了？
2、检查，DocViewBar是自动侦测的吗？还是打印的文档设置某个固定的文档？
如果是自动侦测的，那么打印前，焦点是在DocViewZSSYXRBG_ZSRBG 这个连接的DataGrid吗？如果是固定死的，是DocViewZSSYXRBG_ZSRBG 吗？

Jsun2007

回答：1.procedure TCT.DataLocateComboBox1CloseUp(Sender: TObject; Accept: Boolean);

            2. if (DataLocateCombobox1.DataSource.DataSet.FieldByName('f_producer_name').AsString = '筛分和加料') then
    begin
      DataSetBroker1.DataSetID := 'z12DailyReport';
      DocViewZSSYXRBG_ZSRBG.DocClassID := 'Z12RBG';

ZSSYXRBG.TZ12RBG(DocViewZSSYXRBG_ZSRBG.doc).DataGrid.Exporter.PageInfo.MarginLeft := 5;
      ZSSYXRBG.TZ12RBG(DocViewZSSYXRBG_ZSRBG.doc).DataGrid.Exporter.PageInfo.MarginRight := 5;
    end
   完整的代码如上，怎样判断焦点是在datagrid上

atiger

你是怎么打印的？用的是DocViewBar吗？如果不是，请说说你是怎么打印的
如果是，请问，DocViewBar 的 Autodetect 这个选项是选中的吗？如果不是，那DocView 连接的是DocViewZSSYXRBG_ZSRBG 这个吗？如果是，你打印前选中一下DocViewZSSYXRBG_ZSRBG 这个文档，然后再按DocViewBar上控件