![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
![]() есть такая проблема. начал писать прогу тестирования.
есть 5 полей едит собственно вопрос и 4 ответа. также есть 4 радио бутона. нужно сделать следущее записать значения полей в файл и привязать один из бутонов к правильному ответу (к одному из едитов). это нужно для того чтоб потом считывать вопросы из этого файла и собственно проводить тест. при чтении нужно чтоб поога читала вопрос и понимала что в этом вопросе правильный ответ 1 а не каойто другой... вот задача... |
#2
|
||||
|
||||
![]() Используй Ini файл для хранения теста
И там уже разберешься по ходу дела, это очнеь простая задача. Если не разберешься - пиши, ток сначала попробуй сам разобраться - намного полезней будет. THE CRACKER IS OUT THERE |
#3
|
||||
|
||||
![]() Цитата:
Еще можешь попробовать простейшую БД. Например dbf файл. |
#4
|
|||
|
|||
![]() или можешь создать текстовый файл , начальные строчки которого и есть №вопроса № ответа типа
1Морж - это хто? 11 Морж - морское животное ну или типа того, обработай строки и всё |
#5
|
||||
|
||||
![]() Или SQLite (тоже очень удобная штука, только это уже уровень не совсем для начинающих).
Если что, я помогу с SQLite разобраться. THE CRACKER IS OUT THERE |
#6
|
||||
|
||||
![]() У меня вопрос тип того но проще ток не разу не пробывал как мне сохранит значение Edit1.Text в *.txt файл????
Пробывал но не пашет вот так Код:
If SaveDialog1.Execute then Edit1.Text.SaveToFile(SaveDialog.FileName); |
#7
|
||||
|
||||
![]() С этим рахобрался но возник 2 вопрос он у меня сохраняет как просто файл хотя в Фильтре написал нужное и в ручную открывает в блокноте
|
#8
|
|||
|
|||
![]() 2 gatart
Когда-то я писал такую прогу и использовал базу данных, хотя в принципе вариантов тут много. Я поступил следующим образом. Создал таблицу со следующими полями: Вопрос, Вариант1, Вариант2, Вариант3, Вариант4 При этом в правильным всегда является первый вариант. Ну а дальше пишу процедуру, которая делает следующее: - открывает таблицу, считывает вопрос и варианты ответа - показывает вопрос - в случайном порядке показывает варианты ответа, при этом данные в таблице абсолютно не модифицируются. Меняется только порядок отображения. То есть в таблице правильным все равно остается первый вариант На а дальше делаешь сравнение если "Выбор пользователя" = Вариант1, то... |
#9
|
|||
|
|||
![]() САНЬКА
а что вот так не работает Код:
function WriteEditToFile(FileName:TFilename;TextEdit:string): boolean; var f : Textfile; begin Result := False; AssignFile(f, FileName); try Append(f); Writeln(f); Write(f, TextEdit); Result := True; finally CloseFile(f); end; end; Код:
WriteEditToFile('с:\File.txt',Edit1.text); |
#10
|
|||
|
|||
![]() тво й вариант мне очень понравился, так и предпологалось сделать...
у мну уже есть наработка, побщаемся? |
#11
|
|||
|
|||
![]() 274-874-377 - ася. Всегда в инвизибл, так что стучи
|