Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- pdfDoc := TDocument.Create;
- docLibrary := TPDFDocumentLibrary.Create;
- pdfDoc.PageSetup.PageSize :=psA4;
- pdfDoc.PageSetup.PageBorderWidth:=1;
- pdfDoc.PageSetup.PageBorderLeft:=True;
- pdfDoc.PageSetup.PageBorderRight:=True;
- pdfDoc.PageSetup.PageBorderTop:=True;
- pdfDoc.PageSetup.PageBorderBottom:=True;
- pdfDoc.PageSetup.PageBorderLeftMargin:=5;
- pdfDoc.PageSetup.PageBorderRightMargin:=5;
- AddText := TText.Create;
- AddText.Alignment:=taCenterAlign;
- AddText.Font.Size :=9;
- AddText.Font.Name := 'Arial';
- AddText.Font.Style := [fsBold];
- AddText.Lines.Add('DLMS Configuration');
- pdfdoc.Contents.Add(AddText);
- AddBlankSpace;
- // I want to insert Line (like -----) here
- AddText := TText.Create;
- AddText.Alignment:=taLeftAlign;
- AddText.Font.Size :=9;
- AddText.Font.Name := 'Arial';
- AddText.Lines.Add('Family Name '+ConfigFamily.FamilyName);
- pdfdoc.Contents.Add(AddText);
- AddBlankSpace;
- // I want to insert Line (like -----) here
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement