Вот как бывает...
Восстановил базу клиента из архива.
Нашел проблемный для клиента документ. Открыл и увидел свое сообщение и за одно Ошибка компоненты 1С++
т.к. такая ошибка попадалась и раньше решил спросить на форуме.
Потом решил повторить ситуацию. Опять восстановил из архива базу. Опять открыл документ... и кроме своего сообщения на это раз ничего не увидел.
1С++ версии 2.0.3.1
Но бывало и на 2.0.2.2
А вотна 1.8.1.6 не припомню... вроде не было...

fez писал(а) 08. Сентября 2006 :: 06:24:


Какой скриншот... В окне сообщений обычное текстовое сообщение Ошибка компоненты 1С++
Да и выскакивает иногда... редко...как выскочит могу и скриншот дать... но что это даст...

Цитата:


Точно. Лажанулся.
Спасибо АЛьФ
Буду думать... Это все происходит в глобальнике Процедура ПослеОткрытия(Конт)
Но что самое не приятное - иногда....

Цитата:

	Разрешение=0;
	Тип="";
	Вид="";  
	Попытка
		ФормаРасш=СоздатьОбъект("РасширениеФормы");
		ФормаРасш.УстановитьФорму(Объект.Форма);
		Тмп=ФормаРасш.ПолныйТипОбъекта();

		Тип=Лев(Тмп,Найти(СокрЛП(Тмп),".")-1);
		Тмп=Прав(Тмп,СтрДлина(Тмп)-Найти(СокрЛП(Тмп),"."));
		Вид=Лев(Тмп,Найти(СокрЛП(Тмп),".")-1);
	Исключение
		Попытка
			// для модуля проведения документа
			Тип=ТипЗначенияСтр(Объект.ТекущийДокумент());
			Вид=Объект.Вид();
		Исключение
			Сообщить("Ошибка компоненты 1С++");
			Возврат 1; // все разрешено
		КонецПопытки;
	КонецПопытки;

 

Цитата:


А как он может быть пустым

Процедура ПослеОткрытия(Конт)
	Тмп=ГлПроверкаПрав(Конт);
...
 

Функция ГлПроверкаПрав(Объект,ТипПроверки=0) Экспорт

	//глВернутьТипКонтекста(Объект);

	Если Константа.ПроверкаПравВключена=Нет Тогда
		Возврат 1;
	КонецЕсли;

	Если глПользователь.ТекущийЭлемент().КонтрольПрав=0 Тогда
		Возврат 1;
	КонецЕсли;



	// типы проверки
	// 0 - на чтение (открытие)
	// 1 - на создание
	// 2 - на редактирование
	// 3 - на копирование
	// 4 - на проведение
	// 5 - на проведение задним числом
	// 6 - на удаление
	// 7 - на отмену проведения
	Разрешение=0;
	Тип="";
	Вид="";
	Попытка
		ФормаРасш=СоздатьОбъект("РасширениеФормы");
		ФормаРасш.УстановитьФорму(Объект.Форма);
		Тмп=ФормаРасш.ПолныйТипОбъекта();

		Тип=Лев(Тмп,Найти(СокрЛП(Тмп),".")-1);
		Тмп=Прав(Тмп,СтрДлина(Тмп)-Найти(СокрЛП(Тмп),"."));
		Вид=Лев(Тмп,Найти(СокрЛП(Тмп),".")-1);
	Исключение
		Попытка
			// для модуля проведения документа
			Тип=ТипЗначенияСтр(Объект.ТекущийДокумент());
			Вид=Объект.Вид();
		Исключение
			Сообщить("Ошибка компоненты 1С++");
			Возврат 1; // все разрешено
		КонецПопытки;
	КонецПопытки;

	 

Mashinist писал(а) 08. Сентября 2006 :: 13:02:

Он может быть пустым, например, при открытии формы списка констант.

Mashinist писал(а) 08. Сентября 2006 :: 13:11:

Тебе вот так прям все возможные случаи назвать?
Сделай вместо Сообщить("Ошибка компоненты 1С++");
такой вот код: Сообщить(ОписаниеОшибки());
И узнаешь из-за чего там исключение возникает.