Minha duvida é a seguinte. Tenho uma String
com mais de 6000 Caracteres e preciso por o conteúdo dessa variável em um arquivo .pdf. só que salvo para o pdf o texto fica em uma unica linha, ele não quebra a string
para por em outras linhas.
Vou por aqui o código de como salvo a string
em .pdf.
...
uses
SynPdf;
{$R *.dfm}
...
procedure TForm2.SalvarPdfClick(Sender: TObject);
var
PDF : TPdfDocumentGDI;
Page: TPdfPage;
FileName: string;
I, J: Integer;
begin
...
Descricao := JsonValue.Value;
PDF := TPdfDocumentGDI.Create();
try
PDF.Info.Author := 'Autor';
PDF.Info.CreationDate := Now;
PDF.Info.Creator := 'Criador';
PDF.Info.Subject := 'Assunto';
PDF.Info.Title := 'Título'
Page := PDF.AddPage;
Page.PageLandscape := False;
PDF.DefaultPaperSize := psA4;
PDF.VCLCanvas.TextOut(100,100, Descricao);
PDF.SaveToFile('C:\MySysten\Pdf\Pdf_Publ.pdf');
finally
PDF.Free;
end;
O texto fica assim e não quebra para as próximas linhas
Estou utilizado Synopse PDF engine para salvar em .pdf