![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
![]() Всем доброго времени суток. Суть вот в чем - Дан типизированный файл для хранения информации о тесте, который сохраняет в одну запись количество вопросов, номер текущего вопроса, варианты ответов и правильный ответ.
Вопрос: Раз уж я выбрал 1 запись для хранения всего, как мне теперь добавить возможность удаления вопросов? Поясню кодом: Вот как у меня идет вопрос в тесте Код:
...... const NQ=100;//максимальное число вопросов ...... type t_Test=record QW:array[1..NQ] of String[200]; //массив номера вопроса end; var Test:t_Test; FTest:File of t_Test; //файл для создания теста n:byte; //текущий вопрос k:byte; //количество вопросов Над кнопкой добавить вопрос я долго не думал Код:
k:=k+1; label1.Caption:=intTostr(K); А вот как теперь удалить текущий вопрос из теста? Код:
Test.QW[n].delete ??? Последний раз редактировалось whizzkey, 29.10.2010 в 15:43. |