Переключение на Главную Страницу Страницы: 1 ОтправитьПечать
Обычная тема Как сделать ввод строки в табчасти как в 8-ке? (число прочтений - 1542 )
uchenik
Junior Member
**
Отсутствует


I Love YaBB 2!

Сообщений: 17
Зарегистрирован: 21. Октября 2008
Как сделать ввод строки в табчасти как в 8-ке?
21. Октября 2008 :: 08:35
Печать  
Чтобы при вводе строкового реквизита табличной части документа формировать список из введенных ранее значений в эту колонку, подстраивать его под курсор и менять состав списка при дальнейшем наборе букв?
Т.е.
Есть строки со значениями реквизита "Владелец" : Аристон, Ария, Мерлин и т.п.
Тогда при наборе буквы А чтобы вывалился список из "Аристон, Ария" , при добавлении букв РИ он остался, а дальше если набрать С, то список только из "Аристон". Дальше при нажатии ЕНТЕР, что бы выбранное значение прописывалось в эту строку.

Или подскажите, если это невозможно.
« Последняя редакция: 21. Октября 2008 :: 09:52 - uchenik »  
Наверх
 
IP записан
 
uchenik
Junior Member
**
Отсутствует


I Love YaBB 2!

Сообщений: 17
Зарегистрирован: 21. Октября 2008
Re: Как сделать ввод строки в табчасти как в 8-ке?
Ответ #1 - 21. Октября 2008 :: 09:46
Печать  
uchenik писал(а) 21. Октября 2008 :: 08:35:
Чтобы при вводе строкового реквизита табличной части документа формировать список из введенных ранее значений в эту колонку, подстраивать его под курсор и менять состав списка при дальнейшем наборе букв?
Т.е.
Есть строки со значениями реквизита "Владелец" : Аристон, Ария, Мерлин и т.п.
Тогда при наборе буквы А чтобы вывалился список из "Аристон, Ария" , при добавлении букв РИ он остался, а дальше если набрать С, то список только из "Аристон". Дальше при нажатии ЕНТЕР, что бы выбранное значение прописывалось в эту строку.

или подскажите почему не заполняется реквизит таб. части Владелец. Выбор из маленького списка происходит, но кода нажимаешь ЕНТЕР значение не проставляется.


Процедура прм_ФСО)
     
     чКодКлавиши=прм_КодКлавиши;
     
     стрА=Форма.АктивныйЭлемент();
     
     Если (прм_Ctrl=1)или(прм_Alt=1)или(прм_Shift=1) Тогда
           
           Возврат;
           
     КонецЕсли;
     
     Если стрА="Владелец" Тогда
           
           тз = СоздатьОбъект("ТаблицаЗначений");
           
           ВыгрузитьТабличнуюЧасть(тз);
           
           спс = СоздатьОбъект("СписокЗначений");
           
           тз.выбратьстроки();
           
           Пока тз.получитьстроку()=1 Цикл
                 
                 если Найти(врег(сокрлп(тз.Владелец)),врег(СокрЛП(Владелец+прм_Символ)))>0 Тогда
                       
                       спс.ДобавитьЗначение(тз.Владелец);
                       
                 КонецЕсли;
                 
           КонецЦикла;
           
           если спс.РазмерСписка()>0 Тогда
                 
                 РезультатПоиска="";
                 
                 если спс.ВыбратьЗначение(РезультатПоиска,,,,2)=1 Тогда
                       
                       Владелец = РезультатПоиска;
                       
                 КонецЕсли;
                 
           КонецЕсли;
           
     КонецЕсли;
     
КонецПроцедуры


  
Наверх
 
IP записан
 
blindvic
Senior Member
****
Отсутствует



Сообщений: 486
Местоположение: Moldova
Зарегистрирован: 23. Июня 2008
Пол: Мужской
Re: Как сделать ввод строки в табчасти как в 8-ке?
Ответ #2 - 21. Октября 2008 :: 11:38
Печать  
Возможно, стоит после выбора сделать прм_ФСО=0
  
Наверх
 
IP записан
 
Переключение на Главную Страницу Страницы: 1
ОтправитьПечать