External exception C000008

← →
denis24 (2004-05-07 14:53) [0]

Принтер сетевой, по умолчанию в системе
При закрытии переменной f вылазит сабж
Вот код.

var f:textfile;
i:integer;
begin

with Printer.Canvas.font do
begin
name:="courier new";
size:=8;
Style:=[fsbold];
end;
Assignprn(f);
REWRITE(F);
for i:=0 to memo1.Lines.Count-1 do
writeln(f,memo1.Lines[i]);

closefile(f);

← →
Cobalt © (2004-05-07 16:40) [1]

Интересно - в примерчеке дельфовой справки приведена такая строка:
System.CloseFile(MyFile);

Может, это неспроста?

External exception C000008 Найти похожие ветки