Problemas em fazer rotina imprimir no Delphi 7

Eu fiz o curso online de delphi IPED e tem um programa q eu não estou conseguindo rodar, para fazer uma impressão. Eu uso Delphi 7 e windows 7 (sou iniciante no delphi, não sei se isso influi em algo no programa, já que o curso q eu fiz era p Delphi 6.

procedure TfrmPrincipal.Imprimir1Click(Sender: TObject);
var

 Texto : TextFile;
 i : integer;

begin
if dlimprime.Execute then
with TfrmTexto(activeMDIChild) do
begin

 assignPrn(Texto);
 rewrite(Texto);
 printer.canvas.font := memo1.font;
 for i:=0 to memo1.lines.count do
 writeln(Texto,memo1.lines[i]);
 closeFile(Texto);
 end;
end;

end.
O delphi diz q os erros estão ocorrendo com o assignPrn e com o printer:[Error] MDI_Principal.pas(168): Undeclared identifier: 'AssignPrn'

[Error] MDI_Principal.pas(170): Undeclared identifier: 'printer'

[Fatal Error] P_MDI.dpr(6): Could not compile used unit 'MDI_Principal.pas'

Será que alguém poderia me dar uma ajuda de como resolver isso? Será q tem algo a ver com o windows 7? Eu ouvi falar q o Delphi 2009 tá bugado. Será q o Delphi 7 tb é? Como deu pra perceber, sou iniciante em Delphi, tô começando a usar a menos d 1 mês. Então, por favor, compreendam minha ignorância.

Obrigado pela atenção.