Имя: Пароль:
1C
1C 7.7
v7: ТаблицаЗначений на форме
0 oslokot
 
06.08.12
22:36
Есть заполненная таблица значений на форме с 10-ю колонками.
Колонки нужно двигать местами (между собой), кнопками.
Например колонку №3 со всем содержимым передвинуть на позицию №4
?
1 xantimans
 
06.08.12
22:42
создаешь процедуру и внутри этой процедуры играешься с параметрами колонок и задаешь номер вывода колонки
2 oslokot
 
06.08.12
22:42
Коды колонок имеют значение "Поставщик1, Поставщик2.....,Поставщик10"
3 SnarkHunter
 
06.08.12
22:43
Используй табличное поле, там это реализовано...
4 oslokot
 
06.08.12
22:45
(3) Можно подробнее? я не в теме
5 oslokot
 
06.08.12
22:46
(3) 7.7?
6 xantimans
 
06.08.12
22:47
УстановитьПараметрыКолонки(<Колонка>,<Тип>,<Длина>,<Точность>,<Заголовок>,<Ширина>,<Формат>,<Положение>)
7 xantimans
 
06.08.12
22:47
играешься с положением
8 Злопчинский
 
06.08.12
22:48
можно ВК Formex
метод ПоложениеКолонкиТаблицы
9 Злопчинский
 
06.08.12
22:48
(6) ответ неверный.
10 Злопчинский
 
06.08.12
22:48
штатно юзаешь метод ТЗ.Видимость(а,и,с) - третий параметр
11 Sserj
 
06.08.12
22:48
(7) какое положение это всего лишь выравнивание в ней.\
12 xantimans
 
06.08.12
22:59
(9) согласен, подзабыл
13 oslokot
 
06.08.12
23:02
(9) Пробую...
(10) Пробую...
14 oslokot
 
06.08.12
23:05
(8) Хм, падает 1с
15 xantimans
 
06.08.12
23:10
(14) а (10)не устраивает?
16 oslokot
 
06.08.12
23:15
(15) Да, но пока не соображу как... ) чейто перепрыгивает у меня через одну
17 xantimans
 
06.08.12
23:18
Процедура ПриОткрытии()
   
   Таб.ВставитьКолонку("в");
   Таб.ВставитьКолонку("а");
   Таб.ВставитьКолонку("б");

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

Процедура Сформировать()
   
   Таб.ВидимостьКолонки("в",1,3);
   Таб.ВидимостьКолонки("а",1,1);
   Таб.ВидимостьКолонки("б",1,2);

КонецПроцедуры
18 oslokot
 
06.08.12
23:33
(17) Туплю чтота...
У меня есть 10 колонок. "Поставщик1,Поставщик2,Поставщик3.....,Поставщик10"
нужно "Поставщик3" переместить на место "Поставщик2"
Как?
19 leshikkam
 
06.08.12
23:43
(18) стукни в асю 201216890 - я подскажу как на классе ПоставщикДанных сделать
20 oslokot
 
07.08.12
00:05
(19) спасибо, но хотелось бы решить штатным методом
21 Рэйв
 
07.08.12
00:44
(20)Пошли нах@й тех , кто это хочет.

Это намного быстрее и полезнее.
22 ADirks
 
07.08.12
06:11
(20) Например (штатней некуда):

Процедура ПереместитьКолонку(Шаг = 1)
   Перем Колонка, Идентификатор, тзКолонка;
   Перем Тип, Длина, Точность, Заголовок, Ширина, ФорматКолонки, Положение;
   
   Если ФормаДляВыбора = 1 Тогда Возврат; КонецЕсли;    
   Если ТЗ.КоличествоКолонок() <= 1 Тогда Возврат; КонецЕсли;
   
   Идентификатор = ТЗ.ТекущаяКолонка(, Колонка);
   ТЗ.ПолучитьПараметрыКолонки(Колонка, Тип, Длина, Точность, Заголовок, Ширина, ФорматКолонки, Положение);
   
   НовыйНомер = Колонка + Шаг;
   Если НовыйНомер < 1 Тогда
       НовыйНомер = ТЗ.КоличествоКолонок();
   ИначеЕсли НовыйНомер > ТЗ.КоличествоКолонок() Тогда
       НовыйНомер = 1;
   КонецЕсли;
   
   тзКолонка = СоздатьОбъект("ТаблицаЗначений");
   ТЗ.Выгрузить(тзКолонка,,, Колонка);
   ТЗ.УдалитьКолонку(Колонка);
   ТЗ.ВставитьКолонку(Идентификатор, НовыйНомер, Тип, Длина, Точность, Заголовок, Ширина, ФорматКолонки, Положение);
   ТЗ.Заполнить(тзКолонка,,, НовыйНомер);
   ТЗ.ТекущаяКолонка(НовыйНомер);
   Активизировать("ТЗ");
КонецПроцедуры
23 Песец
 
07.08.12
06:57
// тз - таблица значений на форме
Процедура Сформировать()
тз.НоваяКолонка("кол1");
тз.НоваяКолонка("кол2");
КонецПроцедуры
//======================================================================
Процедура кн()
   тз.ВидимостьКолонки("кол2,кол1",1,1);
КонецПроцедуры // кн
24 Песец
 
07.08.12
06:59
(21) За это денех не дадут.
25 ЧеловекДуши
 
07.08.12
07:39
Автор, а накой оно тебе это?
Переходите на 8-ку, там это все Штатно :)
26 ЧеловекДуши
 
07.08.12
07:39
+ На 7.7 такой функционал в любом случае внештатный :)
27 Ёпрст
 
гуру
07.08.12
09:12
(0) ВидимостьКолонки()
28 oslokot
 
09.08.12
23:08
(20) Ура!!! Спасибо! красава! )))
29 oslokot
 
09.08.12
23:21
Извиняюсь что долго не отвечал в теме, кутил )
Огромное Спасибо всем!
AdBlock убивает бесплатный контент. 1Сергей