将数据导出EXCEL打印时,
纸张的大小是已经定的,
270*197
如果在DELPHI代码中控制纸张?

解决方案 »

  1.   

    with ExcelWorksheet.pagesetup do
    begin
          PrintTitleRows :='$1:$5';//锁定前5行
          PrintTitleColumns:='';
          PrintArea:='';
          LeftHeader:='';
          CenterHeader:='';
          RightHeader:='';
          LeftFooter:='';
          CenterFooter:='第 &P 页';
          RightFooter:='';
          LeftMargin :=44;
          RightMargin :=34 ;
          TopMargin := 30;
          BottomMargin := 30;
          HeaderMargin := 15;
          FooterMargin := 15;
          PrintHeadings := False;
          PrintGridlines := False;
          PrintComments:=xlPrintNoComments;
          CenterHorizontally := False;
          CenterVertically := False;
          Orientation :=xlPortrait;//纵向打印
          Draft := False ;
          PaperSize := xlPaperA4 ;//这个地方应该可以改纸张的尺寸的。
          FirstPageNumber := xlAutomatic;
          Order := xlDownThenOver ;
          BlackAndWhite := False ;
          Zoom := 100;end;
      

  2.   

    将EXCEL的纸张设为:
    excelworksheet2.PageSetup.PaperSize:=xlPaperUser
    打印机的纸张设为你的尺寸
      

  3.   

    to : WWWWA(aaaa) 
    打印机的设置为A4的(因为平时都是打A4纸,不能改打印机设置啊),
    但现在要打270*197的纸张,
    怎样写?
      

  4.   

    同意 WWWWA(aaaa) ,特殊的要求就让他们自己设置算了
      

  5.   

    在EXCEL中是不能自定义纸张的,只有在打印机中设置自定义纸张,然后用
    EXCEL打印。看来你只有用两台打印机了。
      

  6.   

    To WWWWA(aaaa) :
    不过我以前有人告诉我是可以在DELPHI里设为A3的啊(默认为A4)
    我未调试过的。
      

  7.   

    excelworksheet2.PageSetup.PaperSize:=xlPaperA3
    excelworksheet2.PageSetup.PaperSize:=xlPaperA4
    A3 A4是标准纸张,在EXCEL中可直接设置