📄 20010714001.htm

📁 C++Builder教学大全
💻 HTM
📖 第 1 页 / 共 2 页
字号:
上一页 12
        <TBODY> 

        <TR> 

          <TD class=a14>PageSetupDlg( mylp );</TD></TR></TBODY></TABLE> 

      <TABLE align=center width=620> 

        <TBODY> 

        <TR> 

          <TD class=a14>if (mylp－&gt;hDevMode!=NULL){</TD></TR></TBODY></TABLE> 

      <TABLE align=center width=620> 

        <TBODY> 

        <TR> 

          <TD class=a14>　pDev=(DEVMODE  

        ＊)GlobalLock(mylp－&gt;hDevMode);</TD></TR></TBODY></TABLE> 

      <TABLE align=center width=620> 

        <TBODY> 

        <TR> 

          <TD class=a14>　pDev－&gt;dmPaperSize  

      =OldPaperSize;</TD></TR></TBODY></TABLE> 

      <TABLE align=center width=620> 

        <TBODY> 

        <TR> 

          <TD class=a14>　pDev－&gt;dmOrientation  

      =OldOrientation;</TD></TR></TBODY></TABLE> 

      <TABLE align=center width=620> 

        <TBODY> 

        <TR> 

          <TD class=a14>　mylp－&gt;rtMargin.left =OldLeft;</TD></TR></TBODY></TABLE> 

      <TABLE align=center width=620> 

        <TBODY> 

        <TR> 

          <TD class=a14>　mylp－&gt;rtMargin.right  

=OldRight;</TD></TR></TBODY></TABLE> 

      <TABLE align=center width=620> 

        <TBODY> 

        <TR> 

          <TD class=a14>　mylp－&gt;rtMargin.top =OldTop;</TD></TR></TBODY></TABLE> 

      <TABLE align=center width=620> 

        <TBODY> 

        <TR> 

          <TD  

      class=a14>　mylp－&gt;rtMargin.bottom=OldBottom;</TD></TR></TBODY></TABLE>

      <TABLE align=center width=620>

        <TBODY>

        <TR>

          <TD class=a14>　GlobalUnlock(mylp－&gt;hDevMode);</TD></TR></TBODY></TABLE>

      <TABLE align=center width=620>

        <TBODY>

        <TR>

          <TD class=a14>mylp－&gt;Flags=PSD_MARGINS|</TD></TR></TBODY></TABLE>

      <TABLE align=center width=620>

        <TBODY>

        <TR>

          <TD class=a14>PSD_INHUNDREDTHSOFMILLIMETERS;</TD></TR></TBODY></TABLE>

      <TABLE align=center width=620>

        <TBODY>

        <TR>

          <TD class=a14>　if(PageSetupDlg(mylp)){</TD></TR></TBODY></TABLE>

      <TABLE align=center width=620>

        <TBODY>

        <TR>

          <TD class=a14>　　pDev=(DEVMODE ＊)GlobalLock</TD></TR></TBODY></TABLE> 

      <TABLE align=center width=620> 

        <TBODY> 

        <TR> 

          <TD class=a14>(mylp－&gt;hDevMode);</TD></TR></TBODY></TABLE> 

      <TABLE align=center width=620> 

        <TBODY> 

        <TR> 

          <TD class=a14>　　OldPaperSize  

      =pDev－&gt;dmPaperSize;</TD></TR></TBODY></TABLE> 

      <TABLE align=center width=620> 

        <TBODY> 

        <TR> 

          <TD  

      class=a14>if(OldPaperSize&gt;28)OldPaperSize=9;//A4</TD></TR></TBODY></TABLE> 

      <TABLE align=center width=620> 

        <TBODY> 

        <TR> 

          <TD  

      class=a14>OldOrientation=pDev－&gt;dmOrientation;</TD></TR></TBODY></TABLE> 

      <TABLE align=center width=620> 

        <TBODY> 

        <TR> 

          <TD class=a14>OldLeft =mylp－&gt;rtMargin.left;</TD></TR></TBODY></TABLE> 

      <TABLE align=center width=620> 

        <TBODY> 

        <TR> 

          <TD class=a14>OldRight =mylp－&gt;rtMargin.right;</TD></TR></TBODY></TABLE> 

      <TABLE align=center width=620> 

        <TBODY> 

        <TR> 

          <TD class=a14>OldTop =mylp－&gt;rtMargin.top;</TD></TR></TBODY></TABLE> 

      <TABLE align=center width=620> 

        <TBODY> 

        <TR> 

          <TD class=a14>OldBottom  

      =mylp－&gt;rtMargin.bottom;</TD></TR></TBODY></TABLE> 

      <TABLE align=center width=620> 

        <TBODY> 

        <TR> 

          <TD class=a14>Form2－&gt;QuickRep1－&gt;Page－&gt;Orientation  

            =OldOrientation－1;</TD></TR></TBODY></TABLE> 

      <TABLE align=center width=620> 

        <TBODY> 

        <TR> 

          <TD class=a14>Form2－&gt;QuickRep1－&gt;Page－&gt;PaperSize  

        </TD></TR></TBODY></TABLE> 

      <TABLE align=center width=620> 

        <TBODY> 

        <TR> 

          <TD class=a14>=OldPaperSize;</TD></TR></TBODY></TABLE> 

      <TABLE align=center width=620> 

        <TBODY> 

        <TR> 

          <TD class=a14>Form2－&gt;QuickRep1－&gt;Page－&gt;LeftMargin  

            =OldLeft/100;</TD></TR></TBODY></TABLE> 

      <TABLE align=center width=620> 

        <TBODY> 

        <TR> 

          <TD class=a14>Form2－&gt;QuickRep1－&gt;Page－&gt;RightMargin  

            =OldRight/100;</TD></TR></TBODY></TABLE> 

      <TABLE align=center width=620> 

        <TBODY> 

        <TR> 

          <TD class=a14>Form2－&gt;QuickRep1－&gt;Page－&gt;TopMargin  

          =OldTop/100;</TD></TR></TBODY></TABLE> 

      <TABLE align=center width=620> 

        <TBODY> 

        <TR> 

          <TD  

      class=a14>Form2－&gt;QuickRep1－&gt;Page－&gt;Bottom</TD></TR></TBODY></TABLE> 

      <TABLE align=center width=620> 

        <TBODY> 

        <TR> 

          <TD class=a14>Margin=OldBottom/100;</TD></TR></TBODY></TABLE> 

      <TABLE align=center width=620> 

        <TBODY> 

        <TR> 

          <TD class=a14>　GlobalUnlock(mylp－&gt;hDevMode);</TD></TR></TBODY></TABLE>

      <TABLE align=center width=620>

        <TBODY>

        <TR>

          <TD class=a14>}</TD></TR></TBODY></TABLE>

      <TABLE align=center width=620>

        <TBODY>

        <TR>

          <TD class=a14>　GlobalFree(mylp－&gt;hDevMode);</TD></TR></TBODY></TABLE>

      <TABLE align=center width=620>

        <TBODY>

        <TR>

          <TD class=a14>　}</TD></TR></TBODY></TABLE>

      <TABLE align=center width=620>

        <TBODY>

        <TR>

          <TD class=a14>delete mylp;</TD></TR></TBODY></TABLE>

      <TABLE align=center width=620>

        <TBODY>

        <TR>

          <TD class=a14>QRPreview1－&gt;PageNumber=1;</TD></TR></TBODY></TABLE>

      <TABLE align=center width=620>

        <TBODY>

        <TR>

          <TD class=a14>Form2－&gt;QuickRep1－&gt;Prepare();</TD></TR></TBODY></TABLE>

      <TABLE align=center width=620>

        <TBODY>

        <TR>

          <TD class=a14>Form2－&gt;QuickRep1－&gt;Preview();</TD></TR></TBODY></TABLE>

      <TABLE align=center width=620>

        <TBODY>

        <TR>

          <TD class=a14>8.向上翻页：</TD></TR></TBODY></TABLE>

      <TABLE align=center width=620>

        <TBODY>

        <TR>

          <TD class=a14>//上一页</TD></TR></TBODY></TABLE>

      <TABLE align=center width=620>

        <TBODY>

        <TR>

          <TD class=a14>if(QRPreview1－&gt;PageNumber &gt;  

      1)</TD></TR></TBODY></TABLE> 

      <TABLE align=center width=620> 

        <TBODY> 

        <TR> 

          <TD class=a14>　QRPreview1－&gt;PageNumber－－;</TD></TR></TBODY></TABLE>

      <TABLE align=center width=620>

        <TBODY>

        <TR>

          <TD class=a14>RefreshPanel();</TD></TR></TBODY></TABLE>

      <TABLE align=center width=620>

        <TBODY>

        <TR>

          <TD class=a14>9.向下翻页：</TD></TR></TBODY></TABLE>

      <TABLE align=center width=620>

        <TBODY>

        <TR>

          <TD class=a14>//下一页</TD></TR></TBODY></TABLE>

      <TABLE align=center width=620>

        <TBODY>

        <TR>

          <TD class=a14>if(QRPreview1－&gt;PageNumber &lt;  

        Form2－&gt;</TD></TR></TBODY></TABLE> 

      <TABLE align=center width=620> 

        <TBODY> 

        <TR> 

          <TD class=a14>QuickRep1－&gt;PageNumber)</TD></TR></TBODY></TABLE> 

      <TABLE align=center width=620> 

        <TBODY> 

        <TR> 

          <TD class=a14>QRPreview1－&gt;PageNumber＋＋;</TD></TR></TBODY></TABLE> 

      <TABLE align=center width=620> 

        <TBODY> 

        <TR> 

          <TD class=a14>　RefreshPanel();</TD></TR></TBODY></TABLE>

      <TABLE align=center width=620>

        <TBODY>

        <TR>

          <TD class=a14>10.放大处理：</TD></TR></TBODY></TABLE>

      <TABLE align=center width=620>

        <TBODY>

        <TR>

          <TD class=a14>//放大</TD></TR></TBODY></TABLE>

      <TABLE align=center width=620>

        <TBODY>

        <TR>

          <TD class=a14>if(QRPreview1－&gt;Zoom&lt; 200)</TD></TR></TBODY></TABLE> 

      <TABLE align=center width=620> 

        <TBODY> 

        <TR> 

          <TD class=a14>　QRPreview1－&gt;Zoom＋=5;</TD></TR></TBODY></TABLE>

      <TABLE align=center width=620>

        <TBODY>

        <TR>

          <TD class=a14>11.缩小处理：</TD></TR></TBODY></TABLE>

      <TABLE align=center width=620>

        <TBODY>

        <TR>

          <TD class=a14>//缩小</TD></TR></TBODY></TABLE>

      <TABLE align=center width=620>

        <TBODY>

        <TR>

          <TD class=a14>if(QRPreview1－&gt;Zoom&gt;5)</TD></TR></TBODY></TABLE>

      <TABLE align=center width=620>

        <TBODY>

        <TR>

          <TD class=a14>　QRPreview1－&gt;Zoom－=5;</TD></TR></TBODY></TABLE>

      <TABLE align=center width=620>

        <TBODY>

        <TR>

          <TD class=a14><B>小 结</B></TD></TR></TBODY></TABLE> 

      <TABLE align=center width=620> 

        <TBODY> 

        <TR> 

          <TD class=a14>该方法的核心是使用了Win32  

            API函数PageSetupDlg()，利用该函数可以获取页面设置的缺省值，包括纸张大小、打印方向以及上下左右空白边的大小等，也可以弹出页面设置对话框来修改这些值。</TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE><!-- #EndEditable --> 

</DIV></BODY></HTML>
上一页 12
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -