Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 19.04.2012, 22:49
luffi luffi вне форума
Прохожий
 
Регистрация: 05.12.2011
Сообщения: 48
Репутация: 10
Вопрос Робота с Мемо

доброй поры времени. подскажите что делаю не так. у меня есть количество комбинаций. например 10. я их сначала вывожу, а потом хочу удалить с 6 по 10.
или как сделать так что бы выводило тока те комбинация что указываются в полях, с - до. сам както не осилил((
пример. есть у нас комбирация с 5 по 3. и выводит все
Код:
123
124
125
134
135
145
234
235
245
345

если зададим условия например, комбинации с 5 по 3. выводим тока с 1 по 5.
Код:
123
124
125
134
135
Вложения
Тип файла: zip dsds - 2.zip (384.2 Кбайт, 0 просмотров)
Ответить с цитированием
  #2  
Старый 19.04.2012, 22:59
Аватар для angvelem
angvelem angvelem вне форума
.
 
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
По умолчанию

Чем определяется условие?
Цитата:
выводим тока с 1 по 5.
__________________
Je venus de nulle part
55.026263 с.ш., 73.397636 в.д.
Ответить с цитированием
  #3  
Старый 19.04.2012, 23:18
luffi luffi вне форума
Прохожий
 
Регистрация: 05.12.2011
Сообщения: 48
Репутация: 10
По умолчанию

Цитата:
Сообщение от angvelem
Чем определяется условие?
это я просто так написал, оно может быть и с 1 до 9, или с 7 до 9 и тп
Ответить с цитированием
  #4  
Старый 19.04.2012, 23:24
Аватар для angvelem
angvelem angvelem вне форума
.
 
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
По умолчанию

Вариантов придумать можно много. Вот парочка:
1. Заполнить массив, затем взять из него в Memo столько, сколько нужно.
2. Зполнить StringList, далее так же.
__________________
Je venus de nulle part
55.026263 с.ш., 73.397636 в.д.
Ответить с цитированием
  #5  
Старый 20.04.2012, 22:31
luffi luffi вне форума
Прохожий
 
Регистрация: 05.12.2011
Сообщения: 48
Репутация: 10
По умолчанию

я зделал вот такое, что прикрепил к сообщению. помогите сделать это "культурнее", или так что бы можна было удалять не тока с начала до "і" или с "і" до конца.
а напримен с "і" до "n".
Вложения
Тип файла: zip dsds - 2.zip (394.2 Кбайт, 2 просмотров)
Ответить с цитированием
  #6  
Старый 20.04.2012, 23:21
Аватар для angvelem
angvelem angvelem вне форума
.
 
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
По умолчанию

Не совсем верно реализована идея с массивом. Нужно не менять в нём значения при вычислении, а заполнить вариантами этих вычислений, а уже затем заполнять Memo из массива с нужной позиции и нужным количеством.
__________________
Je venus de nulle part
55.026263 с.ш., 73.397636 в.д.
Ответить с цитированием
  #7  
Старый 20.04.2012, 23:30
luffi luffi вне форума
Прохожий
 
Регистрация: 05.12.2011
Сообщения: 48
Репутация: 10
По умолчанию

Цитата:
Сообщение от angvelem
Не совсем верно реализована идея с массивом. Нужно не менять в нём значения при вычислении, а заполнить вариантами этих вычислений, а уже затем заполнять Memo из массива с нужной позиции и нужным количеством.
я же написал помогите "культурнее" сделать. а то как то ещо до єтого не дошол
Ответить с цитированием
  #8  
Старый 21.04.2012, 02:28
Аватар для angvelem
angvelem angvelem вне форума
.
 
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
По умолчанию

Вот, как вариант:
Вложения
Тип файла: rar dsds.rar (1.4 Кбайт, 3 просмотров)
__________________
Je venus de nulle part
55.026263 с.ш., 73.397636 в.д.

Последний раз редактировалось angvelem, 22.04.2012 в 22:31. Причина: Перезалит архив.
Ответить с цитированием
  #9  
Старый 21.04.2012, 12:40
luffi luffi вне форума
Прохожий
 
Регистрация: 05.12.2011
Сообщения: 48
Репутация: 10
По умолчанию

Цитата:
Сообщение от angvelem
Вот, как вариант:
спасибо)))
Ответить с цитированием
  #10  
Старый 22.04.2012, 19:11
luffi luffi вне форума
Прохожий
 
Регистрация: 05.12.2011
Сообщения: 48
Репутация: 10
По умолчанию

Цитата:
Сообщение от angvelem
Вот, как вариант:
почему оно правильно выводит комбинации тока "9 на 8" ?, с 10 воно правильно не выводит и какието значения с "-" выводит
Ответить с цитированием
  #11  
Старый 22.04.2012, 21:12
Аватар для angvelem
angvelem angvelem вне форума
.
 
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
По умолчанию

Уточни где, я не изменял твой алгоритм и не проверял на все возможные варианты.
__________________
Je venus de nulle part
55.026263 с.ш., 73.397636 в.д.
Ответить с цитированием
  #12  
Старый 22.04.2012, 21:23
luffi luffi вне форума
Прохожий
 
Регистрация: 05.12.2011
Сообщения: 48
Репутация: 10
По умолчанию

Цитата:
Сообщение от angvelem
Уточни где, я не изменял твой алгоритм и не проверял на все возможные варианты.
вот например с 10 по 9
мой вариант
Код:
123456789
1234567810
1234567910
1234568910
1234578910
1234678910
1235678910
1245678910
1345678910
2345678910
ваш вариант
Код:
123456789
123456790
123456800
123456900
123457900
123467900
123567900
124567900
134567900
234567900

а с "-" вот например с 21 по 20
мой вариант
Код:
1234567891011121314151617181920
1234567891011121314151617181921
1234567891011121314151617182021
1234567891011121314151617192021
1234567891011121314151618192021
1234567891011121314151718192021
1234567891011121314161718192021
1234567891011121315161718192021
1234567891011121415161718192021
1234567891011131415161718192021
1234567891012131415161718192021
1234567891112131415161718192021
12345678101112131415161718192021
12345679101112131415161718192021
12345689101112131415161718192021
12345789101112131415161718192021
12346789101112131415161718192021
12356789101112131415161718192021
12456789101112131415161718192021
13456789101112131415161718192021
23456789101112131415161718192021
ваш вариант
Код:
-908325726
-908325725
-908325715
-908325615
-908324615
-908314615
-908214615
-907214615
-897214615
-797214615
202785385
1612850793
-1466364311
2101223017
-877609367
-601162135
-2131657111
-256737687
1312587369
-174031255
2139651689
Ответить с цитированием
  #13  
Старый 22.04.2012, 22:30
Аватар для angvelem
angvelem angvelem вне форума
.
 
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
По умолчанию

Я для результирующего массива использовал Integer, отсюда и проблемы. Вернул String, перезалил архив.
__________________
Je venus de nulle part
55.026263 с.ш., 73.397636 в.д.
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 02:18.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025