Форум: "Основная";
Текущий архив: 2005.08.07;
Скачать: [xml.tar.bz2];
ВнизI/O error 32 при работе с текстовым файлом. Найти похожие ветки
← →
neat (2005-07-15 10:29) [0]Вроде проще некуда:
var f : TextFile;
AssignFile(f, "TF.txt");
Append(f);
Writeln(f, QCons.FieldByName("OAO_Name_").AsString);
Flush(f);
CloseFile(f);
Выполнение останавливается на процедуре Append(f) с сообщением "I/O error 32". Файл существует, данные из него читаются. Что бы это значило?
← →
gydvin (2005-07-15 10:39) [1]
procedure TForm1.Button1Click(Sender: TObject);
var f : TextFile;
s:string;
begin
AssignFile(f, "d:\11111.txt");
Append(f);
s:="мама";
Writeln(f, s);
Flush(f);
CloseFile(f);
end;
все работает!!!!!!!!!!!
← →
PVOzerski © (2005-07-15 11:04) [2]Файл, часом, во время Append не открыт из другого процесса/потока? А права на запись для него у тебя в порядке (это если NTFS). А он не с атрибутом read-only?
← →
Anatoly Podgoretsky © (2005-07-15 11:16) [3]Просто он где то еще открыт на чтение/запись
← →
neat (2005-07-15 12:20) [4]Всё верно, так и оказалось, но я не обратил на это внимание, потому что пока искал описание кода ошибки наткнулся(сейчас уже не помню где) на примерно следующие слова:" ... если этот файл уже был открыт, повторный вызов AssignFile(f, FileName) закрывает файл и открывает его снова ...". Спасибо всем.
И ещё, не подскажите, где найти описание кодов ошибок. Заранее благодарю.
← →
Kolan © (2005-07-15 12:23) [5]Runtime Errors в Help"е
← →
isasa © (2005-07-15 12:26) [6]F1 -> I/O Errors
← →
Anatoly Podgoretsky © (2005-07-15 12:30) [7]neat (15.07.05 12:20) [4]
наткнулся(сейчас уже не помню где) на примерно следующие слова:" ... если этот файл уже был открыт, повторный вызов AssignFile(f, FileName) закрывает файл и открывает его снова ...".
Выбрось нафиг подобную книгу
← →
Плохиш © (2005-07-15 12:38) [8]
> Anatoly Podgoretsky © (15.07.05 12:30) [7]
В оригинале про reset написано ;-)
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2005.08.07;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.039 c