Sign up to receive Decoded, a new monthly digest with product updates, feature release info, continuing education opportunities, and more.
Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.
Have a better answer? Share it in a comment.
c u, Matvey
var
Text: TextFile;
begin
AssignPrn(Text);
try
ReWrite(Text);
Printer.Canvas.Font.Name:=
Printer.Canvas.Font.Size:=
Printer.Canvas.Font.Style:
{ do your writing here }
WriteLn(Text,'My Text Here');
{when you've finished writing}
finally
CloseFile(Text);
end;
end;