Class TWPPaintEngine
Hierarchy
System.TObject | System.Classes.TPersistent | System.Classes.TComponent | TWPPaintEngine
Subclasses
WPCTRMemo.TWPPaintEngineAndData
Description
This component paints the text in the attached
// Paint at 100%
procedure TForm1.PaintBox1Paint(Sender: TObject);
begin
WPPaintEngine1.Draw(PaintBox1.Canvas,
10, 10, PaintBox1.Height,
WPScreenPixelsPerInch,
WPScreenPixelsPerInch, 0 );
end;
// Paint at 50%
procedure TForm1.PaintBox1Paint(Sender: TObject);
begin
WPPaintEngine1.Draw(PaintBox1.Canvas,
10, 10, PaintBox1.Height,
WPScreenPixelsPerInch div 2,
WPScreenPixelsPerInch div 2, 0 );
end;
Note: In case you need to use one RTFData object
with one TWPPaintEngine you can create one instance of
the Properties
Property Name : TComponentName
Property PageSizes : TWPPaintEnginePaintSizes
Methods
Procedure DeletePage(index:Integer)
Procedure DoMeasurePage(Sender:TObject; PageInfo:TWPMeasurePageParam)
Function Draw(outCanvas:TCanvas; r:TRect; zoom:Integer; starty:Integer; HandlePageBreaks:Boolean) : Integer
Function GetAnsiString : AnsiString
Function GetARTFData : TWPRTFDataCollection
Function GetMetafile(PageNr:Integer; WithHeaderFooter:Boolean) : TMetafile
Procedure InitCanvas(toCanvas:TCanvas; Start:Boolean)
Procedure LoadFromStream(Stream:TStream; FormatString:string)
Used or referenced by
-Property TWPRTFBalloonHint.Painter : TWPPaintEngine |