![]() |
|
Модераторы: Snowy, MetalFan, bems, Poseidon |
![]()
|
|
| mauar |
|
|||
|
Шустрый ![]() Профиль Группа: Участник Сообщений: 66 Регистрация: 5.9.2007 Репутация: нет Всего: нет |
Есть 5 переменных типа string например:
s1..s5 : string; и 5 переменных типа integer. a1..a5 : integer; Я целочисленные переменные перевожу в строковые, у меня получается 10 строковых переменных, 5 переменных с именами s1..s5 и 5 переменных с именами a1..a5. Далее эти переменные заносятся в memo1.lines.add((s1)+(s2)+(s3)+(s4)+(s5)+(a1)+(a2)+(a3)+(a4)+(a5)); Мне нужно чтобы эти переменные в memo указывались в случайном произвольном порядке. Например чтобы стало вот так. memo1.lines.add((s1)+(a2)+(a3)+(s5)+(a1)+(s2)+(s3)+(a4)+(s4)+(a5)); Главное чтобы они в произвольном порядке могли отображаться в мемо при запуске программы. Это сообщение отредактировал(а) mauar - 19.12.2009, 23:59 |
|||
|
||||
| Демо |
|
|||
![]() Эксперт ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 1278 Регистрация: 3.11.2005 Репутация: 7 Всего: 50 |
В отдельном массиве перемешивай индексы, а не сами строки...
-------------------- |
|||
|
||||
| mauar |
|
|||
|
Шустрый ![]() Профиль Группа: Участник Сообщений: 66 Регистрация: 5.9.2007 Репутация: нет Всего: нет |
||||
|
||||
| THandle |
|
|||
![]() Хранитель Клуба Награды: 1 Профиль Группа: Админ Сообщений: 3639 Регистрация: 31.7.2007 Где: Moscow, Dubai Репутация: 50 Всего: 372 |
Можно сделать сначала отдельный TStringList, где в каждой строчке хранится у тебя строка(только дабавлять надо наверное не одним Add'ом..).
А потом как нибудь типа в цикле из этого списка добавляй в свой Memo элемент Random(Count), после чего в дополнительном списке удаляй его(чтобы не повторился). |
|||
|
||||
![]()
|
| Правила форума "Delphi: Для новичков" | |
|
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Delphi: Для новичков | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |