Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
11 дек 2024, 14:38

Ввести цифры и их сортировка

Автор FoXy, 12 мар 2023, 20:34

0 Пользователей и 1 гость просматривают эту тему.

FoXy

Добрый вечер, Пытаюсь ввести цифры и сделать их же сортировку, но не получается сделать так, что бы именно пользователь вводил данные числа. Пробовал через "ВвестиЧисло", но не разобрался как записать 10 чисел и потом их использовать

&НаКлиенте
Процедура КомандаВыполнить(Команда)

м = Новый Массив;
м.Добавить(1);
м.Добавить(2);
м.Добавить(4);
м.Добавить(3);
м.Добавить(5);
м.Добавить(9);
м.Добавить(7);
м.Добавить(8);
м.Добавить(6);
м.Добавить(10);
c3 = Новый СписокЗначений;
c3.ЗагрузитьЗначения(м);
c3.СортироватьПоЗначению ();
м = c3.ВыгрузитьЗначения();
Сообщить (СтрСоединить (м, ","));

КонецПроцедуры

LexaK

FoXy, создайте форму, в ней реквизит МояСтрока (тип Строка) вытащите его на форму, разместите рядом вашу кнопку Выполнить
вот и все.
При работе пользователь, в текстовое поле ввода вводит строку, числа через запятую
"1,3,2,5,7,8,0" и нажимает кнопку: Выполнить
&НаКлиенте
Процедура КомандаВыполнить(Команда)

м = СтрРазделить(МояСтрока, ",");// получаете массив цифр
c3 = Новый СписокЗначений;
c3.ЗагрузитьЗначения(м);
c3.СортироватьПоЗначению ();
м = c3.ВыгрузитьЗначения();
Сообщить (СтрСоединить (м, ","));

КонецПроцедуры
если помогло нажмите: Спасибо!

FoXy

LexaK, Всё наладил, благодарю ещё раз)

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск