Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 19.02.2011, 01:15   #1
Эммануэль
Пользователь
 
Регистрация: 19.12.2010
Сообщений: 34
Печаль Создание проекта Тест

Уважаемые жители форума! Обращаюсь к вам с большой надеждой на помощь. Мне очень хотелось самой выполнить свою лабораторную работу, но не хватило опыта, и поэтому я здесь. Помогите ради христа! Больше не могу!
Перерыла все форумы, но так и не нашла работу, похожую на мою. А задание следующее:
Тема «Многооконное приложение»
Создание приложения «Тест». Написать программу, в которой будут связаны между собой соответствующим образом несколько форм (не менее 10). Разработать тест по информатике.
На форуме конечно много тестов, но все они выполнены на одной форме, а переделать их так, чтобы они располагались на нескольких формах, у меня к моему стыду, не хватает интеллекта.
Мои наработки здесь
Большие затруднения вызывает написание кода на формах. Спросить у преподавателя нет возможности – он на больничном.
Буду очень благодарна!
Вложения
Тип файла: rar Моя лаба ТЕСТ.rar (304.0 Кб, 22 просмотров)
Эммануэль вне форума Ответить с цитированием
Старый 19.02.2011, 02:16   #2
asmodey1
Подтвердите свой е-майл
 
Регистрация: 19.12.2010
Сообщений: 808
По умолчанию

Есть такой раздел - "Помощь студентам".
Или у вас со зрением нелады ?
А еще - "Фриланс", там же и благодарности принимают...
asmodey1 вне форума Ответить с цитированием
Старый 19.02.2011, 02:21   #3
ArtGrek
DelphiProger
Участник клуба
 
Аватар для ArtGrek
 
Регистрация: 14.11.2010
Сообщений: 1,023
По умолчанию

только из любопытства скачал твои проект,
но в нем все как ожидалось, вернее ничего
10 Form один в один повторяюшие друг друга
Код:
...
    Label1: TLabel;
    Label2: TLabel;
    Button1: TButton;
...
procedure TFormX.Button1Click(Sender: TObject);
begin
formX.show;
formX.visible:=false;
end;
...
но зато какие слова, чуть ли не поема
Уважаемые, с большой надеждой, очень хотелось, не хватило опыта,
Помогите ради христа! Больше не могу!,
Перерыла все, но так и не нашла, А задание следующее:
Зделаите мне лабороторную
у меня к моему стыду, не хватает интеллекта.
Большие затруднения вызывает сесть и подумать
Спросить у преподавателя нет возможности(времени)

и по делу
тест, значит должны быть вопросы и ответы
вопросы можно в Label
ответы если в ручную то в Edit, или CheckBox или RadioButton
Код:
в ButtonOnClick пишеш
if выбраныи ответ верныи then
begin
  formX.show;
  formX.visible:=false;
end;
ответы и вопрош лучше хранить в фаиле, а при запуске загружать
Код:
TStrigListAnswers.LoadFromFile
TStringListQuestion.LoadFromFile
пока все
VirusN13
ArtGrek вне форума Ответить с цитированием
Старый 19.02.2011, 10:16   #4
Эммануэль
Пользователь
 
Регистрация: 19.12.2010
Сообщений: 34
По умолчанию

Здравствуйте! Можно я здесь же отвечу?
Ну зачем же так грубо. Со зрением у меня лады.
Я забыла сказать, что у меня вопросы и ответы вначале действительно были в файле. Но я подумала, что код будет проще будет, если я пропишу их вручную в лэйблы.
Я правильно поняла что на каждой из форм должны быть: не три , а один один label, три radiobuttona и один button?

А как прописать что выбранный ответ правильный (if выбраныи ответ верныи then).
Эммануэль вне форума Ответить с цитированием
Старый 19.02.2011, 15:00   #5
ArtGrek
DelphiProger
Участник клуба
 
Аватар для ArtGrek
 
Регистрация: 14.11.2010
Сообщений: 1,023
По умолчанию

Код:
myMass: array [1..10] of integer;
создаи массив из индексов, в котором запиши все индексы правельных ответов
а потом сравниваи
Код:
if выбранный ответ.Index = myMass[1] then....
VirusN13
ArtGrek вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Создание интернет проекта veryprosto Фриланс 4 14.01.2011 02:20
Создание проекта c++ Nitrino Общие вопросы C/C++ 7 11.10.2009 21:08
Создание проекта Cakeinpanic Общие вопросы C/C++ 21 31.08.2009 20:45
Создание веб-проекта. d-funk Фриланс 2 12.01.2009 18:21
Создание игрового проекта Medium Gamedev - cоздание игр: Unity, OpenGL, DirectX 1 21.06.2008 21:31