Как сделать тест в дельфи
Создание файла (txt) теста через Delphi
Вложения
проект 2.0.1.rar (187.4 Кб, 16 просмотров) |
Создание програмы-теста на DELPHI
Помогите создать тест на Делфи про Строковый тип данных Паскаля=))
Чтение с txt файла и запись в StringGrid Delphi 7
Так как только учусь не могу понять как записать правильно. Читать оно читает, а данные не знаю как.
Создание и сохранение txt файла.
У меня не получается с объектом TFileStream. Помогите, чтобы записалось в файл(допустим.
Поиск и удаление текста в *.txt Delphi, перезапись файла
Здравствуйте, подскажите пожалуйста! Вопрос пустяковый если честно но разобраться не могу :cry.
Добавлено через 1 минуту
И убери эти вторые begin..end из указаной процедуры.
Так, ну в целом, для интересующихся, имеем вот такую функцию записи в файл:
По делу: лучше не использовать просто название файла, если мне память не изменяет (а она может изменять),то седьмая делфи отсылает в таком случае в папку system32:
Это будет однозначное указание на файл в той же директории, что и исполняемый файл. Хотя, конечно, мне могут сказать, что и первый вариант правильный и я спорить не буду.
Итого, я бы рекомендовал сделать так, это может дать результат:
Небольшая оптимизация: все, что имеет в комментариях слово «формирование» лучше перенести в обработчик OnResize формы. Изменение положения элементов логичнее обрабатывать там.
Проверить все это не могу, выбивает исключение при нажатии кнопки «следующий», а вылавливать его сейчас нет времени.
Препод сказал сделать с TXT форматом, чтобы типа любой «неуч» мог изменить его структуру
Добавлено через 1 минуту
Внёс данные коррективы, но успеха 0, к сожалению(
Вложения
проект 2.0.2.rar (188.8 Кб, 19 просмотров) |
Разберем процедуру Button2Click поэтапно:
Ок, тут вопросов нет. Хорошая проверка корректности.
В этом куске кода каждая вторая строчка вызывает вопросы. Переменная STEP не выполняет своей функции вообще.
В этом куске у нас полная солянка из значений. Вообще непонятно, какому тесту и что мы присваиваем.
Тут понятно и без лишних слов.
Вердикт: процедура непонятно что делает. Даже автор не знает, что там происходит, такое ощущение, что это попытка с помощью урагана на тракторном заводе собрать танк Т-90.
Внимание! В результате выполнения данного кода неквалифицированным персоналом есть вероятность случайного зарождения кибернетической жизни с угрозой дальнейшего захвата человечества. Рекомендуется удалить весь код процедуры без возможности восстановления и попробовать написать все заново, используя основы алгоритмики. За возможность появления в вашей квартире Джона Коннора, Сары Коннор и терминатора с целью устранения процедуры автор поста ответственности не несет.
Практическая работа в Дельфи. Создание теста
Преподаватель: Т.А. Крашенинникова
УНИВЕРСАЛЬНАЯ ПРОГРАММА – ТЕСТ.
Спроектируйте форму «Регистрация» (см. рис.1)
в кнопку Отмена записать код: Close ;
в кнопку Далее записать код:
If Edit2.Text=’123′ then form2.Show;
If Edit2.Text=’555′ then form3.Show;
If Edit2.Text=» then MessageDlg(‘ неверно введен пароль ‘, mtInformation,
Создать вторую форму «Администратор» (см. рис. 2)
На форме разместить таблицы, которые необходимо подключить.
Запустить приложение и заполнить несколькими вопросами и ответами к ним.
3. Создать третью форму «Тест» (см. рис. 3)
procedure TForm3.RadioButton1Click(Sender: TObject);
if RadioButton1.Checked = true then
procedure TForm3.RadioButton2Click(Sender: TObject);
if RadioButton2.Checked = true then
procedure TForm3.RadioButton3Click(Sender: TObject);
if RadioButton3.Checked = true then
В кнопке Далее прописать следующий код:
IF Edit1.Text=DBEdit5.Text Then
while not Table1.Eof DO
наращиваем счётчик баллов
делаем перемещение по таблице далее
присваиваем четвертой метке счетчик баллов
выполнить собственное оформление теста
выбрать предметную области и составить по данной область 20 вопросов
произвести тестирование программы
можно внести собственные новшества в программу
показать программу учителю
Инклюзия в современном обществе и ее роль в социализации
идёт регистрация Успейте записаться до 2 февраля!
Номер материала: ДБ-575378
Не нашли то что искали?
Вам будут интересны эти курсы:
Оставьте свой комментарий
✅ На балансе занятий — 1
Ответственность за разрешение любых спорных моментов, касающихся самих материалов и их содержания, берут на себя пользователи, разместившие материал на сайте. Однако администрация сайта готова оказать всяческую поддержку в решении любых вопросов, связанных с работой и содержанием сайта. Если Вы заметили, что на данном сайте незаконно используются материалы, сообщите об этом администрации сайта через форму обратной связи.
Все материалы, размещенные на сайте, созданы авторами сайта либо размещены пользователями сайта и представлены на сайте исключительно для ознакомления. Авторские права на материалы принадлежат их законным авторам. Частичное или полное копирование материалов сайта без письменного разрешения администрации сайта запрещено! Мнение администрации может не совпадать с точкой зрения авторов.
Практическая работа № 35 «Тест»
Delphi site: daily Delphi-news, documentation, articles, review, interview, computer humor.
Проект должен содержать последовательность форм, реализующих диалог с тестируемым учащимся.
На первой форме происходит регистрация учащегося.
Фрагмент программы (unitl): uses Unit2;
На второй форме предлагается выбрать один из тестов.
Фрагмент программы (unit2):
На третьей форме предлагается проути тест по информатике.
Фрагмент программы (unit3): uses Unit4, Unit2;
if (Form3.Edit1.Text=’монитор’) or (Form3.Edit1.Text=’Монитор’) or
(Form3.Edit1.Text=’МОНИТОР’) then k:=k+1; if (Form3.Edit2.Text=’Клавиатура’) or (Form3.Edit2.Text=’клавиатура’)
or (Form3.Edit2.Text=’КЛАВИАТУРА’) then k:=k+1; if Form3.Edit3.Text=’8′ then k:=k+1; Form4.Label2.Caption:=IntToStr(k); if k=0 then Form4.Label1.Caption:=’Очень плохо’ else
if k=1 then Form4.Label1.Caption:=’Плохо’ else
if k=2 then Form4.Label1.Caption:=’Хорошо’ else
На следующей форме отображается результат тестирования и предложение о промотре ответа.
Фрагмент программы (unit4): uses Unit1, Unit5, Unit3, Unit2;
На следующей форме отображаются правильные ответы.
Фрагмент программы (unit5):
Если учащийся выбрал тест по математике, то ему предлагается проверить свои знания таблицы умножения. На следующей форме случайным образом выбираются числа. Учащийся должен ввести значение произведения в текстовое поле. С помощью кнопки «проверка» выясняется правильность введенного ответа. Если ответ правильный, то можно сгенерировать следующий пример. После нескольких примеров можно проверить свой рейтинг.
Фрагмент программы (unit6): uses Unit7, Unitl;
При нажатии на кнопке «Ваш рейтинг» на следующей форме появляется результаты рейтенга. Тестирование можно завершить.
Фрагмент программы (unit7): uses Unit6;
Обратите внимание на подключение модулей в строке Uses. Таким образом, происходит обращение к соответствующей форме. Для отображения формы используется функция
Данная функция позволяет показывать форму в работе режима диалога.
Опросник на Delphi
Тест-опросник
Собираюсь создать тест-опросник для проекта. Несколько вопросов и по три варианта ответа на.
программа-опросник
Здравствуйте! Помогите, пожалуйста. Надо: Написать программу-опросник, предлагающую нескольким.
Опросник
ТОлько начал изучать php в общем задача следующая. Мне не нужен код только опишите алгоритм как все.
Опросник
Добрый день. есть форма логина, как лучше поменять панель после удачного входа? и как лучше.
Помогите пожалуйста, у меня на каждом вопросе должно выводить по 3 варианта ответа. 1 вопрос выводит 3 варианта, последующие по 2 варианта, в чем проблема? Код еще очень сырой. Заранее извиняюсь если что-то ввел некорректно, я тут новенький
Вложения
Test.rar (2.0 Кб, 8 просмотров) |
Благодарю за помощь, но так как я еще мало что понимаю в делфи, прошу меня извинить если потратил ваше время, но вы не могли бы сделать как мой код или максимум к нему приближенный.
Желательно чтобы форма была такой
Решение
_Sky_Angel_, зря ты упорствуешь и жёстко прописываешь все вопросы и ответы прямо в коде.
да ещё так хардкорно.
Но ладно, это дело твоё.
я поправил чуток код.
проверяй
Oprosnik.rar
выложу ещё код из архива прямо тут, для наглядности/удобства
Это точно, лепить текст опросника в код, подход дилетантский.
Да и вообще.
Если это учебный проект, то ладно. Но если для практического применения, зачем нужен Delphi?
Красиво, с картинками и тестами любой сложности, это можно сделать на любом игровом движке.
Их навалом и даже абсолютно бесплатных.
Что касается самой программы, то нужно писать не сам тест а универсальный движок, чтобы проигрывал тест любой сложности. Это не так сложно как кажется.
пожалуйста!
ладно. тогда расскажи, вот вопрос 2, например,
сколько нужно прибавлять, если выбрали 0й вариант? Сколько нужно прибавлять, если выбрали вариант «1» и сколько, если последний вариант?
Мне это непонятно.
вообще не проблема.
массив C выбрасывай напрочь. везде.
Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.
Опросник
Хочу сделать опросник, чтобы в нем была такая фишка: если голосовать за один вариант, то.
Анкета опросник
Создал анкету как по ссылке http://ocnova.ru/opros-v-word-za-5-shagov-2/. Но такой вопрос, я вбил.
Программа- опросник
Однооконная рограмма,в которой можно ставить галочки у каждого из 7 строк заранее вписанного текста.
Создание Тест проекта
Вот состряпал самостоятельно тест с использованием INI файлов, признаюсь, что это коряво и некрасиво, готов к критике,
я пока ещё начинающий, делал с теми малыми знаниями, что есть. Сам файл EXE прикреплён сюда. Подскажите, где тут у меня в коде неправильный подход или лишнее что-то, как это сделали бы вы профессионально?
Вложения
Test-INI.rar (166.3 Кб, 21 просмотров) |
Создание тест на delphi с ini
Помогите сделать проект который будет брать тест с ини файла и читать его по разному(в случайном.
создание проекта
создать приложение. в массиве который содержаться результаты измерении температуры воздуха, которые.
Создание компонента из проекта
Добрый день. Возникла небольшая проблема. Необходимо создать компонент из готового проекта. В.
Создание проекта с визуальными компонентами
написать программу которая через определенный промежуток времени выходит на экран какой-либо.
Перестань писать говнокод. Всегда разделяй задачу на подзадачи и подподзадачи. Повторяющиеся действия делай один раз с помощью методов с параметрами.
И никогда на пиши вот так:
Constantin Cat, Благодарю за ваш вариант решения задачи! Интересно посмотреть иные варианты. Ждём ещё варианты от программистов, как на их взгляд это должно быть правильно и в чём недостатки тех методов, которые уже здесь приведены.
Добавлено через 1 час 10 минут
Я изначально поставил себе задачу, не подглядывая ни в какие чужие проекты, реализовать самостоятельно проект ТЕСТ, так как я это себе представляю возможным, основываясь на тех знаниях, которые я успел изучить пока что. В Реализации построения логических связей для данной задачи я обрисовал себе такой принцип:
1. Выстроить программно логический элемент, у которого четыре входа двоичной системы 01, и один выход счётчик, который увеличивает значение на +1 при условии, когда хотя бы один из четырёх входов будет иметь логический 1.
Выход счётчика подаётся на вход блока условий. Он содержит условие: Как только значение счётчика достигнет 5, сбрасываем все логические элементы на 0 и цикл повторяется заново. Выстроив такую логику, я понял, что задача решена, осталось только привинтить к этой логике форму, компоненты и сообщения по событиям.
2. Изначально входило в план использовать ini файлы, так они умеют работать с разными типами переменных. Но самое важное, чтобы в них можно было редактировать вопросы, ответы и ставить флаги. Но для удобства я добавил возможность редактировать их прямо из формы.
3. Реализовать метод смены файлов с вопросами. Сделал пять процедур, в каждой их которых есть вызов конструктора для переменной экземпляра класса TIniFile, но инициализированных под разные файлы. Таким образом удалось решить и ещё задачу со считыванием и сохранением вопросов и ответов из текущего значения переменной.