I changed the code:
nomerel:='Área de Atuação';
pdf:=Tpdf.Create(poPortrait,puMM,pfA4);
pdf.SetUTF8(true);
pdf.AliasNbPages('+n+');
pdf.SetDisplayMode(dmZoom);
pdf.AddPage;
pdf.SetFont(ffTimes,fsNormal,10);
pdf.SetX(15);
pdf.Cell(0,0,'Sistema Auditor');
pdf.Ln(3);
pdf.SetX(15);
pdf.Cell(0,0,nomerel);
pdf.Line(15,16,200,16);
pdf.Ln(5);
pdf.SetX(35);
pdf.Writer(5,'Área de Atuação');
pdf.SaveToFile('d:\teste.pdf');
pdf.Free;
but the error continued.
I am using Windows 7 64bits, Lazarus 1.8.2
Thanks engkin.