|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
16.03.2013, 12:47 | #1 |
Регистрация: 16.03.2013
Сообщений: 3
|
Как осуществить поиск и исправление повторов в массиве delphi.
Здравствуйте, не могу сообразить как осуществить поиск и исправление повторов в массиве. Задача такова: На экран выводится список студентов(16 человек) и рядом со списком, после нажатия кнопки выдается рандомное число из массива от 1 до 30, числа не должны повторяться. С выводом чисел я разобрался, но иногда попадаются повторы, нужно от них избавится и заменить на другое число.
Вот код который я написал: Код:
|
16.03.2013, 13:28 | #2 |
Тот ещё
Старожил
Регистрация: 14.11.2007
Сообщений: 2,242
|
Нужно изначально создать массив заполненный по порядку, а потом его перемешать
http://yandex.ru/yandsearch?text=%D0...+delphi&lr=197 |
16.03.2013, 16:14 | #3 |
t45t
Участник клуба
Регистрация: 20.03.2012
Сообщений: 1,849
|
вот вопрос, зачем столько меток? И вас не устроило бы заполнение меток в цикле? И кстати, если оператор 1, то после цикла или условия можно begin..end не ставить. И еще, я могу вам сделать с помощью вывода в МЕМО, а не в метку
выводит в компонент Tmemo 16 чисел в диапазоне от 0 до 30 и без повторения, если помог, то весы слева...
from dark to light)
Последний раз редактировалось Stilet; 16.03.2013 в 17:28. |
16.03.2013, 19:00 | #4 | ||
Регистрация: 16.03.2013
Сообщений: 3
|
Цитата:
Цитата:
|
||
16.03.2013, 19:07 | #5 |
t45t
Участник клуба
Регистрация: 20.03.2012
Сообщений: 1,849
|
да не за что, могу вам помогать изучать другие компоненты (лучше не мемо, а ричедит), на весы жать не обязательно...
from dark to light)
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Как осуществить поиск и закрытие порта | Jleksern | Общие вопросы Delphi | 3 | 05.12.2011 05:52 |
Как осуществить поиск в диапазон? | Simbad | Microsoft Office Word | 4 | 25.03.2010 12:09 |
Количество повторов значения ячейки в массиве | A2B | Microsoft Office Excel | 8 | 23.02.2010 13:25 |
access 07 + delphi как подключать базы и осуществить поиск в них? | frizz | Microsoft Office Access | 5 | 30.11.2009 07:10 |
как осуществить поиск в компоненте WebBrowser1 в delphi 7 | SonClan | Работа с сетью в Delphi | 5 | 20.11.2007 12:43 |