Имя: Пароль:
1C
 
Как в форму списка документа программно добавить кнопку "открыть движения..."
0 Sersh
 
26.11.08
08:43
Собственно какое событие должно определяться для действия?
1 Sersh
 
26.11.08
08:45
Кнопка = КоманднаяПанель.Кнопки.Вставить(ИндексКнопкиДвиженийПоДокументу, "ДвиженияДокумента");
Кнопка.ТипКнопки = ТипКнопкиКоманднойПанели.Действие;
Кнопка.Текст     = "Движения";
Кнопка.Картинка = БиблиотекаКартинок.РегистрНакопления;
Действие = Новый Действие("ОткрытьДвижение"); //не работает не знаю че писать тут
Кнопка.Действие    = Действие;
2 and2
 
26.11.08
08:58
(1) ну а процедуру ОткрытьДвижение давай.
3 Sersh
 
26.11.08
08:59
Вопрос тогда другой: Как программно вызвать окошко выбора регистра для отображения движений документа.
4 and2
 
26.11.08
08:59
для БП.  
в ней типа того-

Если ЭлементыФормы.ДокументСписок.ТекущиеДанные = Неопределено тогда
       Возврат
   КонецЕсли;

   ОбщегоНазначения.РучнаяКорректировкаОсновнаяФорма(Ложь,ЭлементыФормы.ДокументСписок.ТекущиеДанные.Ссылка,
                                                     ЭлементыФормы.ДокументСписок.ТекущиеДанные.Ссылка.ПолучитьОбъект());
5 Sersh
 
26.11.08
09:00
Пэтому не могу понять что писать в процедуре ОткрытьДвижение
6 Sersh
 
26.11.08
09:01
нету у меня БП. Негде посмотреть. Что в РучнаяКорректировкаОсновнаяФорма???
7 Sersh
 
26.11.08
09:04
Я просто хочу понять есть ли программная команда эквивалентная добавлению в командную панель кнопки действия с действием открытия диалога с выбором объекта движения???
8 and2
 
26.11.08
09:11
(6) посмотри в УТ тогда.
откуда ж мне знать, что ты пользуешь.
9 Sersh
 
26.11.08
09:31
Да причем тут что я пользую? Дело в принципе: то что можно сделать ручками в конфигураторе (добавить действие открытия списка движений) можно сделать и программно чтобы не добавлять во всех формах списка документов. Вот я и пытаюсь проверить это утверждение.
10 and2
 
26.11.08
09:43
(9) потому что 1с только только дорастает до стандартизации и унификации.
помолчим о "нетленках".

в Ут это так сделано-

Если ЭлементыФормы.ДокументСписок.ТекущиеДанные = Неопределено тогда
       Возврат
   КонецЕсли;

   РаботаСДиалогами.НапечататьДвиженияДокумента(ЭлементыФормы.ДокументСписок.ТекущиеДанные.Ссылка);
Проблемы невозможно решaть нa том же уровне компетентности, нa котором они возникaют. Альберт Эйнштейн