Problemas em fazer rotina imprimir no Delphi 7

[rafaelcmartins 0]

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.

[Matias Rezende 50]

Olá rafaelcmartins,

 

Conforme o aviso existente no fórum de origem deste post, não é permitida a postagem de dúvidas nesta área, motivo pelo qual este tópico será movido para o fórum principal deste assunto.

 

Tópico Movido

Origem: Artigos, Tutoriais e Matérias (Delphi) http://forum.imasters.com.br/public/style_emoticons/default/seta.gif Destino: Delphi