Problem bei Ausführung eines Druckbefehls

[Sebastian92]

Hey,

Ich bin dabei ein Programm zu schreiben, dass Name, Adresse und Telefonnummern von Personen in eine ListBox schreibt und auf Wunsch acuh ausdruckt. Der befehl für die Druckanweisungen stehen in einem Buch. Ich habe die Zeilen abgeschrieben. Der Quelltext sieht nun so aus:

Delphi-Quellcode:

AssignPrn(Prn);
Rewrite(Prn);
Printer.Canvas.Font.Name:='Courier New';
Printer.Canvas.Font.Size:='12';
Writeln(Prn);
Writeln(Prn);
Writeln(Prn,'Telefonverzeichnis':45);
Writeln(Prn);
Writeln(Prn,Rand+'Name          Vorname          Telefon');
.
.
.
CloseFile(Prn);

Wenn ich nun versuche das Programm zu starten zeigt er mir einen Fehler, nämlich "AssignPrn(Prn)","Printer.Canvaes.F..." und "Printer.Canvas.F..." wäre eine nicht deklarierte Variable... Ich habe keine Ahnung wie ich den Fehler beheben könnte. Könnt ihr mir vlt. weiterhelfe? (Der Quelltext stimmt. Ich habe ihn 3mal mit dem in dem Buch verglichen),

mgf Sebastian