Модераторы: Poseidon
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Тест, Помогите создать красивый тест. 
:(
    Опции темы
vovan430
  Дата 6.11.2005, 16:56 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 70
Регистрация: 13.8.2005
Где: Иркутская обл. г. Тайшет

Репутация: нет
Всего: нет



Вот мне нужно написать тест к программе. Помогите мне. Надо чтоб комиссия ахнула. Всё с подсчётом результатов. Выводом опытности.
Например если от 1 до 30 баллов то ты такой если от 30 до 60 то другой. Вобщем помогите. Если можно то киньте исходник на мыло [email protected] или киньте ссылку. Можно помочь кодами но с описанием.

СПАСИБО smile
PM MAIL WWW   Вверх
Серый
Дата 6.11.2005, 17:17 (ссылка)    |    (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered











это ты загнул комисси на программу как таково пофиг им лишбы реферат был бы клёвый и всё smile
  Вверх
RST8
Дата 6.11.2005, 17:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 232
Регистрация: 8.12.2004

Репутация: нет
Всего: 1



Цитата(vovan430 @ 6.11.2005, 16:56)
Вот мне нужно написать тест к программе.


Непонятно, поподробнее ...
--------------------
Посадка, с места которой можно уйти на собственных ногах, считается удачной!
PM   Вверх
Poseidon
Дата 6.11.2005, 18:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphi developer
****


Профиль
Группа: Комодератор
Сообщений: 5273
Регистрация: 4.2.2005
Где: Гомель, Беларусь

Репутация: 5
Всего: 133



vovan430, это знаешь как? Как просишь, так и помогают:
Цитата(vovan430 @ 6.11.2005, 16:56)
Например если от 1 до 30 баллов то ты такой если от 30 до 60 то другой.


Код
function WhoAreYou(YouBall: integer): string;
begin
Result:= 'Не знаю кто ты';
if YouBall < 60 then Result:= 'Ты другой';
If YouBall < 30 then Result:='Ты такой';
end;


По точнее с вопросом нужно.


--------------------
Если хочешь, что бы что-то работало - используй написанное, 
если хочешь что-то понять - пиши сам...
PM MAIL ICQ   Вверх
aprok
Дата 6.11.2005, 21:45 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 81
Регистрация: 20.10.2005
Где: Украина

Репутация: нет
Всего: нет



а как сделать чтобы в lable паказива скока асталась до 0 от 30с ( timer) а када 0 то i:=i+1
PM MAIL AOL   Вверх
Poseidon
Дата 6.11.2005, 21:53 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphi developer
****


Профиль
Группа: Комодератор
Сообщений: 5273
Регистрация: 4.2.2005
Где: Гомель, Беларусь

Репутация: 5
Всего: 133



aprok, ничо не понял. Что тебе конкретно надо? Сделать таймер?


--------------------
Если хочешь, что бы что-то работало - используй написанное, 
если хочешь что-то понять - пиши сам...
PM MAIL ICQ   Вверх
Albinos_x
Дата 6.11.2005, 22:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Evil Skynet
****


Профиль
Группа: Комодератор
Сообщений: 3288
Регистрация: 28.5.2004
Где: X-6120400 Y-1 4624650

Репутация: 2
Всего: 108



Цитата(Poseidon @ 6.11.2005, 21:53)
aprok, ничо не понял. Что тебе конкретно надо? Сделать таймер?

аналогично... и это имхо не в тему... хотя тема не понятна тоже smile


--------------------
"Кто владеет информацией, тот владеет миром"    
Уинстон Черчилль
PM MAIL ICQ   Вверх
aprok
Дата 6.11.2005, 22:36 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 81
Регистрация: 20.10.2005
Где: Украина

Репутация: нет
Всего: нет



задали зделать тест всё зделал но нужна чтобы на каждый вопрос давалась 30 секунд на ответ (на форме паказивалась 30 29 28 27 26…0) если 0 то goto на следуший вопрос
PM MAIL AOL   Вверх
Rick
Дата 6.11.2005, 22:52 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 122
Регистрация: 4.11.2005
Где: Новосибирск

Репутация: 2
Всего: 3



Цитата(aprok @ 6.11.2005, 22:36)
задали зделать тест  всё зделал  но нужна  чтобы на каждый вопрос давалась 30 секунд на ответ  (на форме паказивалась 30 29 28 27 26…0) если 0 то  goto на следуший вопрос

суть проблемы в том, чтобы цифры показывать или перейти на следующий вопрос?

может так:
Код

i:=-1;
........
procedure TForm1.Timer1Timer(Sender: TObject);
begin
i:=i+1;
label1.caption:=inttostr(30-i);
if i=30 then timer1.Enabled:=false;
end;


Это сообщение отредактировал(а) Rick - 7.11.2005, 07:31
--------------------
Не бывает атеистов в окопах под огнем   
PM MAIL ICQ   Вверх
aprok
Дата 6.11.2005, 23:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 81
Регистрация: 20.10.2005
Где: Украина

Репутация: нет
Всего: нет



чтобы цифры показывать
чтота ано не работает

Код

i:=-1;
........
procedure TForm1.Timer1Timer(Sender: TObject);
begin
i:=i+1;
label1.caption:=inttostr(30-i);
if i=30 then timer1.Enabled:=false;
end; 

ставль
interval 30000
местп таво чтобы 30 29 28 ано через 30с выдаёт 30
PM MAIL AOL   Вверх
Rick
Дата 6.11.2005, 23:45 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 122
Регистрация: 4.11.2005
Где: Новосибирск

Репутация: 2
Всего: 3



interval ставь 1000 <- это значит одна секунда
--------------------
Не бывает атеистов в окопах под огнем   
PM MAIL ICQ   Вверх
aprok
Дата 7.11.2005, 00:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 81
Регистрация: 20.10.2005
Где: Украина

Репутация: нет
Всего: нет



всё работает !!! smile
Спасибо Rick
PM MAIL AOL   Вверх
Zero
Дата 7.11.2005, 11:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2169
Регистрация: 23.10.2004
Где: Россия, г. Рязань

Репутация: 3
Всего: 24



Я недавно делал курсач на С++, почти так как ты описал.... Может пригодится...


Присоединённый файл ( Кол-во скачиваний: 23 )
Присоединённый файл  TEST.zip 28,48 Kb
PM MAIL ICQ   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Центр помощи"

ВНИМАНИЕ! Прежде чем создавать темы, или писать сообщения в данный раздел, ознакомьтесь, пожалуйста, с Правилами форума и конкретно этого раздела.
Несоблюдение правил может повлечь за собой самые строгие меры от закрытия/удаления темы до бана пользователя!


  • Название темы должно отражать её суть! (Не следует добавлять туда слова "помогите", "срочно" и т.п.)
  • При создании темы, первым делом в квадратных скобках укажите область, из которой исходит вопрос (язык, дисциплина, диплом). Пример: [C++].
  • В названии темы не нужно указывать происхождение задачи (например "школьная задача", "задача из учебника" и т.п.), не нужно указывать ее сложность ("простая задача", "легкий вопрос" и т.п.). Все это можно писать в тексте самой задачи.
  • Если Вы ошиблись при вводе названия темы, отправьте письмо любому из модераторов раздела (через личные сообщения или report).
  • Для подсветки кода пользуйтесь тегами [code][/code] (выделяйте код и нажимаете на кнопку "Код"). Не забывайте выбирать при этом соответствующий язык.
  • Помните: один топик - один вопрос!
  • В данном разделе запрещено поднимать темы, т.е. при отсутствии ответов на Ваш вопрос добавлять новые ответы к теме, тем самым поднимая тему на верх списка.
  • Если вы хотите, чтобы вашу проблему решили при помощи определенного алгоритма, то не забудьте описать его!
  • Если вопрос решён, то воспользуйтесь ссылкой "Пометить как решённый", которая находится под кнопками создания темы или специальным флажком при ответе.

Более подробно с правилами данного раздела Вы можете ознакомится в этой теме.

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Poseidon, Rodman

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Центр помощи | Следующая тема »


 




[ Время генерации скрипта: 0.0608 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.