|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
06.07.2010, 00:30 | #1 |
Пользователь
Регистрация: 06.07.2010
Сообщений: 31
|
работа с текстовым файлом. Создаем тест.
В общем я пишу программу тесты. Данная программа берет вопросы и ответы а также информацию по вопросу из файла с определенной структурой.
Код: Код:
1 Сколько человек у нас в группе??? 12 23 13 20 13 13 человек 2 Если да то ... да неи не знаю подумаю еще да да 3 Просто мне так захотелось 1 2 3 6 1 Многгоооооооооооооооооооооооооооооо ооооооооооооооооооооооооооооооооооо ооооо смысл моей же программы в том что при открытии очередного такого теста она должна брать рандомно все эти вопросы и ответы но в правильной последовательности. Чтобы брал не фиг пойми как а вопросы совпадали с ответами. Пример Если да то ... да неи не знаю подумаю еще да да но возникает проблема что seek не используется в текстовых файлах. При использовании функции windows Api SetFilePointer(TTextRec(f).Handle, Pos, nil, File_Begin); в дальнейшем на readln(f,vizov.nomer) и т.д. выдает ошибку EinOutError с сообщением invalid input error. Такое сообщение он выдает если рандомное значение равно 1. И значение 2 он не показывал ни разу хотя записи 3. Вот сам код программы: Код:
Последний раз редактировалось Stilet; 06.07.2010 в 09:05. |
06.07.2010, 01:13 | #2 |
Форумчанин
Регистрация: 05.04.2010
Сообщений: 410
|
Немного не понял
Есть файл с тремя вопросами. Что программа должна брать случайно? Вопрос из этих трех?
ICQ: 593-013-807
|
06.07.2010, 01:28 | #3 | |
Не
Участник клуба
Регистрация: 29.10.2009
Сообщений: 1,456
|
Цитата:
|
|
06.07.2010, 11:48 | #4 |
Пользователь
Регистрация: 13.05.2010
Сообщений: 29
|
А почему бы не создать типизированный файл?
Либо создать запись того же типа, и следующим образом перейти к нужной компоненте файла: Код:
"Сегодня, в завтрашний день не все могут смотреть, вернее не только лишь все, мало кто может это сделать"
Последний раз редактировалось VektorAB; 06.07.2010 в 11:55. |
06.07.2010, 13:09 | #5 |
Пользователь
Регистрация: 06.07.2010
Сообщений: 31
|
Да программа должна брать случайно один из этих трёх вопросов и ответы к нему. как это реализовать??? И еще где находится компонент Stringlist???
Последний раз редактировалось Artempokrowski; 06.07.2010 в 13:48. |
06.07.2010, 13:14 | #6 |
Форумчанин
Регистрация: 01.09.2009
Сообщений: 197
|
Stringlist это не компонент, а тип.
Код:
|
06.07.2010, 13:47 | #7 | |
Пользователь
Регистрация: 06.07.2010
Сообщений: 31
|
Цитата:
Что ещё должно помимо создания и уничтожения этого типа? что еще туда нужно добавить??? Чтобы туда загружался весь файл??? Последний раз редактировалось Stilet; 06.07.2010 в 13:55. |
|
06.07.2010, 13:52 | #8 |
PHP, Delphi
Форумчанин
Регистрация: 07.05.2008
Сообщений: 388
|
Создайте новый класс из нескольких полей типа TStringList и одного поля типа Integer (индекс правильного ответа) и тогда у вас будет безконечно вопросов
Мыши плакали, кололись, но продолжали жрать кактус...
мои проекты |
06.07.2010, 13:57 | #9 | |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Цитата:
теперь sl можно использовать как массив строк т.е. sl[5] даст 6-ю строку (нумерация с 0 начинается) а sl.Count даст общее число всех строк.
I'm learning to live...
|
|
06.07.2010, 20:18 | #10 |
Пользователь
Регистрация: 06.07.2010
Сообщений: 31
|
Народ всем большое спасибо за помощь)))) но ждать не стал до всего допёр сам))) Всё равно биг спс.
Последний раз редактировалось Artempokrowski; 06.07.2010 в 20:21. |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Работа с текстовым файлом в Си | Eovin | Помощь студентам | 0 | 19.05.2010 13:47 |
Работа с текстовым файлом. | annosinceva | Общие вопросы C/C++ | 0 | 25.04.2010 08:54 |
Работа с текстовым файлом | Mashul'ka | Помощь студентам | 1 | 03.06.2009 23:26 |
Работа с текстовым файлом | simka007 | Помощь студентам | 7 | 06.02.2009 14:21 |
Работа с текстовым файлом | nataly_ukr | БД в Delphi | 23 | 07.12.2007 22:13 |