when exporting to PDF using synpdf realized that the metafile generated by drawmetafile produced text distortion look in the paragraph below of bullet inserted
 http://www.sispaic.com.br/PFNSis/Test.pdf 
---------------
function MakePageMetafile(srve:TSRichViewEdit;aPageNo, aWidth, aHeight: Integer): TMetafile;
var
  savTextDraw: Boolean;
begin
  savTextDraw := ScaleRichViewTextDrawAlwaysUseGlyphs;
  ScaleRichViewTextDrawAlwaysUseGlyphs := false;
  Result := TMetafile.Create;
  Result.Width := aWidth;
  Result.Height := aHeight;
  srve.CanUpdate := False;
  srve.UseDrawHyperlinksEvent := True;
  srve.DrawMetafile(aPageNo, Result, False, True, False);
  ScaleRichViewTextDrawAlwaysUseGlyphs := savTextDraw;
  srve.CanUpdate := True;
  srve.UseDrawHyperlinksEvent := False;
end;
---------------
  //synopse
  PdfDoc : TPDFDocument;
. . . . .
  for i := 1 to srve.PageCount do
  begin
    Metafile := MakePageMetafile(srve,i, Round(srve.PageWidth100Pix),      Round(srve.PageHeight100Pix));
....
        PdfDoc.DefaultPageWidth := MulDiv(srve.PageWidth100Pix,72,PdfDoc.ScreenLogPixels);
        PdfDoc.DefaultPageHeight := MulDiv(srve.PageHeight100Pix,72,PdfDoc.ScreenLogPixels);
        PdfDoc.AddPage;
some reference about this occurrence?
Thanks
			
			
									
						
										
						bullet default symbol font
- 
				Sergey Tkachenko
- Site Admin
- Posts: 17952
- Joined: Sat Aug 27, 2005 10:28 am
- Contact: