V
vl185
Добрый день. Возникла необходимость прямого ввода значения в таблицу значений. Нашел такую возможность в formex. Раньше formex не юзал и соответственно зашел в тупик. Может подскажите что не так?
Процедура ПриРедактированииСвойства()
РФ=СоздатьОбъект("РасширениеФормы");
Фрм=РФ.ПолучитьФорму();
тс = тз.ТекущаяСтрока();
Если тс = 0 Тогда
Возврат;
КонецЕсли;
_тк = тз.ТекущаяКолонка();
тк = тз.ПолучитьПараметрыКолонки(_тк);
в = "";
л = "";
н = "";
п = "";
РФ.ПолучитьКоординатыЯчейки("тз",тс,тк,в,л,н,п);
Атр = СоздатьОбъект("АтрибутФормы");
Атр.УстановитьАтрибут(Фрм,тк);
Атр.УстановитьКоординаты(л,в,п-л,н-в);
Атр.Рамка = 0;
Атр.РодительскоеОкно = Фрм.тз;
Свойство = тз.ПолучитьЗначение(тс,"Заказ");
Значение = тз.ПолучитьЗначение(тс,"Заказ");
Фрм.ПолучитьАтрибут(_тк).Видимость(1);
Активизировать(_тк,1);
КонецПроцедуры
Процедура ПриРедактированииСвойства()
РФ=СоздатьОбъект("РасширениеФормы");
Фрм=РФ.ПолучитьФорму();
тс = тз.ТекущаяСтрока();
Если тс = 0 Тогда
Возврат;
КонецЕсли;
_тк = тз.ТекущаяКолонка();
тк = тз.ПолучитьПараметрыКолонки(_тк);
в = "";
л = "";
н = "";
п = "";
РФ.ПолучитьКоординатыЯчейки("тз",тс,тк,в,л,н,п);
Атр = СоздатьОбъект("АтрибутФормы");
Атр.УстановитьАтрибут(Фрм,тк);
Атр.УстановитьКоординаты(л,в,п-л,н-в);
Атр.Рамка = 0;
Атр.РодительскоеОкно = Фрм.тз;
Свойство = тз.ПолучитьЗначение(тс,"Заказ");
Значение = тз.ПолучитьЗначение(тс,"Заказ");
Фрм.ПолучитьАтрибут(_тк).Видимость(1);
Активизировать(_тк,1);
КонецПроцедуры