Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.06.20;
Скачать: CL | DM;

Вниз

Ошибка 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;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.038 c
1-1086260321
osama
2004-06-03 14:58
2004.06.20
Как перекинуть array[0...x] of Char в PChar?


1-1086735987
ivan9991
2004-06-09 03:06
2004.06.20
Форму в поток


3-1085649493
Pul
2004-05-27 13:18
2004.06.20
Репликация структуры базы


1-1086447748
AndersoNRules
2004-06-05 19:02
2004.06.20
Analog <winnt.h>


14-1086257689
AlexG
2004-06-03 14:14
2004.06.20
Борьба с региональными настройками.