Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 21.07.2009, 20:36   #11
puporev
Старожил
 
Регистрация: 13.10.2007
Сообщений: 2,740
По умолчанию

Цитата:
окно какое-то вылезает)
Так в окне нажмите кнопочку, можете еще комментарий написать.
Только смотрите чтоб указатель стоял на Одобряю.
puporev вне форума Ответить с цитированием
Старый 21.07.2009, 20:37   #12
diliana
Форумчанин
 
Аватар для diliana
 
Регистрация: 24.05.2009
Сообщений: 119
По умолчанию

Цитата:
Сообщение от puporev Посмотреть сообщение
Я и говорю, что по условию у Вас создать массив записей вводом или чтением из существующего файла. Поэтому при чтении файла нужен счетчик. А просто ввести некоторое количество записей в файл, или вывести их из файла, массив не нужен.
понятно теперь!
спасибо!!!! (вам тоже хотела поставить отзыв, только опять не получается...опять это же окно какое-то вылезает)
diliana вне форума Ответить с цитированием
Старый 21.07.2009, 20:40   #13
diliana
Форумчанин
 
Аватар для diliana
 
Регистрация: 24.05.2009
Сообщений: 119
По умолчанию

Цитата:
Сообщение от puporev Посмотреть сообщение
Так в окне нажмите кнопочку, можете еще комментарий написать.
я так и делала, в общем такое окно вылезает и все...
Цитата:
<programmersforum.ru>
Вы должны добавить отзыв кому-то ещё, прежде чем сможете снова добавить его puporev.
Цитата:
Сообщение от puporev Посмотреть сообщение
Только смотрите чтоб указатель стоял на Одобряю.
прикольно
diliana вне форума Ответить с цитированием
Старый 25.07.2009, 12:59   #14
Anatole
Форумчанин
 
Аватар для Anatole
 
Регистрация: 07.04.2009
Сообщений: 245
По умолчанию

diliana Мне нравится ваше стремление к получению знаний, поэтому считаю за необходимое ввести некоторые коррективы в материал изложеный Daramant относительно вот этого утверждения:
Цитата:
Мы не знаем сколько записей в файле.
Если используется типизированый файл, то количество записей в файле можно узнать используя фунцию FileSize, которая возвращает количество записей в файле. И все данные из файла в массив можно считывать не только используя цикл While но и цикл for. Например вот так:
Код:
For i:=1 to FileSize(tmpF) do
 read (tmpF, stat[i]);
Всякое безобразие должно быть единообразным. Тогда это называется порядком.
Anatole вне форума Ответить с цитированием
Старый 25.07.2009, 13:01   #15
puporev
Старожил
 
Регистрация: 13.10.2007
Сообщений: 2,740
По умолчанию

Только
For i:=0 to FileSize(tmpF)-1 do
puporev вне форума Ответить с цитированием
Старый 25.07.2009, 13:06   #16
Anatole
Форумчанин
 
Аватар для Anatole
 
Регистрация: 07.04.2009
Сообщений: 245
По умолчанию

Это одинаково. и зависит от того как указаны индексы в описании массива. Откровенно говоря, на это не обратил внимания, поскольку Это в принципе не меняет сути подхода.
Всякое безобразие должно быть единообразным. Тогда это называется порядком.
Anatole вне форума Ответить с цитированием
Старый 25.07.2009, 13:11   #17
puporev
Старожил
 
Регистрация: 13.10.2007
Сообщений: 2,740
По умолчанию

При чем тут массив. В типизированных файлах индексация всегда идет с ноля. И, вместо того чтоб пререкаться, напишите 5 строчек кода и прогоните.
puporev вне форума Ответить с цитированием
Старый 25.07.2009, 13:20   #18
Anatole
Форумчанин
 
Аватар для Anatole
 
Регистрация: 07.04.2009
Сообщений: 245
По умолчанию

При открытии файла процедуреой Reset указатель позиции в файле стоит на нулевой записи. после каждого чтения он перемещается на следующую запись.Записи считываются из файла последовательно, одна за другой и заносятся в массив. Проэтому Счётчик i нам необходим только для того, чтобы указать в какой из элементов масива заносить считанную запись, и не больше. (в данном примере не используется прцедура Seek, не путайте)
Цитата:
напишите 5 строчек кода и прогоните.
Выполнено еще на ASCII Pascal лет 20 назад
Всякое безобразие должно быть единообразным. Тогда это называется порядком.

Последний раз редактировалось Anatole; 25.07.2009 в 13:27.
Anatole вне форума Ответить с цитированием
Старый 25.07.2009, 13:29   #19
puporev
Старожил
 
Регистрация: 13.10.2007
Сообщений: 2,740
По умолчанию

Прошу прощения, был не прав.
puporev вне форума Ответить с цитированием
Старый 25.07.2009, 13:37   #20
Anatole
Форумчанин
 
Аватар для Anatole
 
Регистрация: 07.04.2009
Сообщений: 245
По умолчанию

Извинения принимаются
Всякое безобразие должно быть единообразным. Тогда это называется порядком.
Anatole вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Загрузка данных из файла JIK Помощь студентам 4 19.05.2013 12:17
Cортировка типизированного файла по 3м признакам Dremgor Помощь студентам 3 05.06.2009 14:10
загрузка данных из тестового файла gribog БД в Delphi 16 19.07.2007 15:06