Форум программистов, компьютерный форум, киберфорум
Delphi
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.90/21: Рейтинг темы: голосов - 21, средняя оценка - 4.90
0 / 0 / 0
Регистрация: 22.12.2014
Сообщений: 4

I/O error 998

23.08.2016, 12:47. Показов 4236. Ответов 5
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
написал процедурку для чтения из файла
имя файла input (без расширения), файл существует, обладаю всеми нужными правами для его открытия и перезаписи
на строке "read(txt, aa[i]);" вылетает ошибка "I/O error 998"
подскажите пожалуйста, где я накосячил?

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
procedure readtxt(aa: array of extended; nn : integer);
var
  txt : file of  extended;
  i : integer;
 
begin
  i:=nn;
 
  assignfile(txt, 'input');
  reset(txt);
 
while not eof(txt) do
  begin
    read(txt, aa[i]);
    inc(i);
  end;
  close(txt);
end;
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
23.08.2016, 12:47
Ответы с готовыми решениями:

X64 GetThreadContext Error 998: Invalid Access Memory Location
Доброго времени суток. При попытке получить контекст потока if (!GetThreadContext(handle, ref context)) throw new...

Ошибка при запуске corel draw: «Не удается загрузить VGCore.Dll. Код ... Error Code 998»
Когда я пытаюсь запустить CorelDraw X5, я получаю сообщение об ошибке: «Не удается загрузить VGCore.Dll. Код ... Error Code 998» Так же...

Бесконечно печатать 1000 999 998 997
Бесконечно печатать 1000 999 998 997 Вот такая программа: uses Crt; LABEL m1;’ Var i: LongInt; begin ClrScr; i:= 1000; ...

5
Почетный модератор
 Аватар для Puporev
64314 / 47610 / 32743
Регистрация: 18.05.2008
Сообщений: 115,168
23.08.2016, 12:55
Цитата Сообщение от xDrive Посмотреть сообщение
файл существует
А он создан как типизированный?
0
0 / 0 / 0
Регистрация: 22.12.2014
Сообщений: 4
23.08.2016, 12:59  [ТС]
файлик создавался через блокнот
полагаю мне придется обращаться как к текстовому фалу считывать "числа" по одному в буферную строчку после уже преобразовывать и записывать в мой массив?
0
Почетный модератор
 Аватар для Puporev
64314 / 47610 / 32743
Регистрация: 18.05.2008
Сообщений: 115,168
23.08.2016, 13:06
Лучший ответ Сообщение было отмечено xDrive как решение

Решение

Если файл текстовый, то нужно так.
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
type mas=array of extended;
procedure readtxt(var txt:Textfile;var aa:mas;var nn:integer);
var  i : integer;
begin
n:=1;
assignfile(txt, 'input.txt');
reset(txt);
while not seekeof(txt) do //seekeof чтобы не прочитать пробелы в конце файла
 begin
  inc(n);
  setlegth(aa,n);
  read(txt, aa[n-1]);
 end;
closefile(txt);
end;
1
0 / 0 / 0
Регистрация: 22.12.2014
Сообщений: 4
23.08.2016, 13:09  [ТС]
спасибо большое, будем пробовать!
0
Заблокирован
23.08.2016, 20:40
Процедуры AssignFile, ReadLn, WriteLn, и т.п. остались от турбо-паскаля, и считаются устаревшими. Не надо их трогать.

См. FileOpen, FileRead, FileWrite.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
23.08.2016, 20:40
Помогаю со студенческими работами здесь

А можно сделать так (разбить как нибудь или запятые вставить ), чтобы было не 8998989 байт, а 8,998,989 байт ?
Кстати, вот еще вопрос... В переменной (например, filesize) хранится размер файла. При выводе на печать <%=filesize%> выводится...

Исправить ошибку в WxDev-C++: Error with debugging process: GDB Error: error, No source file named main.cpp
Здравствуйте товарищи! Новенький я в си, установил wxDev-C++, скомпилировал, запускаешь - работает, а чтоб пошагово отладка - не...

Error 1 fatal error LNK1000: Internal error during IncrBuildImage ModalMnd
Ребята помогите пожалуиста разобраться с ошибкой ! только начал изучать WinApi ! Visual studio 8 выдает такую ошибку постоянно ...

Error displaying the error page: Application Instantiation Error
после того, как залил на хостинг стала выходить ошибка Your host needs to use PHP 5.3.1 or higher to run this version of Joomla!, то есть...

Error displaying the error page: Application Instantiation Error
Добрый вечер, друзья! Нужна помощь. Перенес свой сайт с локалки на masterhost.ru при помощи Filezilla. Только, при запуске сайта...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Новые блоги и статьи
Access
VikBal 11.12.2025
Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.
Новый ноутбук
volvo 07.12.2025
Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro
Музыка, написанная Искусственным Интеллектом
volvo 04.12.2025
Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
От async/await к виртуальным потокам в Python
IndentationError 23.11.2025
Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .
Поиск "дружественных имён" СОМ портов
Argus19 22.11.2025
Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .
Сколько Государство потратило денег на меня, обеспечивая инсулином.
Programma_Boinc 20.11.2025
Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .
Ломающие изменения в C#.NStar Alpha
Etyuhibosecyu 20.11.2025
Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .
Мысли в слух
kumehtar 18.11.2025
Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .
Создание Single Page Application на фреймах
krapotkin 16.11.2025
Статья исключительно для начинающих. Подходы оригинальностью не блещут. В век Веб все очень привыкли к дизайну Single-Page-Application . Быстренько разберем подход "на фреймах". Мы делаем одну. . .
Фото: Daniel Greenwood
kumehtar 13.11.2025
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru