Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 07.08.2016, 04:16   #1
nibufep
Форумчанин
 
Регистрация: 02.08.2014
Сообщений: 476
По умолчанию Разбить список на заданное количество строк

Добрый день!
Как решить такую задачу :

Есть мемо, в нем записано :

Цитата:
1
2
3
4
5
6
7
8
9
10
Мне нужно поделить список допустим на 2 части (т.е.по 5 штук), и вывести в мемо 2 в таком виде:

Цитата:
1
2
3
4
5
---Конец---
6
7
8
9
10
nibufep вне форума Ответить с цитированием
Старый 07.08.2016, 10:13   #2
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 18,922
По умолчанию

Код:
Memo2.Lines.Insert(5,'---Конец---');
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Старый 12.08.2016, 23:27   #3
Алексей_2012
t45t
Участник клуба
 
Аватар для Алексей_2012
 
Регистрация: 20.03.2012
Сообщений: 1,849
По умолчанию

Решил проблему при помощи списка и циклов while
Спасибо = click на весы)
Вложения
Тип файла: rar prg_1.rar (176.6 Кб, 7 просмотров)
from dark to light)

Последний раз редактировалось Алексей_2012; 12.08.2016 в 23:38.
Алексей_2012 вне форума Ответить с цитированием
Старый 13.08.2016, 00:39   #4
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,229
По умолчанию

Цитата:
Сообщение от Алексей_2012 Посмотреть сообщение
Решил проблему при помощи списка и циклов
ЗАЧЕМ?!!
Ответ, корректный и без циклов (в одну строчку) уже был дан (с) Аватар.
Зачем сложности там, где они не нужны?
Serge_Bliznykov вне форума Ответить с цитированием
Старый 13.08.2016, 09:35   #5
Алексей_2012
t45t
Участник клуба
 
Аватар для Алексей_2012
 
Регистрация: 20.03.2012
Сообщений: 1,849
По умолчанию

Так ведь содержимое memo не обязательно должно состоять из 10 строк, там рандомное количество строк подразумевалось.

А разбиение не группы не только на 5 элементов ведь должно быть, как я понял - оно так же рандомно.

Если разбить даже тот же список из 10 элементов на группы из 2 элемента, то все равно нужен цикл)
from dark to light)
Алексей_2012 вне форума Ответить с цитированием
Старый 13.08.2016, 10:56   #6
FaTaL
Участник клуба
 
Аватар для FaTaL
 
Регистрация: 09.11.2007
Сообщений: 1,761
По умолчанию

Алексей_2012, так список нужно было разбить на две части или на несколько?
FaTaL вне форума Ответить с цитированием
Старый 13.08.2016, 15:32   #7
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 18,922
По умолчанию

Если на несколько одинаковых, то Insert в цикле от конца
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Старый 13.08.2016, 15:34   #8
Алексей_2012
t45t
Участник клуба
 
Аватар для Алексей_2012
 
Регистрация: 20.03.2012
Сообщений: 1,849
По умолчанию

FaTaL,
Цитата:
допустим на 2 части
Ключевое слово - допустим)
from dark to light)
Алексей_2012 вне форума Ответить с цитированием
Старый 13.08.2016, 15:37   #9
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 18,922
По умолчанию

Чего там допускать. ТС написал - 10 строк - разбить на две части
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Старый 14.08.2016, 09:02   #10
FaTaL
Участник клуба
 
Аватар для FaTaL
 
Регистрация: 09.11.2007
Сообщений: 1,761
По умолчанию

Цитата:
Сообщение от Алексей_2012 Посмотреть сообщение
FaTaL,
Ключевое слово - допустим)
Зачем что-то допускать? Если на две, то одно, а на несколько другое. Конкретней вопросы надо задавать.
FaTaL вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Интерполяция, Разбить дробное на заданное количество неодинаковых дробных Serhio163 Microsoft Office Excel 0 18.12.2015 18:23
Дан массив строк текста, строка символов разделителей. Сформировать текст из строк, содержащих заданное слово. Отсортировать дестронг Помощь студентам 1 16.05.2014 08:48
Сканирования строк. Зная количество строк и первый элемент, это количество символов с троке. dimon9 Общие вопросы C/C++ 8 02.11.2012 22:40
Авторизация на сайте заданное количество раз artbotva Общие вопросы Delphi 5 24.09.2012 15:01
генератором случайных чисел получить и нарисовать на экране заданное количество окружностей. edikesh Помощь студентам 3 28.05.2012 18:47