Подскажите как сделать тест

@slava.seraph · Регистрация: 31.05.2012

Студворк — интернет-сервис помощи студентам

Делаю тест Да или нет.Поискал в нете нашел только вот эту статью http://h-l-l.ru/publ/28-1-0-114.
проблема в том что я подсчитал что мне нужно создать около 64 Form

Хочу спросить можно это сделать по другому в 1 Form ?

@Gremlin · 31.05.2012, 15:58

зачем 64 формы???
опиши немного по подробней свой тест

@BRcr · 31.05.2012, 16:00

Здесь на форуме этих тестеров делалось уже... просто поищи.

И откуда такой вывод насчет количества форм? Все на одной делается, просто информация на ней меняется.

@slava.seraph · 31.05.2012, 16:13 **[ТС]**

Вот я не могу понять как мне сделать на одно форме?у меня есть Lable на котором пишется вопрос и две кнопики да,нет.При нажатии на любую кнопку на Lable появляется новый вопрос,и так далее. Я понимаю как должно это выглядеть и работать но как написать в коде не понимаю так как C Builder можно сказать практически не знаю.Если не трудно можете кунуть сылку или кусок кода?

@slava.seraph · 31.05.2012, 16:30 **[ТС]**

Грубо говоря вот по такой блок схеме.
Извеняюсь что такая корявая.

@slava.seraph · 31.05.2012, 19:16 **[ТС]**

Неужели никто не может подсказать как это написать???

@Gremlin · 31.05.2012, 19:29

у тебя следующий вопрос зависит от предыдущего? да? ))))))

@slava.seraph · 31.05.2012, 19:35 **[ТС]**

Ну да.

cpp_developer · 31.05.2012, 19:36

Например, при нажатии на Button1 (ButtonStart, заголовок кнопки "Начать тестирование").

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
if(MessageBox(0,"Начать тестирования?","Тест",MB_YESNO)==IDYES) {
  if(MessageBox(0,"Вы slava.seraph?","Вопрос 1",MB_YESNO)==IDYES) {
    if(MessageBox(0,"Вы уверены?","Вопрос 2",MB_YESNO)==IDYES) {
      if(MessageBox(0,"Вы действительно уверены?","Вопрос 3",MB_YESNO)==IDYES) {
        ShowMessage("Вы таки slava.seraph...");
      }
    }
  }
}
else if(MessageBox(0,"Начать тестирования?","Тест",MB_YESNO)==IDNO) {
  if(MessageBox(0,"Вы не slava.seraph?","Вопрос 1",MB_YESNO)==IDNO) {
    if(MessageBox(0,"Вы уверены, что не slava.seraph?","Вопрос 2",MB_YESNO)==IDNO) {
      if(MessageBox(0,"Вы действительно не slava.seraph?","Вопрос 3",MB_YESNO)==IDNO) {
        ShowMessage("Да... Вы таки не slava.seraph...");
      }
    }
  }
}

Дальнейшие всевозможные ветвления - по образцу.

@slava.seraph · 31.05.2012, 20:01 **[ТС]**

спсибо большое.
А можно както подругому без MessageBox?

@Gremlin · 31.05.2012, 20:02

структура файла с вопросами
ВОПРОС(TAB)(индекс строки со следующим вопросом, если ответили ДА)(TAB)(если ответили НЕТ)

C++
1
2
3
4
5
6
7
У вас есть дети?    3   1
А хотели бы?   6   2
Повторяю вопрос: А хотели бы?    6   2
Вы люите своих детей (ребенка)? 6   4
Давайте попробуем заново: У вас есть дети?    3   5
Зря, зря, давайте попробуем заново: У вас есть дети?    3   1
Спасибо, ВСЕ!!!, начинаем сначала )))))))))))) 0   0

@Avazart · 31.05.2012, 20:02

Ну если очень приблизительно то как то так:

@Gremlin · 31.05.2012, 20:03

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
String TAB = "  ";
TStringList *list = new TStringList;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
    String f = ExtractFilePath(Application->ExeName) + "voprosi.txt";
    list->LoadFromFile(f);
 
    int vop = 0;
    Label1->Tag = vop;
    Label1->Caption = list->Strings[vop].SubString(1, list->Strings[vop].Pos(TAB) - 1);
}
//---------------------------------------------------------------------------
void MyFunction(bool otvet)
{
    int vop_inxex = Form1->Label1->Tag;
    String temp = list->Strings[vop_inxex];
    temp = temp.SubString(temp.Pos(TAB) + 1, temp.Length());
    int yes = temp.SubString(1, temp.Pos(TAB)-1).ToInt();
    int no  = temp.SubString(temp.Pos(TAB) + 1, temp.Length()).ToInt();
 
    int vop = 0;
    if(otvet == true)
    {
        vop = yes;
    }
    else
    {
        vop = no;
    }
 
    Form1->Label1->Tag = vop;
    Form1->Label1->Caption = list->Strings[vop].SubString(1, list->Strings[vop].Pos(TAB) - 1);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
    MyFunction(true);    
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
     MyFunction(false);    
}
//---------------------------------------------------------------------------

@slava.seraph · 31.05.2012, 20:16 **[ТС]**

о большое спасибо.
еще такой маленький вопросик если мне нужно будет сделать возврат к какомуту сообщению,как это можно сделать?

@Gremlin · 31.05.2012, 20:23

Подскажите как сделать тест там же написанно например (Повторяю вопрос: А хотели бы? 6 2)

Новые блоги и статьи Все статьи Все блоги /
Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .	Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL3_image 8Observer8 27.01.2026 Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .	Влияние грибов на сукцессию anaschu 26.01.2026 Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .
Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android 8Observer8 26.01.2026 Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .	Установка Android SDK, NDK, JDK, CMake и т.д. 8Observer8 25.01.2026 Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .	Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf 8Observer8 25.01.2026 Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .	Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly 8Observer8 24.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .

@slava.seraph 0 / 0 / 0 Регистрация: 31.05.2012 Сообщений: 9

	Подскажите как сделать тест 31.05.2012, 15:52. Показов 13854. Ответов 14 Метки нет (Все метки) Делаю тест Да или нет.Поискал в нете нашел только вот эту статью http://h-l-l.ru/publ/28-1-0-114. проблема в том что я подсчитал что мне нужно создать около 64 Form Хочу спросить можно это сделать по другому в 1 Form ? 0

@Gremlin 519 / 307 / 58 Регистрация: 30.07.2008 Сообщений: 607
	31.05.2012, 15:58
	зачем 64 формы??? опиши немного по подробней свой тест 0

@BRcr 4043 / 2333 / 292 Регистрация: 03.02.2011 Сообщений: 5,066 Записей в блоге: 10
	31.05.2012, 16:00
	Здесь на форуме этих тестеров делалось уже... просто поищи. И откуда такой вывод насчет количества форм? Все на одной делается, просто информация на ней меняется. 0

@slava.seraph 0 / 0 / 0 Регистрация: 31.05.2012 Сообщений: 9
	31.05.2012, 16:13 [ТС]
	Вот я не могу понять как мне сделать на одно форме?у меня есть Lable на котором пишется вопрос и две кнопики да,нет.При нажатии на любую кнопку на Lable появляется новый вопрос,и так далее. Я понимаю как должно это выглядеть и работать но как написать в коде не понимаю так как C Builder можно сказать практически не знаю.Если не трудно можете кунуть сылку или кусок кода? 0

@slava.seraph 0 / 0 / 0 Регистрация: 31.05.2012 Сообщений: 9
	31.05.2012, 16:30 [ТС]
	Грубо говоря вот по такой блок схеме. Извеняюсь что такая корявая. Миниатюры 0

@slava.seraph 0 / 0 / 0 Регистрация: 31.05.2012 Сообщений: 9
	31.05.2012, 19:16 [ТС]
	Неужели никто не может подсказать как это написать??? 0

@Gremlin 519 / 307 / 58 Регистрация: 30.07.2008 Сообщений: 607
	31.05.2012, 19:29
	у тебя следующий вопрос зависит от предыдущего? да? )))))) 0

@slava.seraph 0 / 0 / 0 Регистрация: 31.05.2012 Сообщений: 9
	31.05.2012, 19:35 [ТС]
	Ну да. 0

@slava.seraph 0 / 0 / 0 Регистрация: 31.05.2012 Сообщений: 9
	31.05.2012, 20:01 [ТС]
	спсибо большое. А можно както подругому без MessageBox? 0

@slava.seraph 0 / 0 / 0 Регистрация: 31.05.2012 Сообщений: 9
	31.05.2012, 20:16 [ТС]
	о большое спасибо. еще такой маленький вопросик если мне нужно будет сделать возврат к какомуту сообщению,как это можно сделать? 0

@Gremlin 519 / 307 / 58 Регистрация: 30.07.2008 Сообщений: 607
	31.05.2012, 20:23
	Подскажите как сделать тест там же написанно например (Повторяю вопрос: А хотели бы? 6 2) 0