![]() |
|
Модераторы: Poseidon |
![]()
|
|
| MIG |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 31 Регистрация: 6.11.2005 Репутация: нет Всего: 1 |
Указание к задаче:
Создать приложение Delphi в окне Form1\ для работы с одномерными динамическими массивами согласно варианту индивидуального задания. Ввод массива организовать с использование компонента StringGrid, при этом предусмотреть: - переход курсора в следующую ячейку таблицы по нажатии клавиши Enter; - фильтрацию входных данных (разрешить ввод только чисел). Задача: Японская радиокомпания провела опрос N радиослушателей по вопросу: "Какое животное (лисица,соболь,медведь,обезьяна) вы связываете с Японией и японцами?" Составить программу получения наиболее часто встречающихся ответов и их долей (в процентах). |
|||
|
||||
| Гость_Антон |
|
|||
|
Unregistered |
Как насчет вознаграждения?
|
|||
|
||||
| Poseidon |
|
|||
![]() Delphi developer ![]() ![]() ![]() ![]() Профиль Группа: Комодератор Сообщений: 5273 Регистрация: 4.2.2005 Где: Гомель, Беларусь Репутация: 5 Всего: 133 |
Задача элементарная и делается за 10 минут. Вот только одно уточнение:
-------------------- Если хочешь, что бы что-то работало - используй написанное, если хочешь что-то понять - пиши сам... |
|||
|
||||
| mvdr |
|
|||
|
физик ![]() ![]() ![]() Профиль Группа: Участник Сообщений: 1349 Регистрация: 31.12.2004 Где: Волгоград, Россия Репутация: 7 Всего: 42 |
имеется в виду, что пользователь вводит мнения японцев в ячейки StringGrid'a и потом считают процент сколько людей какой вариант выбрали. -------------------- Появляюсь редко, но часто метко Изображать идиота сложнее, чем изображать умного: полезнее и не каждому дано |
|||
|
||||
| MIG |
|
||||
|
Новичок Профиль Группа: Участник Сообщений: 31 Регистрация: 6.11.2005 Репутация: нет Всего: 1 |
Вот, как сказал Владимир Сергеевич. Именно так. |
||||
|
|||||
| Poseidon |
|
|||
![]() Delphi developer ![]() ![]() ![]() ![]() Профиль Группа: Комодератор Сообщений: 5273 Регистрация: 4.2.2005 Где: Гомель, Беларусь Репутация: 5 Всего: 133 |
Вот взялся делать и столкнулся с непоняткой.
Как можно результат опроса (т.е. по сути выбор из четырех вариантов) занести в таблицу, да еще и
-------------------- Если хочешь, что бы что-то работало - используй написанное, если хочешь что-то понять - пиши сам... |
|||
|
||||
| MIG |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 31 Регистрация: 6.11.2005 Репутация: нет Всего: 1 |
Я думаю, в StringGrid 'е ввести результаты их голосования. А потом, в Layble (в надписи) вывести их голоса в процентах. Ну а больше никак! |
|||
|
||||
| Poseidon |
|
|||
![]() Delphi developer ![]() ![]() ![]() ![]() Профиль Группа: Комодератор Сообщений: 5273 Регистрация: 4.2.2005 Где: Гомель, Беларусь Репутация: 5 Всего: 133 |
Вот и я так думал. Но результатом голосования будет либо лисица, либо соболь, либо медведь, либо обезьяна, т.е. текст. А нужно
-------------------- Если хочешь, что бы что-то работало - используй написанное, если хочешь что-то понять - пиши сам... |
|||
|
||||
| MIG |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 31 Регистрация: 6.11.2005 Репутация: нет Всего: 1 |
Ну ты с клавиатуры вводишь числа, а потом он сам выдаёт, что за кого сколько проголосовали. Спасибо тебе, что взялся делать.Пожалуйста, сделай, хоть как-нибудь |
|||
|
||||
| Poseidon |
|
|||
![]() Delphi developer ![]() ![]() ![]() ![]() Профиль Группа: Комодератор Сообщений: 5273 Регистрация: 4.2.2005 Где: Гомель, Беларусь Репутация: 5 Всего: 133 |
Спокойно! Твоя задача будет сделана, я тебе обещаю. Но я не хочу делать "хоть как-нибудь", что бы потом пришлось "подправлять". Поэтому и спрашиваю...
Вот смотри: мы проводим опрос. Результатом опроса являются ответы "лисица" ... "обезьяна". При этом заносить в таблицу (читай StringGrid) мы можем только числа. Так вот у меня и вопрос, как должна выглядеть заполненная таблица? Вообще я это дело вижу как: Вариант ответа......количество голосов ......лисица.............................10 ......соболь..............................32 ......медведь...........................14 ......обезьяна..........................28 Но в этом случае не получится запретить ввод в таблицу только чисел и не нужны динамические массивы, каторые нужно применить. Вот я и спрашиваю, как должна выглядеть таблица? Это сообщение отредактировал(а) Poseidon - 5.12.2005, 17:40 -------------------- Если хочешь, что бы что-то работало - используй написанное, если хочешь что-то понять - пиши сам... |
|||
|
||||
| MIG |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 31 Регистрация: 6.11.2005 Репутация: нет Всего: 1 |
Кошмар. Ну просто, можно даже без этого ВАриант ответа, количество голосов . Просто выводится: Обезьяна 28 голосов Лисица 10 голосов ... Подправлять не придётся! |
|||
|
||||
| MFSham |
|
|||
![]() Бывалый ![]() Профиль Группа: Участник Сообщений: 220 Регистрация: 28.8.2005 Где: Беларусь, Гродно Репутация: 1 Всего: 3 |
Ту уже ведь задовал этот вопрос :
http://forum.vingrad.ru/index.php?showtopic=68679&hl= Условие ввода данных конечно изменилось, но ничего сложного я опять не вижу. ИМХО, дописать всего пару строчек кода. --------------------
Без ветра трава неподвижна. Без программ компьютеры бесполезны. |
|||
|
||||
| Poseidon |
|
|||
![]() Delphi developer ![]() ![]() ![]() ![]() Профиль Группа: Комодератор Сообщений: 5273 Регистрация: 4.2.2005 Где: Гомель, Беларусь Репутация: 5 Всего: 133 |
Что выводится я понял. Вводится что? И как (учитывая что вводить нужно в StringGrid что должно быть в ячейках)? Вот что я спрашиваю. Ты давай опиши все четче, я те сделаю прям на сдачу готовое, а не на переделку. -------------------- Если хочешь, что бы что-то работало - используй написанное, если хочешь что-то понять - пиши сам... |
|||
|
||||
| MIG |
|
||||
|
Новичок Профиль Группа: Участник Сообщений: 31 Регистрация: 6.11.2005 Репутация: нет Всего: 1 |
Чувак. Я тут немножко узнал как сделать программку эту. Кароче так. В Edit вводишь количество проголосовавших, например 5 человек. Потом вылазеет Стрингрид с 5-ю ячейками (зависит от количества проголосовавших). Затем тут вводишь циферки от одного до 10 (предварительно в программе присвоить циферкам: 1 - обезьяна, 2 - медведь, 3- соболь, 4 - лисица, 5 - волк, 6 - заяц, 7 - тигр, 8 - белка, 9 - лев, 10 - выдра). Т.е. будет список ещё из этих животных. В стрингриде (в 5 ячейках) вводишь эти циферки, например: 2 2 1 4 4 (потом должно вывестись): Обезьяна 1 голос Медведь 2 голоса Соболь Лисица 2 голоса Волк .... Добавлено @ 14:17
Чувак. Я тут немножко узнал как сделать программку эту. Кароче так. В Edit вводишь количество проголосовавших, например 5 человек. Потом вылазеет Стрингрид с 5-ю ячейками (зависит от количества проголосовавших). Затем тут вводишь циферки от одного до 10 (предварительно в программе присвоить циферкам: 1 - обезьяна, 2 - медведь, 3- соболь, 4 - лисица, 5 - волк, 6 - заяц, 7 - тигр, 8 - белка, 9 - лев, 10 - выдра). Т.е. будет список ещё из этих животных. В стрингриде (в 5 ячейках) вводишь эти циферки, например: 2 2 1 4 4 (потом должно вывестись): Обезьяна 1 голос Медведь 2 голоса Соболь Лисица 2 голоса Волк .... |
||||
|
|||||
| Poseidon |
|
|||
![]() Delphi developer ![]() ![]() ![]() ![]() Профиль Группа: Комодератор Сообщений: 5273 Регистрация: 4.2.2005 Где: Гомель, Беларусь Репутация: 5 Всего: 133 |
Ну что? Раз обещал, то делаю...
Прикрепляю к сообщению проект. В общем это уже готовое решение, даже придраться вроде не к чему (в смысле ошибок нет). Хотя... Если будут вопросы что к чему, спрашивай (но перед этим попробуй сам разобраться) Присоединённый файл ( Кол-во скачиваний: 9 )
Animal.rar 7,66 Kb-------------------- Если хочешь, что бы что-то работало - используй написанное, если хочешь что-то понять - пиши сам... |
|||
|
||||
![]()
|
| Правила форума "Центр помощи" | |
|
|
ВНИМАНИЕ! Прежде чем создавать темы, или писать сообщения в данный раздел, ознакомьтесь, пожалуйста, с Правилами форума и конкретно этого раздела.
Более подробно с правилами данного раздела Вы можете ознакомится в этой теме. Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Poseidon, Rodman |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Центр помощи | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |