Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 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
14-1086334933
Clickmaker
2004-06-04 11:42
2004.06.20
SetProcessWorkingSetSize и своппинг


1-1086261275
denis24
2004-06-03 15:14
2004.06.20
выделить каталог предпоследнего уровня в пути


3-1085616370
Almaz
2004-05-27 04:06
2004.06.20
Конструктор connection string


3-1085583772
Алексей
2004-05-26 19:02
2004.06.20
Базы данных отношение "многие ко многим"


9-1077522979
Pinochet
2004-02-23 10:56
2004.06.20
Быстродействие игры





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский