I'm getting the following error when I'm trying to print from a Delphi application:
File access denied.
This printer routine in my application is a routine to print text. So it prints to a file
in LPT1 . The source code is more or less like this:
Code: Select all
procedure Print;
var
File: TextFile;
begin
AssignFile(File, 'LPT1');
Rewrite(File);
try
Writeln(File, '...');
// ...
finally
CloseFile(File);
end;
end;
Thank you.
Marcos