Форум: "Основная";
Текущий архив: 2004.06.20;
Скачать: [xml.tar.bz2];
ВнизОшибка 103 - почему? Найти похожие ветки
← →
z3f (2004-06-08 11:20) [0]Код:
if j=0 then
begin
k:=IntToStr(m)+"o.txt";
AssignFile(F_NEW,k);
ReWrite(F_NEW);
writeln(F_NEW,S);
CloseFile(F_NEW);
inc(m);
inc(j);
end
else
begin
AssignFile(F,k);
Append(k);
writeln(F,S);
CloseFile(F);
end;
На первом проходе else не затрагивается на втором проходе программа переходит по else и ругается с ошибкой I/O error 103 (в help"е - Reported by CloseFile, Read Write, Seek, Eof, FilePos, FileSize, Flush, BlockRead, or BlockWrite if the file is not open.).
Что значит файл - не открыт?
Он открыт!
Подскажите в чем ошибка?
С уважением z3f.
← →
GuAV © (2004-06-08 11:26) [1]
> Append(k);
Глаза протри :)
Append(F);
← →
z3f (2004-06-08 11:34) [2]Тормоз я=(
Но что с утра не бывает=(
var
F:TextFile;
Но после исправления появилось - Incompatible types: "String" and "Text" именно на строку Append(F);
А теперь что не так?
С уважением z3f.
← →
Плохиш (2004-06-08 11:36) [3]System.Append(...);
← →
z3f (2004-06-08 11:39) [4]И на такую штуку появляется ошибка=(
правда 105 - Reported by Write or Writeln on a text file if you do not generate a Console application.
А зачем мне Console application??? мне просто надо открыть файл на добавление!
С уважением z3f.
← →
z3f (2004-06-08 11:41) [5]Все работает - спасибо за помощь!!!!!!!!!1
прошу прощения за беспокойство!!!!!!!!!
С уважением z3f.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2004.06.20;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.036 c