You are not logged in.
Pages: 1
I am a new user of your library and i'm really impressed with it.
I'm using it to convert and acereporter (http://www.sct-associates.com) file to a PDF. If the report is portrait oriented everything works perfectly.
But when it is landscaped the labels that has wrapped text (WrapText=true) does not get displayed accurately on acrobat reader.
You may look into https://skydrive.live.com/?cid=2018c7e7 … 0657%21121
and see what i am talking about.
Thanks in advance.
begin
rppoliza_Diverso.Page.PageSetup.Destination:= destFile;
rppoliza_Diverso.Page.Visible:=false;
rppoliza_Diverso.Page.AceFilename:= cMovimiento_ace;
rppoliza_Diverso.Prompt:= False;
rppoliza_Diverso.Run;
aFile := TAceAceFile.Create;
aFile.LoadFromFile(cMovimiento_ace);
aWmf := TMetaFile.Create;
aWmf.Enhanced := True;
vpdf := TPdfDocumentGDI.Create();
vpdf.CompressionMethod := cmFlateDecode;
vpdf.DefaultPageLandscape:=true;
for p := 1 to aFile.Pages.Count do
begin
vpdf.AddPage;
aWmfCanvas := TMetaFileCanvas.Create(aWmf,0) ;
aFile.PlayPage(aWmfCanvas.Handle,p);
aWmfCanvas.Free;
vpdf.VCLCanvas.Draw(0,0,aWmf);
end;
try
aFile.Free;
DeleteFile(cMovimiento_ace);
vpdf.SaveToFile(cMovimiento_pdf);
finally
vpdf.free;
aWmf.Free;
end;
end;
Pages: 1