Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Random & CheckBox [D7, XP]


Страницы:   1 2

Первокласник Вася ©   (2007-11-15 10:46:00) 

Всем привет!

Мастера помогите решить задачку.

Задача:

На форме есть ComboBox, заполненый значениеми: раз, два, три, четыре, пять.
Как это  все можно перемешать randomom? Получается только выбирать индекс, но
добиться например, три, пять, раз, четыре, два - неполучается :(

Помогите пожалуйста!


Vice____   (2007-11-15 14:10:00) [1]


> app ©   (15.11.07 14:00) [32]
>
> > Vice____  (15.11.2007 13:12:28)  [28]
>
> > а правда что если что-то написано на заборе оно там и
> есть)
>
> Ну иди и пиши на заборах, почему ты решил, что delphimaster
> это забор.


ето за меня решили что delphimaster это забор


> и все таки интуиция мне подсказывает что у автора че-то
> типа T.... где и есть свойство Items, в противном случае
> у него не вышла б такая постановка вопроса)

> и вообще была попытка описать как примерно произойдет выполнение
> задачи и без разницы есть там Items или нет, думаю автор
> ето и хотел услышать
> ну а если чего можна у него спросить


app   (2007-11-15 14:00:00) [2]

> Vice____  (15.11.2007 13:12:28)  [28]

> а правда что если что-то написано на заборе оно там и есть)

Ну иди и пиши на заборах, почему ты решил, что delphimaster это забор.


  (2007-11-15 13:58:00) [3]

Удалено модератором


  (2007-11-15 13:58:00) [4]

Удалено модератором


Skyle   (2007-11-15 13:17:00) [5]


> Vice____   (15.11.07 13:12) [28]
> > Jeer ©   (15.11.07 13:10) [27]
> > Вы только что уверяли, что у Вас в TCheckBox есть Items.
> а правда что если что-то написано на заборе оно там и есть)

Это надо спросить у тех, кто пишет. В данном случае у Вас.


Vice____   (2007-11-15 13:12:00) [6]


> Jeer ©   (15.11.07 13:10) [27]
>
> Вы только что уверяли, что у Вас в TCheckBox есть Items.
>

а правда что если что-то написано на заборе оно там и есть)


Jeer   (2007-11-15 13:10:00) [7]

Вы только что уверяли, что у Вас в TCheckBox есть Items.
Откуда я знаю, может быть у Вас с ним одна и та же супер-версия Delphi:))

Вопрос, на самом-то деле, все в том же - учится правильно задавать вопросы.


Vice____   (2007-11-15 12:53:00) [8]


> Jeer ©   (15.11.07 12:47) [25]
>
>
> > Vice____   (15.11.07 12:34) [24]
>
>
> Поздравляю, Вы обладатель особой версии Delphi.
>
> Вы решили поиграть в пинг-понг ?
> Вы что не понимаете разницу между постановкой задачи в [0]
> и ее уточнением в [17], да еще и с извинениями от автора
> ? :))
>
> Вы не понимаете разницу между TComboBox и TCheckBox ?


и все таки интуиция мне подсказывает что у автора че-то типа T.... где и есть свойство Items, в противном случае у него не вышла б такая постановка вопроса)
и вообще была попытка описать как примерно произойдет выполнение задачи и без разницы есть там Items или нет, думаю автор ето и хотел услышать
ну а если чего можна у него спросить


Jeer   (2007-11-15 12:47:00) [9]


> Vice____   (15.11.07 12:34) [24]


Поздравляю, Вы обладатель особой версии Delphi.

Вы решили поиграть в пинг-понг ?
Вы что не понимаете разницу между постановкой задачи в [0] и ее уточнением в [17], да еще и с извинениями от автора ? :))

Вы не понимаете разницу между TComboBox и TCheckBox ?


Vice____   (2007-11-15 12:34:00) [10]


> Jeer ©   (15.11.07 12:27) [23]

а у меня есть
тут Delphi нужна выше 5 версии


Jeer   (2007-11-15 12:27:00) [11]


> Vice____   (15.11.07 12:02) [21]



> есть


Насчет TCheckBoxэто Вы Borland-у расскажите.

А Вам советую посмотреть на [17]


Первокласник Вася   (2007-11-15 12:05:00) [12]

Ребята!!!!

Спасибо что помогли понять что к чему!!!!

Доходит немного! :))

Спасибо вам ещё раз!!!
Настоящие мастера!!!


Vice____   (2007-11-15 12:02:00) [13]


> Jeer ©   (15.11.07 11:58) [19]
>
> Нет у стандартногоTCheckBox свойства Items

есть
и еще он может быть заполнен
> значениями в свойстве items - "один", "два", "три",
>  "четыре", "пять".
а лучше сначала посмтреть [0]


Anatoly Podgoretsky   (2007-11-15 12:01:00) [14]

Для TStrings я указал его родные методы, нет нужды в дополнительных средствах, когда оно само может или перемещать или обмениваться значениями, по вкусу.


Jeer   (2007-11-15 11:58:00) [15]

Нет у стандартногоTCheckBox свойства Items


Vice____   (2007-11-15 11:57:00) [16]

начни с того что нужно сделать чтобы получить результат:
например есть
10 20 30 40 50
ты хочешь их перемешать
берем в руки Random я так понял с вопроса теперь, припустим
начала цикла
rand1:=3 rand2:=1 тогда
chiclo:=comboBox1.Items[rand1]; запоминает первое значение
comboBox1.Items[rand1]:=comboBox1.Items[rand2]; перемещаем одно значение
comboBox1.Items[rand2];=chiclo; перемещаем другое значение в результате
конец цикла
имеем
30 20 10 40 50
все ето запихни в цыкл и интерпретируй нужное количество раз
прошу очень не бить пытался обяснить как мог)


Первокласник Вася   (2007-11-15 11:53:00) [17]

Извините, ребята!

Задача такая: На форме расположен компонент CheckBox, он заполнен значениями в свойстве items - "один", "два", "три", "четыре", "пять". Хотелось бы перемешать это и чтобы получилось - "два", "пять", "один", "четыре" "три".
Пытался с помощью random, но добился лишь случайного выбора индекса.
Но необходимо, чтобы весь этот список перемешался


Юрий Зотов   (2007-11-15 11:53:00) [18]

> Первокласник Вася   (15.11.07 10:46)

1. Строим массив А, состоящий из случайных неповторяющихся целых чисел в пределах от нуля до ComboBox.Items.Count - 1.

2. Далее все просто:
SL := TStringList.Create;
try
 for i := Low(A) to High(A) do
   SL.Add(ComboBox.Items[A[i]])
 ComboBox.Items.Assign(SL)
finally
 SL.Free
end;


@!!ex   (2007-11-15 11:39:00) [19]

Да ты задачу доходчиво объясни!
Научись сначало вопросы задавать корректно.


Первокласник Вася   (2007-11-15 11:33:00) [20]

Удалено модератором


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо