Форум программистов, компьютерный форум, киберфорум
Наши страницы

С++ для начинающих

Войти
Регистрация
Восстановить пароль
 
sezam
1 / 1 / 0
Регистрация: 31.01.2011
Сообщений: 42
#1

Народ спасайте, на счет теста - C++

10.09.2012, 23:38. Просмотров 561. Ответов 8
Метки нет (Все метки)

Парни спасайте. Нужно узнать откуда в этой программе берутся вопросы, картинки и все остальное для теста. Я понимаю что из файлов
<Classes.hpp>
<Controls.hpp>
<StdCntrl.hpp>
<Forms.hpp>
<ExtCtrls.hpp>
<Dialogs.hpp>
<Graphics.hpp>

а как эти файлы написать, и самое главное, чтов них писать?
Помогите очень прошу, вопрос жизни и смерти.

[CPP]
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
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
#include <vel.h>
#pragma hdrstop
#include "ExamMain.h"
#include <stdio.h>
#include <jpeg.hpp
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1
intfint level[4];
AnsiString mes[4];
TVopros Vopros;
int otv;
int right=0;
int GetInt(int f);
int GetString(int f, AnsiString *st);
__fastcall TForm1::TForm1(TComponenet*Owner)
  :TForm(Ownner)
{
int i;
int left<10;
for (i=0; i<4; i++)
{
RadioButton[i]=new TRadioButton(Form1);
RadioButton[i]->Parent=Form1;
RadioButton[i]->Left=Left;
RadioButton[i]->Width=Form1->ClientWidth-lefy20;
RadioButton[i]->Visible=false;
RadioButton[i]->Checked=false;
RadioButton[i]->OnClick=RadioButtonClick;
}
{
void__fastcall TForm1::FormActivate(TObject*Sender)
{
AnsiString st;
int n=ParamCount();
if( n<1)
{
Label1->Font->Style=TFontStyles()<<fsBold;
Label1->Caption="В коммандной строке запуска нужно задать имя файла текста";
Button1->Tag=2;
return
}
f=FileOpen(ParamStr(1),fmOpenRead);
if(f=-1);
{
Label1->Font->Style=TFontStyles()<<fsBold;
Label1->Caption="Ошибка доступа к файлу текста"+ParamStr(1);
Button1->Tag=2;
return;
}
GetString(f,&st);
Form1->Caption=st;
GetString(f,&st);
Label1->Width=Form1->ClientWidth-Label1->Left-20;
Label->Caption=st;
Label1->Autosize=true;
for (int i:=0; i<4; i++)
{
level[i]=GetInt(f);
GetSTring(f,&mes[i]);
}
{
bool GetVopros(TVopros*v)
{
AnsiString st;
int p; 
if(GetString(f,&(v->Vopr))!=0)
{
v->nOtv=GetInt(f);
v->rOtv=GetInt(f);
p   =GetInt(f);
if(p)
GetString(f,&(v->Lmg));
else v->Img="";
for (int i=0; i<v->nOtv; I++)
{
GetString(f,&(v->Otv[i]));
}
return true;
}
else return false;
}
void__fastcall TForm1::ShowVopros(TVopros v)
{
int top;
int i;
Label1->Width=ClientWidth-Label1->Left -20;
Label1->Caption=v.Vopr;
Label1->Autosize=true;
if (v.lmg !="")
{
int RehHeight=Button1->Top
-(Label1->Top+Label1->Height+10)
-(RadioButton[1]->height+10)*v.nOtv;
Image1->Top=Label1->Top+Label1->Height+10;
Image->Visible=false;
Image1->Autosize=true;
Image1->Picture->LoadFromFile(v.img);
if(Image1->Height>RegHeight)
{
Image1->Autosize=false;
Image1->Height=RegHeight;
Image1->Proportional=true;
}
Image1->Visible=true;
top=image1->Top+Image1->Height+10;
}
 
{
else
top=Label1->Top+Label1->Height+10;
for (i=0; i<v.nOtv;i++)
{
RadioButton[i]->Top=top;
RadioButton[i]->Caption=v.Otv[i];
RadioButton[i]->Visible=true;
RadioButton[i]->Checked=false;
top+=20;
}
}
void__fastcall TForm1::RadioButtonClick(TObject*Sender)
{
inti=0;
while ( !RadioButton[i]->Checked)
i++;
otv=i+1;
Button1->Enabled=true;
}
void__fastcallTForm1::EraseVopros(void)
{
Image1->Visible=false;
for(inti=0; i<4,i++)
{
RadioButton[i]->Visible=false;
RadioButton[i]->Checked=false;
}
Button1->Enabled=false;
}
void__fastcallTForm1::ButtonClick(TObject*Sender)
{
bool ok;
switch (Button1->Tag)
{
case 0;
GetVopros(&Vopros);
ShowVopros(Vopros);
Button1->Caption="Дальше";
Button1->Enabled=false;
Button1->Tag=1;
break;
case 1;
if(otv=Vopros.rOtv)
right++;
EraseVopros();
ok=GetVopros(&Vopros);
if(ok)
ShowVopros(VOpros);
else
{
FileClose(f);
AnsiString st;
int i;
Form1->Caption="Результат тестирования";
st.printf("Правильных Ответов: %i\n",right);
i=0;
while((right<level[i]&&(i<3))
i++;
st=st+mes[i];
Label1->Caption=st;
Button1->Caption="OK";
Button1->Enabled=true;
Button1->Tag=2;
}
break;
case2;
Form1->Close();
}
}
int GetSTring(int f, AnsiString *st)
{
unsigned char buf[300];
unsigned char *p=buf;
int n;
int len=0;
n=FileRead(f,p,l);
break;
}
*p='\0';
if (len !=0)
st->printf("%s",buf);
return len;
}
int GetInt(int f)
{
char buf[20];
char *p=buf;
int n;
int a;
n=FileRead(f,p,l);
while((*p>='0')&&(*p<='9')&&(n>0))
{
p++;
n=FileRead(f,p,l);
}
if(*p=='\r')
n=FileRead(f,p,l);
*p='\0';
sscanf(buf,"%i",&a);
return a;
}
#ifndef ExamMainH
#define ExamMainH
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCntrl.hpp>
#include <Forms.hpp>
#include <ExtCtrls.hpp>
#include <Dialogs.hpp>
#include <Graphics.hpp>
struct TVopros
{
AnsiString Vopr;
AnsiString Img;
AnsiSTring Otv{4};
int nOtv;
int rOtv;
};
class TForm1:public TForm
{
_published;
TLabel*Label1;
TImage*Image1;
TButton*Button1;
void__fastcall FormActivate(TObjects*Sender);
void_fastcall ButtonClick(TObject*Sender);
private;
TRadioButton*RadioButton[4];
void__fastcall FormActivate(TObject*Sender);
void__fastcall ShowVopros(TVopros v);
void__fastcall EraseVopros(void);
public;
__fastcall TForm1(TComponent* Owner);
};
extern PACKAGE TForm1*Form1;
#endif
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
10.09.2012, 23:38
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Народ спасайте, на счет теста (C++):

Чтения структуры из файла (описать структуру с именем "ORDER": "счет плательщика"; "счет получателя"; "сумма, переводится банковской операцией") - C++
Описать структуру с именем &quot;ORDER&quot;, содержащий следующие поля: &quot;Счет плательщика&quot;; &quot;Счет получателя&quot;; &quot;Сумма, переводится банковской...

Ну спасайте! - C++
Люди надо сгенерировать и отсортировать сначала по строкам, а потом по столбцам! Хелп!

Спасайте нуба - C++
Нужно до 7 утра уже сегодня видимо написать одну из трех программ. Судоку, Покер, Оргонайзер. При помощи классов. кто...

Работа с файлами. Спасайте) - C++
Здравствуйте, очень нужна помощь. Есть тест, занесенный в текстовый файл () следующей структуры: строка1 - номер вопроса, строка2 - вопрос,...

Спасайте х( Простое задание на функции, сумма квадратов чисел - C++
Дан интервал натуральных чисел . Напечатать на экране все те числа, которые принадлежат этому интервалу и которые можно выразить как сумму...

Просто позарез необходима поммощь! Молю, спасайте! Завтра зачёт... - C++
такая прогарамма о графах и выскакивает всего одна ошибка на 1-ю строчку(#include &quot;stdafx.h&quot;) Не удается открыть файл include: stdafx.h:...

8
defer
秘密
555 / 235 / 3
Регистрация: 29.11.2010
Сообщений: 783
10.09.2012, 23:44 #2
Цитата Сообщение от sezam Посмотреть сообщение
Я понимаю что из файлов
Не правильно понимаете, вопросы, картинки и все остальное для теста лежит где-то на жестком диске
0
HighPredator
5544 / 1857 / 346
Регистрация: 10.12.2010
Сообщений: 5,479
Записей в блоге: 2
10.09.2012, 23:44 #3
Цитата Сообщение от sezam Посмотреть сообщение
Я понимаю что из файлов
<Classes.hpp>
<Controls.hpp>
<StdCntrl.hpp>
<Forms.hpp>
<ExtCtrls.hpp>
<Dialogs.hpp>
<Graphics.hpp>
Неверно понимаете. Вопросы загружаются из файла, имя которого передается через параметр командной строки. В этом же файле скорее всего лежат и пути к картинкам.
0
sezam
1 / 1 / 0
Регистрация: 31.01.2011
Сообщений: 42
11.09.2012, 09:38  [ТС] #4
А как указать этот файл? И в каком он формате должен быть?
0
Kukurudza
105 / 86 / 6
Регистрация: 29.08.2012
Сообщений: 539
11.09.2012, 10:44 #5
начинай читать страуструпа, после него что нить про графику. поймешь. займет с пол года. надо было вовремя ходить на лекции и практики...
0
co6ak
Кошковед
409 / 502 / 29
Регистрация: 12.04.2010
Сообщений: 1,392
11.09.2012, 11:15 #6
тебе при запуске программа должна задавать вопрос: Label1->Caption="В коммандной строке запуска нужно задать имя файла текста";
теоретически, это файл *.dfm и запуск проги будет prog.exe -filename.dfm
0
Герц
524 / 341 / 4
Регистрация: 05.11.2010
Сообщений: 1,077
Записей в блоге: 1
11.09.2012, 11:31 #7
Как же это может быть dfm, если dfm это delphi form, и разбирает его какая-то утилита, лежащая недалеко от компилятора делфи?
0
sezam
1 / 1 / 0
Регистрация: 31.01.2011
Сообщений: 42
11.09.2012, 11:58  [ТС] #8
Кажется разобрался, спасибо. А что на счет вот этого? Для чего это нужно? Просто при запуске, у меня вылетают ошибки "Cannot open include file <названия>". Как сделать так чтобы он смог их открыть?

#include <vel.h>
#pragma hdrstop
#include "ExamMain.h"
#include <stdio.h>
#include <jpeg.hpp
#pragma package(smart_init)
#pragma resource "*.dfm"
0
HighPredator
5544 / 1857 / 346
Регистрация: 10.12.2010
Сообщений: 5,479
Записей в блоге: 2
11.09.2012, 17:54 #9
sezam, вы пытаетесь компилировать код С++ Builder-а в другой среде?
0
11.09.2012, 17:54
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
11.09.2012, 17:54
Привет! Вот еще темы с ответами:

Создание программы-теста(оценивание знаний) и вывод теста в форму, с подсчетом оценки(балл за правильный ответ) - C++ Builder
Здравствуйте, уважаемые форумчане. У меня назрел еще один вопрос: -Есть задание написать приложение, которое осуществляет...

Написание теста Кагана / теста Мюнстерберга с использованием БД - Delphi БД
Подскажите, пожалуйста, как написать тест Кагана, Мюнстерберга используя базы данных!!! ^_^

Отобразить изображение на определенное задание из теста из теста - Delphi
Как отобразить изображение на определенный вопрос из теста? Уже 3-ий час сижу не могу понять.

Спасайте! - Pascal ABC
Кому не лень помогите... не понял вообще циклы... .Среди четырёхзначных чисел выбрать те, у которых: a)все четыре цифры различны...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
9
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru