С Новым годом! Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Delphi Построчный вывод текста в Excel https://www.cyberforum.ru/ delphi-beginners/ thread1445651.html
Вобщем есть простой масив: for i:=1 to 10 do begin A:=Random(10); Memo1.Lines.Add('A'+IntToStr(A)); end; Как сделать вывод не в Memo а в excel.
Дана матрица порядка n. Найдите строку матрицы в которых больше всего нулевых элементов Delphi
Дана матрица порядка n. Найдите строку матрицы в которых больше всего нулевых элементов Не понимаю в чём проблема, помогите найти ошибку Вот код unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Grids;
Delphi Небольшая игра https://www.cyberforum.ru/ delphi-beginners/ thread1445641.html
Добрый вечер. Делаю на курсовую игру, основу почти написал(Большое спасибо местному телепату), но напоролся на одном дельце. Есть у меня лист объектов(противников\монстров), там есть как одинаковые, так и разные. И не знаю как лучше всего их прорисовывать. Пытался впихнуть прямо в объект Image:TImage; Но пытаясь извращенскими разными способами вывести эту картинку на форму - не смог(Программа...
Delphi Всплывающее сообщение хочу сделать так чтобы если включен капслок рядом с Edit1 выдовалось сообщение "внимание включен CapsLock" https://www.cyberforum.ru/ delphi-beginners/ thread1445630.html
Электронный учебник Delphi
На форме написаны все темы дисциплины. Нажимая на каждую тему должна открываться новая форма, на которой будут кнопка "Тест" и кнопка "Презентация". Можно ли сделать как-нибудь, чтобы для всех этих тем( а их у меня 60) использовалась только одна форма, и как это прописать. Подскажите пожалуйста. Заранее спасибо
Delphi TfileStream чтение данных Начал работать с файловым потоком tfilestream, пытаюсь делать запись и чтение, с записью проблем нет: var f:tfilestream; i:integer; s:string; begin s:=Edit1.Text; f:=tfilestream.create('doc.txt',fmcreate); f.Write(s,length(s)*sizeof(char)); f.free; https://www.cyberforum.ru/ delphi-beginners/ thread1445614.html
Delphi Определенное количество нажатии кнопки https://www.cyberforum.ru/ delphi-beginners/ thread1445607.html
Люди.. Вот допустим у меня кнопка, по которой делается какое-то действие... и вот как сделать чтобы по нажатию на кнопку например в 11 раз выполнялось другое какое-то действие(это я сам пропишу..)
Delphi Ошибки в шифре перестановки
Здравствуйте. Пробую реализовать шифр перестановки и столкнулся с несколькими ошибками. Помогите, пожалуйста, с решением проблемы. Код: Procedure Per1; //процедура перестановки var m,n,i,j,k:integer; ss:String; Arr:Array of Array of Char;
Delphi Последовательно ввести n целых чисел. Найти максимальное из них Здравствуйте! Помогите пожалуйста !срочно! решить задачу: Последовательно вводятся n целых чисел. Найти максимальное из них. https://www.cyberforum.ru/ delphi-beginners/ thread1445532.html Delphi Ввести значения в компоненты Edit используя приведение типов На форме несколько компонентов Edit и кнопка Button Вводим слово в Edit1 и по клике на кнопке это слово должно быть выведено во всех остальных Edit для этого нужно использовать приведение типов Выделяю все остальные Edit мышкой и в "событиях" для них OnChange выбираю Button1Click procedure TForm1.Button1Click(Sender: TObject); begin https://www.cyberforum.ru/ delphi-beginners/ thread1445516.html
Как, зная Хендл объекта чужого приложения, узнать поля этого объекта? Delphi
Как зная Хендл объекта чужого приложения, узнать поля этого объекта?
Delphi Работа с графикой, вывод рисунка на экран https://www.cyberforum.ru/ delphi-beginners/ thread1445475.html
Помогите пожалуйста! Графика очень сложна для меня( я в ней вообще не работал... Условие: Составить программу вывода на экран рисунка, используя графические возможности языка программирования. Нужно что бы рисунок был на такой форме как на 1ом рисунке. На 1ом рисунке то что делает код ниже. 2ое фото то что нужно сделать. procedure TForm1.Button2Click(Sender: TObject); begin...
0 / 0 / 1
Регистрация: 16.02.2015
Сообщений: 17
0

Протестируйте пожалуйста программу "Создатель тестов" - Delphi - Ответ 7610399

13.05.2015, 21:19. Показов 1102. Ответов 8
Метки (Все метки)

Author24 — интернет-сервис помощи студентам
Здравствуйте! Прошу оценить программу-тест и указать на его недостатки, буду очень рад если поможете с переводом

Создатель тестов.rar

Кликните здесь для просмотра всего текста


Ru[1]:='Загрузить тест';
Ru[2]:=' Начать тест';
Ru[3]:=' Результаты';
Ru[4]:='Загрузить результат' ;
Ru[5]:= 'Загрузить рез.';
Ru[6]:=' Подробнее' ;
Ru[7]:=' Тесты' ;
Ru[8]:='Выберите тест из списка';
Ru[9]:='Введите пароль' ;
Ru[10]:='Пароль неверный!' ;
Ru[11]:='Пароль:' ;
Ru[12]:=' Результаты' ;
Ru[13]:='Не найден файл ' ;
Ru[14]:='Создание теста' ;
Ru[15]:=' Помощь' ;
Ru[16]:=' Выход' ;
Ru[17]:=' Новый тест' ;
Ru[18]:=' Тесты' ;
Ru[19]:='Редактировать' ;
Ru[20]:=' Удалить' ;
Ru[21]:='Поиск:' ;
Ru[22]:='Создатель тестов' ;
Ru[23]:='Создание теста' ;
Ru[24]:='Название теста:' ;
Ru[25]:='Учитель:' ;
Ru[26]:='Пароль:' ;
Ru[27]:='Количество вопросов:' ;
Ru[28]:='Количество вариантов:' ;
Ru[29]:='Таймер (минуты):' ;
Ru[30]:='Оценка:' ;
Ru[31]:='Изображение:' ;
Ru[32]:='Далее' ;
Ru[33]:='Назад' ;
Ru[34]:='Вопрос:' ;
Ru[35]:='Количество ответов:' ;
Ru[36]:='№ правильного ответа:' ;
Ru[37]:='Баллы:' ;
Ru[38]:='Ответ №' ;
Ru[39]:='Выберите результат из списка' ;
Ru[40]:='Уточните название теста' ;
Ru[41]:='Уточните имя учителя' ;
Ru[42]:='Уточните количество вопросов' ;
Ru[43]:='Уточните количество вариантов' ;
Ru[44]:='Уточните время на таймере' ;
Ru[45]:='Напишите пароль (любой)' ;
Ru[46]:=',это не цифра' ;
Ru[47]:='Количество вопросов не может быть меньше 1' ;
Ru[48]:='Количество вопросов не должно превышать 100' ;
Ru[49]:='Количество вариантов не может быть меньше 1' ;
Ru[50]:='Количество вариантов не должно превышать 100' ;
Ru[51]:='Время на таймере не может быть меньше 0' ;
Ru[52]:='Время на таймере не должно превышать 60' ;
Ru[53]:='Упражнение №' ;
Ru[54]:=', Вариант №' ;
Ru[55]:='Завершить' ;
Ru[56]:='Сколько минимум баллов необходимо для оценки ' ;
Ru[57]:='Создание теста успешно завершено!' ;
Ru[58]:='Уточните количество ответов' ;
Ru[59]:='Уточните № правильного ответа' ;
Ru[60]:='Уточните количество баллов' ;
Ru[61]:='Количество ответов не должно превышать 9' ;
Ru[62]:='Количество ответов не может быть меньше 1' ;
Ru[63]:='№ правильного ответа не может быть больше ' ;
Ru[64]:='Количество ответов не должно превышать 9' ;
Ru[65]:='№ правильного ответа не может быть меньше 1' ;
Ru[66]:='Напишите вопрос' ;
Ru[67]:='Напишите ответ №' ;
Ru[68]:='Выход' ;
Ru[69]:='Имя:' ;
Ru[70]:='Фамилия:' ;
Ru[71]:='Группа:' ;
Ru[72]:='Главная' ;
Ru[73]:='Тест' ;
Ru[74]:='Дата ' ;
Ru[75]:='Работу выполнил' ;
Ru[76]:='студент группы ' ;
Ru[77]:='Вопрос №' ;
Ru[78]:=' -правильно +' ;
Ru[79]:=' балл(ов/а)' ;
Ru[80]:=' -не правильно' ;
Ru[81]:='Ответил: ' ;
Ru[82]:=' Оценка:' ;
Ru[83]:='Набрал ' ;
Ru[84]:=' баллов из ' ;
Ru[85]:='| Дата: ' ;
Ru[86]:=' | Время начала: ' ;
Ru[87]:=' | Время окончания: ' ;
Ru[88]:='Вы набрали ' ;
Ru[89]:=' баллов из ' ;
Ru[90]:=' Оценка:' ;
Ru[91]:='Старт' ;
Ru[92]:='Заново' ;
Ru[93]:='Стоп' ;
Ru[94]:='Учитель: ' ;
Ru[95]:=' -правильно' ;
Ru[96]:='Время истекло!' ;
Ru[97]:='Выполнение теста:' ;
Ru[98]:='Загрузка теста (результата):' ;
Ru[99]:='Просмотр результатов:' ;
Ru[100]:='Создание теста:' ;
Ru[101]:='Редактирование теста:' ;
Ru[102]:='Удаление теста(результата):' ;
Ru[103]:='Помощь' ;
Ru[104]:='Для того чтобы решить тест выполните следующие действия:';
Ru[105]:='1) Выберите тест из списка';
Ru[106]:='2) Нажмите кнопку "Начать тест"';
Ru[107]:='3) Откройте вкладку "Тест"';
Ru[108]:='4) Заполните свободные поля (имя, фамилия, группа)';
Ru[109]:='5) Нажмите кнопку "Старт"';
Ru[110]:='6) Пройдите тест нажимая на нужный ответ';
Ru[111]:='7) Для того чтобы перейти к следующему или предыдущему вопросу нажмите кнопку "Далее" и "Назад" соответственно ';
Ru[112]:='8) Для того чтобы закончить тест нажмите кнопку "Стоп"';
Ru[113]:='9) Чтобы перейти в главное меню нажмите "Выход"';
Ru[114]:='(!) Выполнение теста закончится автоматически, если время на него ограничено. Оставшееся время указано в нижней части окна.';
Ru[115]:='';
Ru[116]:='';
Ru[117]:='Для загрузки теста (результата) нажмите кнопку Загрузить тест (рез.) и выберите нужный файл. ';
Ru[118]:='(!) Загруженный тест (рез.) должен быть создан данным приложением. ';
Ru[119]:='';
Ru[120]:='';
Ru[121]:='Для просмотра результатов теста выполните следующие действия: ';
Ru[122]:='1) Выберите тест из списка';
Ru[123]:='2) нажмите кнопку "Результаты"';
Ru[124]:='3) Выберите результат из списка';
Ru[125]:='4) Нажмите кнопку "Подробнее"';
Ru[126]:='5) Появится окно с подробным результатом решения теста ';
Ru[127]:='6) Чтобы перейти в главное меню нажмите кнопку "Тесты"';
Ru[128]:='';
Ru[129]:='';
Ru[130]:='Для создания теста нажмите кнопку "Новый тест" и заполните поля нужной информацией. ';
Ru[131]:='(!) Запомните пароль, она нужна для редактирования и удаления теста ';
Ru[132]:='(!) Не используйте знаки " * " при заполнении полей ';
Ru[133]:='(!) Не используйте знаки [\ / | : * ? " < >] в названии теста ';
Ru[134]:='(!) Для более приятного оформления используйте изображения';
Ru[135]:='';
Ru[136]:='';
Ru[137]:='Для редактирования теста выполните следующие действия: ';
Ru[138]:='1) Выберите тест из списка';
Ru[139]:='2) Нажмите кнопку "Редактировать"';
Ru[140]:='3) Введите пароль написанный при создании теста';
Ru[141]:='4) Аналагично созданию, отредактируйте тест.';
Ru[142]:='';
Ru[143]:='';
Ru[144]:='Для удаления теста (результата) выполните следующие действия:';
Ru[145]:='1) Выберите тест из списка';
Ru[146]:='2) Нажмите кнопку "Удалить"';
Ru[147]:='3) Введите пароль написанный при создании теста.';
Ru[148]:='(!) В случае появления каких либо ошибок перезапустите приложение';
Ru[149]:='';

En[1]:= ' Load test';
En[2]:= ' Start test';
En[3]:= ' Results';
En[4]:= 'Load results';
En[5]:= 'Load res. ';
En[6]:= ' More';
En[7]:= ' Tests';
En[8]:= 'Choose a test from the list';
En[9]:= 'Enter password';
En[10]:= 'Invalid password!' ;
En[11]:= 'Password:';
En[12]:= 'Results';
En[13]:= 'File was not found';
En[14]:= 'Creating the test';
En[15]:= ' Help';
En[16]:= ' Exit';
En[17]:= ' New test';
En[18]:= ' Tests';
En[19]:= ' Edit';
En[20]:= ' Delete';
En[21]:= 'Search:';
En[22]:= 'Test creator ';
En[23]:= 'Creating the test';
En[24]:= 'Test name:';
En[25]:= 'Teacher:';
En[26]:= 'Password:';
En[27]:= 'Number of questions:';
En[28]:= 'Nnumber of variants:';
En[29]:= 'Timer (minutes):';
En[30]:= 'Mark:';
En[31]:= 'Image';
En[32]:= 'Next';
En[33]:= 'Back';
En[34]:= 'Qestion:';
En[35]:= 'Number of answers:';
En[36]:= '№ of correct answer:';
En[37]:= 'Points:';
En[38]:= 'Answer №';
En[39]:= 'Select from the list of results';
En[40]:= 'Specify the name of the test ';
En[41]:= 'Specify the name of the teacher';
En[42]:= 'Specify the number of questions';
En[43]:= 'Specify the number of variants';
En[44]:= 'Specify the time on the timer';
En[45]:= 'Write password (any)';
En[46]:= 'is not a number';
En[47]:= 'The number of questions can not be less than 1 ';
En[48]:= 'The number of questions should not exceed 100';
En[49]:= 'Number of variations can not be less than 1 ';
En[50]:= 'The number of variants does not exceed 100 ';
En[51]:= 'time on the timer can not be less than 0';
En[52]:= 'Time on the timer should not exceed 60';
En[53]:= 'Exercise №';
En[54]:= 'Variant №';
En[55]:= 'End';
En[56]:= 'How many minimum points necessary for evaluating ';
En[57]:= 'Creating a test was successful!' ;
En[58]:= 'Specify the number of answers';
En[59]:= 'Specify number of the correct answer ';
En[60]:= 'Specify the number of points';
En[61]:= 'The number of responses does not exceed 9';
En[62]:= 'The number of answers may not be less than 1 ';
En[63]:= '№ of correct answer can not be more than';
En[64]:= 'The number of responses does not exceed 9';
En[65]:= '№ right answer may not be less than 1';
En[66]:= 'Write the question';
En[67]:= 'Write the answer №';
En[68]:= 'Exit';
En[69]:= 'Name:';
En[70]:= 'Surname:';
En[71]:= 'Class:';
En[72]:= 'Home';
En[73]:= 'Test';
En[74]:= 'Date';
En[75]:= 'Work is done by ';
En[76]:= ',student from the class';
En[77]:= 'Question №';
En[78]:= '-correct +';
En[79]:= ' points';
En[80]:= '-incorrect';
En[81]:= 'Replied :';
En[82]:= 'Mark:';
En[83]:= 'Scored';
En[84]:= 'points from';
En[85]:= '| Date:';
En[86]:= '| Start time:';
En[87]:= '| End time:';
En[88]:= 'You type';
En[89]:= 'points out';
En[90]:= 'Grade';
En[91]:= 'Start';
En[92]:= 'Re';
En[93]:= 'Stop';
En[94]:= 'Teacher:';
En[95]:= 'is a regular';
En[96]:= 'Timeout!' ;
En[97]:= 'Test execution:';
En[98]:= 'Download of the test (result):';
En[99]:= 'View Results';
En[100]:= 'Creating a test';
En[101]:= 'Edit test';
En[102]:= 'Removing test (result):';
En[103]:= 'Help';
En[104]:= 'In order to solve the test, follow these steps:';
En[105]:= '1) Select a test from the list';
En[106]:= '2) Click the "Start Test"';
En[107]:= '3) Click the "Test"';
En[108]:= '4) Fill in the free fields (name, artist)';
En[109]:= '5) Click the "Start" button';
En[110]:= '6) Take the test by clicking on the correct answer ';
En[111]:= '7) In order to move to the next or previous question, click "Next" and "Back", respectively';
En[112]:= '8) To finish the test press the "Stop" button';
En[113]:= '9) to enter the main menu, click "Exit"';
En[114]:= '(!) Test execution will end automatically if the time it is limited. The remaining time indicated in the bottom of the window. ';
En[115]:= '';
En[116]:= '';
En[117]:= 'To download the test (result), click Load test (res.) And select the desired file. ';
En[118]:= '(!) Loaded test (res.), To be created by the application. ';
En[119]:= '';
En[120]:= '';
En[121]:= 'To view the test results, follow these steps:';
En[122]:= '1) Select a test from the list';
En[123]:= '"2) click on" Results "';
En[124]:= '3) Select from the list of results';
En[125]:= '4) Press the "More"';
En[126]:= '5) A window with detailed results of test';
En[127]:= '6) To go to the main menu, click "Tests"';
En[128]:= '';
En[129]:= '';
En[130]:= 'To create a test, click "new test" and fill in the necessary information. ';
En[131]:= '(!) Remember the password, it is necessary to edit or delete test';
En[132]:= '(!) Do not use the character "*" when filling out the fields ';
En[133]:= '(!) Do not use the signs [\ / |: *? "<>] In the title of the test';
En[134]:= '(!), For a better image processing, use';
En[135]:= '';
En[136]:= '';
En[137]:= 'To edit a test, follow these steps:';
En[138]:= '1) Select a test from the list';
En[139]:= '2) Click the "Edit"';
En[140]:= '3) Enter the password when you create a written test';
En[141]:= '4) Analagichno create, edit test.';
En[142]:= '';
En[143]:= '';
En[144]:= 'To delete the test (result), follow these steps:';
En[145]:= '1) Select a test from the list';
En[146]:= '2) Click the "Delete"';
En[147]:= '3) Enter the password when you create a written test.';
En[148]:= '(!) In the event of any errors, restart the application "';
En[149]:='';
En[150]:='';


Вернуться к обсуждению:
Протестируйте пожалуйста программу "Создатель тестов" Delphi
0
Заказать работу у эксперта
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
13.05.2015, 21:19
Готовые ответы и решения:

Программа "создатель тестов"
Здравствуйте! Прошу оценить программу-тест и указать на его недостатки (кроме шифрования файлов,...

Протестируйте программу,пожалуйста
Пожалуйста,запустите программу и потестируйте её...Программа переводит километры в мили..Прошу...

Протестируйте, пожалуйста программу для ЛПТ принтера
Вобщем, у нас в ВУЗе есть предмет &quot;Интерфейсы периферийных устройств&quot; и для того, чтобы получить...

протестируйте пожалуйста сайт
доброе утро слово &quot;seo&quot; увидел первый раз неделю назад (: так что сильно меня не ругайте, если...

Протестируйте мой сайт, пожалуйста.
Буду признателен за вашу оценку моей работы. www.pricetelecom.net

8
13.05.2015, 21:19
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
13.05.2015, 21:19
Помогаю со студенческими работами здесь

Протестируйте мой сайт, пожалуйста.
Особенно мне интересны Ваши рекомендации по поводу моих разработок. Правда, их там пока мало. Но...

Протестируйте, пожалуйста новые беты School Pak
Я настрогал несколько по–разному пропатченных версий, мне нужно знать, как они работают. Запуск:...

Протестируйте пожалуйста этот код под NT, 2000, XP
Протестируйте пожалуйста этот код под NT, 2000, XP. Под Win98 он работает. Он посылает файл...

Протестируйте программу.
Прошу вашей помощи, т.к. сам я не могу найти ошибку... задание сотсоит из того что у нас имеется...

Протестируйте программу по методу Гаусса
Метод Гаусса решения системы линейных уравнений. Сообщите об ошибках и предложениях. Это курсовая...

0
Блоги программистов
Как перейти с Options API на Composition API в Vue.js
BasicMan 06.01.2025
Почему переход на Composition API актуален В мире современной веб-разработки фреймворк Vue. js продолжает эволюционировать, предлагая разработчикам все более совершенные инструменты для создания. . .
Архитектура современных процессоров
inter-admin 06.01.2025
Процессор (центральный процессор, ЦП) является основным вычислительным устройством компьютера, которое выполняет обработку данных и управляет работой всех остальных компонентов системы. Архитектура. . .
История создания реляционной модели баз данных, правила Кодда
Programming 06.01.2025
Предпосылки создания реляционной модели В конце 1960-х годов компьютерная индустрия столкнулась с серьезными проблемами в области управления данными. Существовавшие на тот момент модели данных -. . .
Полезные поделки на Arduino, которые можно сделать самому
raxper 06.01.2025
Arduino как платформа для творчества Arduino представляет собой удивительную платформу для технического творчества, которая открывает безграничные возможности для создания уникальных проектов. Эта. . .
Подборка решений задач на Python
IT_Exp 06.01.2025
Целью данной подборки является предоставление возможности ознакомиться с различными задачами и их решениями на Python, что может быть полезно как для начинающих, так и для опытных программистов. . . .
С чего начать программировать микроконтроллер­­ы
raxper 06.01.2025
Введение в мир микроконтроллеров Микроконтроллеры стали неотъемлемой частью современного мира, окружая нас повсюду: от простых бытовых приборов до сложных промышленных систем. Эти маленькие. . .
Из чего собрать игровой компьютер
inter-admin 06.01.2025
Сборка игрового компьютера требует особого внимания к выбору комплектующих и их совместимости. Правильно собранный игровой ПК не только обеспечивает комфортный геймплей в современных играх, но и. . .
Обновление сайта www.historian.b­y
Reglage 05.01.2025
Обещал подвести итоги 2024 года для сайта. Однако начну с того, что изменилось за неделю. Добавил краткий урок по последовательности действий при анализе вредоносных файлов и значительно улучшил урок. . .
Как использовать GraphQL в C# с HotChocolate
Programming 05.01.2025
GraphQL — это современный подход к разработке API, который позволяет клиентам запрашивать только те данные, которые им необходимы. Это делает взаимодействие с API более гибким и эффективным по. . .
Модель полного двоичного сумматора с помощью логических операций (python)
AlexSky-coder 04.01.2025
def binSum(x:list, y:list): s=^y] p=x and y for i in range(1,len(x)): s. append((x^y)^p) p=(x and y)or(p and (x or y)) return s x=list() y=list()
Это мы не проходили, это нам не задавали...(аси­­­­­­­­­­­­­­хро­н­н­ы­й счётчик с управляющим сигналом задержки).
Hrethgir 04.01.2025
Асинхронный счётчик на сумматорах (шестиразрядный по числу диодов на плате, но наверное разрядов будет больше - восемь или шестнадцать, а диоды на старшие), так как триггеры прошли тестирование и. . .
Руководство по созданию бота для Телеграм на Python
IT_Exp 04.01.2025
Боты для Телеграм представляют собой автоматизированные программы, которые выполняют различные задачи, взаимодействуя с пользователями через интерфейс мессенджера. В данной статье мы рассмотрим,. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru