readme.htm

Print Preview Suite v4.76 很不错的 打印预览控件!

    </font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif"><b><font SIZE="2">OnEndPage: 
    TNotifyEvent<br>
    </font></b><font SIZE="2">Occurs when a page is finished.</font><br>
    <br>
    </font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif"><b><font SIZE="2">OnAbort: 
    TNotifyEvent<br>
    </font></b><font SIZE="2"> Occurs when an operation is aborted.<br>
    <br>
    </font></font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>OnChange: 
    TNotifyEvent<br>
    </b>Occurs when the current page or content of the control changes.<br>
    <br>
    </font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif"><b><font SIZE="2">OnBeforePrint: 
    TNotifyEvent<br>
    </font></b><font SIZE="2"> Occurs just before sending pages to the printer.<br>
    <br>
    </font></font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif"><b><font SIZE="2">OnAfterPrint: 
    TNotifyEvent<br>
    </font></b><font SIZE="2"> Occurs when printing process is finished. <br>
    <br>
    </font></font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif"><b><font SIZE="2">OnPrintProgress: 
    TPreviewPrintProgress<br>
    TPreviewPrintProgress = procedure(Sender: TObject; PageNo, Progress: Integer; 
    var AbortIt: Boolean) of object<br>
    </font></b><font SIZE="2"> Occurs periodically during the print operation. 
    Setting <i>AbortIt</i> to true, aborts the operation.<br>
    <br>
    </font></font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif"><b><font SIZE="2">OnZoomChange: 
    TNotifyEvent<br>
    </font></b><font SIZE="2"> Occurs when the zoom ratio of the view is changed. 
    <br>
    <br>
    </font></font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif"><b><font SIZE="2">OnAutoCustomForm: 
    TPreviewAutoCustomForm<br>
    TPreviewAutoCustomForm = procedure(Sender: TObject; const CustomFormName: 
    String; Operation: TOperation) of object<br>
    </font></b><font SIZE="2"> Occurs when the control automatically adds/removes 
    a custom form to/from the system. <br>
    <br>
    </font></font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif"><b><font SIZE="2">OnAnnotation: <font FACE="Verdana, Arial, Helvetica, sans-serif"><b>TPreviewPageDraw</b></font><br>
    <font FACE="Verdana, Arial, Helvetica, sans-serif"><b>TPreviewPageDraw</b></font> = procedure(Sender: TObject; PageNo: Integer; Canvas: TCanvas) of object<br>
    </font></b><font SIZE="2"> When Annotation proprty is True, occurs just before a page being displayed. The items drawn on the provided canvas will appear on top of the preview page, and do not appear on the print. <br>
    <br>
    </font></font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif"><b><font SIZE="2">OnAnnotation: 
    TPreviewPageDraw<br>
    TPreviewPageDraw 
    = procedure(Sender: TObject; PageNo: Integer; Canvas: TCanvas) of object<br>
    </font></b><font SIZE="2"> When Background proprty is True, occurs just before 
    a page being displayed. <font FACE="Verdana, Arial, Helvetica, sans-serif">The items drawn on the provided canvas will appear on background of the preview page, and do not appear on the print.</font><br>
    </font></font></li>
</ul>
<p><font FACE="Verdana, Arial, Helvetica, sans-serif"><b><a NAME="GLOBAL_PROCEDURES"></a><br>
  <font SIZE="4">GLOBAL PROCEDURES</font></b></font></p>
<ul>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>function ConvertUnits(Value, DPI: Integer; InUnits, OutUnits: TUnits): Integer<br>
</b>Returns the conversion of the value specified by the Value parameter from the measurement unit specified by the InUnits parameter to the measurement unit specified by the OutUnit parameter. If neither source nor destination units are mmPixel, the DPI parameter will be ignored.<b><br>
<br>
</b></font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>procedure DrawGraphic(Canvas: TCanvas; X, Y: Integer; Graphic: TGraphic)<br>
            </b>Converts the graphic specified by the Graphic parameter to Device Independent Bitmap (DIB) and draws it at the position specified by the X and Y parameters on the canvas specified by the Canvas parameter. This procedure is useful for printing images on a printer canvas.<br>
      <br>
    </font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>procedure 
    StretchDrawGraphic(Canvas: TCanvas; Rect: TRect; Graphic: TGraphic)<br>
    </b>Converts the graphic specified by the Graphic parameter to Device Independent 
    Bitmap (DIB) and draws it in the rectangle specified by the Rect parameter 
    on the canvas specified by the Canvas parameter. This procedure is useful 
    for printing images on a printer canvas.<br>
    <br>
  </font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>procedure DrawGrayscale(Canvas: TCanvas; X, Y: Integer; Graphic: TGraphic)<br>
    </b>Converts the graphic specified by the Graphic parameter to 256 grayscaled colors  Device Independent Bitmap (DIB) and draws it at the position specified by the X and Y parameters on the canvas specified by the Canvas parameter. This procedure is useful for printing images on a printer canvas.<br>
    <br>
  </font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>procedure StretchDrawGrayscale(Canvas: TCanvas; Rect: TRect; Graphic: TGraphic)<br>
    </b>Converts the graphic specified by the Graphic parameter to 256 grayscaled colors  Device Independent Bitmap (DIB) and draws it in the rectangle specified by the Rect parameter on the canvas specified by the Canvas parameter. This procedure is useful for printing images on a printer canvas.<br>
      <br>
  </font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><strong>procedure ConvertBitmapToGrayscale(Bitmap: TBitmap)</strong><br>
    Converts colors of the bitmap specified by the Bitmap parameter to 256 
  grayscaled colors. <br>
  </font></li>
</ul>
<p><font FACE="Verdana, Arial, Helvetica, sans-serif"><b><a NAME="KEYBOARD_SHORTCUTS"></a><br>
  <font SIZE="4">KEYBOARD SHURTCUTS</font></b></font></p>
<ul>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>Home</b><br>
    Scrolls the current page to the left most position.</font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>Ctrl+Home</b><br>
    Scrolls the current page to the top most position.</font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>End</b><br>
    Scrolls the current page to the right most position.</font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>Ctrl+End</b><br>
    Scrolls the current page to the bottom most position. </font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>Left</b><br>
    Scrolls the current page to the right with the number of pixels specified 
    in <i>HorzScrollbar.Increment</i> property. </font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>Shift+Left 
    </b><br>
    Scrolls the current page one pixel to the right.</font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>Ctrl+Left</b><br>
    Scrolls the current page one screen to the right.</font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>Right</b><br>
    Scrolls the current page to the left with the number of pixels specified in 
    <i>HorzScrollbar.Increment</i> property. </font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>Shift+Right</b><br>
    Scrolls the current page one pixel to the left.</font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>Ctrl+Right</b><br>
    Scrolls the current page one screen to the left.</font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>Up</b><br>
    Scrolls the current page down with the number of pixels specified in <i>VertScrollbar.Increment</i> 
    property. </font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>Shift+Up</b><br>
    Scrolls the current page one pixel down.</font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>Ctrl+Up</b><br>
    Scrolls the current page one screen down.</font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>Down</b><br>
    Scrolls the current page up with the number of pixels specified in <i>VertScrollbar.Increment</i> 
    property. </font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>Shift+Down</b><br>
    Scrolls the current page one pixel up.</font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>Ctrl+Down</b><br>
    Scrolls the current page one screen up.</font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>Page Up<br>
    </b>Shows the previous page.</font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>Ctrl+Page 
    Up<br>
    </b>Shows the first page.</font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>Page Down<br>
    </b>Shows the next page.</font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>Ctrl+Page 
    Down<br>
    </b>Shows the last page.</font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>Plus (Numeric 
    Pad)</b><br>
    Zoom in by the amount specified in the ZoomStep property.</font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>Minus (Numeric 
    Pad)</b><br>
    Zoom out by the amount specified in the ZoomStep property.</font><br>
  </li>
</ul>
<p><font FACE="Verdana, Arial, Helvetica, sans-serif"><b><a NAME="MOUSE_WHEEL"></a><br>
  <font SIZE="4">MOUSE WHEEL FUNCTIONS</font></b></font></p>
<ul>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>Wheel Down</b><br>
    Scrolls the current page up with the number of pixels specified in <i>VertScrollbar.Increment</i> 
    property.</font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>Wheel Up<br>
    </b>Scrolls the current page down with the number of pixels specified in <i>VertScrollbar.Increment</i> 
    property.<b> </b></font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>Ctrl+Wheel 
    Down</b><br>
    Zoom out by the amount specified in the ZoomStep property. </font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>Ctrl+Wheel 
    Up </b><br>
    Zoom in by the amount specified in the ZoomStep property.</font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>Shift+Wheel 
    Down | Wheel Press + Wheel Down</b><br>
    Shows the next page.</font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"><b>Shift+Wheel 
    Up | Wheel Press + Wheel Up</b><br>
    Shows the previous page.</font></li>
</ul>
<p><font FACE="Verdana, Arial, Helvetica, sans-serif"><b><a NAME="ZLIB"></a><br>
  <font SIZE="4">ZLIB COMPRESSION</font></b></font></p>
<blockquote> 
  <p><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2">To save preview 
    pages to a file (or stream) as compressed format:</font></p>
  <ul>
    <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2">If you are 
      using Delphi 5 or lower, get the freeware <b>ZLib</b> library for your version 
      of Delphi at <a HREF="http://www.gzip.org/zlib">http://www.gzip.org/zlib</a>. 
      </font></li>
    <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2">Open the Preview.pas 
      file and define the <b>ZLIB</b> compiler directive in the begining of the 
      file.</font></li>
  </ul>
  <p><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2">When the ZLib 
    compression is active, the component can load both compressed and non-compressed 
    files.</font></p>
</blockquote>
<p><font FACE="Verdana, Arial, Helvetica, sans-serif"><b><a NAME="PDF" id="PDF"></a><br>
      <font SIZE="4">PDF Output </font></b></font></p>
<blockquote>
  <p><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2">To save preview pages as PDF format, you should obtain dsPDF library.<span class=postbody> You can find the library at <a class=postlink href="http://delphistep.cis.si" target=_blank 
rel=nofollow>http://delphistep.cis.si</a>, under freeware components section. </span></font></p>
  <p align="left"><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2">Please consider that dsPdf is postcardware, and demo version displays message &quot;This is demo&quot;. If you want to get the library without the demo message, you must send the author (<a href="mailto:[e-mail]%20">Grega Loboda</a>) a postcard of the town or city you live via (snail) mail.</font></p>
</blockquote>
<p><font FACE="Verdana, Arial, Helvetica, sans-serif"><b><a NAME="TRANSPARENCY" id="TRANSPARENCY"></a><br>
      <font SIZE="4">IMAGE TRANSPARENCY </font></b></font></p>
<blockquote>
  <p align="justify"><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2">As default TPrintPreview does not support image transparency because transparency on printers is not guaranteed. As a work around, you can combine images
  as needed, and then draw the final image to the printer.</font></p>
  <p><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2">If you need image transparency and you think that all of target printers of your application will support SrcErase, srcAnd, and SrcInvert raster operations, you can define IMAGE_TRANSPARENCY directive, so that the control takes care of transparent images. </font></p>
</blockquote>
<p><font FACE="Verdana, Arial, Helvetica, sans-serif"><b><a NAME="KNOWN_BUGS"></a><br>
  <font SIZE="4">KNOWN ISSUES</font></b></font></p>
<ul>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2">If <i>Units</i> 
    property is set to <i>mmHiMetric</i> and width or height of the paper size 
    is bigger than 32767 units, the page will not display correctly. This happens 
    because SetWindowExtEx API function expects a two bytes signed integer (Smallint) 
    as its X and Y parameters, so values bigger than 32767 are interpreted as 
    negative values. <br>
    <br>
    </font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2">When the zoom 
    is not on the actual size (100%), the control may display the preview of the 
    non-scalable fonts inproperly.<br>
    <br>
    </font></li>
  <li><font FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2">The PaintRichText