Hello world/Line printer: Difference between revisions
Content added Content deleted
(Added Delphi example) |
m (Fixed example - forgot Rewrite) |
||
| Line 72: | Line 72: | ||
begin |
begin |
||
AssignPrn(lPrinterAsTextFile); |
AssignPrn(lPrinterAsTextFile); |
||
Rewrite(lPrinterAsTextFile); |
|||
Writeln(lPrinterAsTextFile, 'Hello World!'); |
|||
CloseFile(lPrinterAsTextFile); |
CloseFile(lPrinterAsTextFile); |
||
end.</lang> |
end.</lang> |
||