Последние сообщения

#11
FormEx / Re: Доступ к панели строки сос...
Последний ответ от MWW_Ruza - 12 ноября 2026, 01:45
В общем, вот так работает:
Процедура ПриДвойномНажатииЛевойКнопкиВСтрокеСостояния(Конт, ИДпанели)
	Если ПустоеЗначение(КодПан) = 0 Тогда
		НайдПан	= Панель.НайтиПоКоду(КодПан);    
	Иначе	
		СтатусВозврата(0);
		Возврат;
	КонецЕсли;
	Панель.ВыбратьПанели();
	Пока Панель.ПолучитьПанель() = 1 Цикл
		Если Панель.Код = КодПан Тогда
			Если Панель.Видимость = 0 Тогда
				Если Вопрос("Включить режим сохранения запросов?", 4, 3) = 6 Тогда
					Панель.Видимость = 1;	
				КонецЕсли;
			Иначе
				Если ИДпанели = Панель.Код Тогда
					Если Вопрос("Выключить режим сохранения запросов?", 4, 3) = 6 Тогда
						Панель.Видимость = 0;    
					КонецЕсли;
				КонецЕсли;				
			КонецЕсли;
			Прервать;
		КонецЕсли;    
	КонецЦикла;
КонецПроцедуры
Думаю, так и через Добавление/Удаление панели заработает...
Но, теперь уже завтра.
#12
FormEx / Re: Доступ к панели строки сос...
Последний ответ от MWW_Ruza - 12 ноября 2026, 01:24
Понятно...
Если при "выключении" панели кликать на ней, то ничего не падает. А если в любом другом месте строки состояния - то краш... Буду думать, как обойти.
#13
FormEx / Re: Доступ к панели строки сос...
Последний ответ от MWW_Ruza - 12 ноября 2026, 01:10
Хм... И Видимость тоже роняет 1С, так:
Процедура ПриДвойномНажатииЛевойКнопкиВСтрокеСостояния(ИД)
	Если ПустоеЗначение(КодПан) = 0 Тогда
		НайдПан	= Панель.НайтиПоКоду(КодПан);    
	Иначе	
		СтатусВозврата(0);
		Возврат;
	КонецЕсли;
	Панель.ВыбратьПанели();
	Пока Панель.ПолучитьПанель() = 1 Цикл
		Если Панель.Код = КодПан Тогда
			Если Панель.Видимость = 0 Тогда
				Если Вопрос("Включить режим сохранения запросов?", 4, 3) = 6 Тогда
					Панель.Видимость = 1;	
				КонецЕсли;
			Иначе
				Если Вопрос("Выключить режим сохранения запросов?", 4, 3) = 6 Тогда
					Панель.Видимость = 0;    
				КонецЕсли;				
			КонецЕсли;
			Прервать;
		КонецЕсли;    
	КонецЦикла;
КонецПроцедуры
#14
FormEx / Re: Доступ к панели строки сос...
Последний ответ от MWW_Ruza - 12 ноября 2026, 00:48
Да, все ничего... Добавление панели работает.
Так:
Процедура ПриДвойномНажатииЛевойКнопкиВСтрокеСостояния(ИД)
    НайдПан    = Панель.НайтиПоНаименованию("РежОтл");
    Если НайдПан = 0 Тогда
        Если Вопрос("Включить режим сохранения запросов?", 4, 3) = 6 Тогда
            Панель.ДобавитьПанель("РежОтл", "Вкл. реж. сохр. запр.", 120,,1);
        КонецЕсли;
    Иначе
        Если Вопрос("Выключить режим сохранения запросов?", 4, 3) = 6 Тогда
            Панель.УдалитьПанель();    
        КонецЕсли;        
    КонецЕсли;
КонецПроцедуры

Но, УдалитьПанель() крашит 1С... Что я не так делаю?
#15
FormEx / Re: Доступ к панели строки сос...
Последний ответ от MWW_Ruza - 12 ноября 2026, 00:00
Хотя, наверное действительно плохо искал...
Вот, похоже это:

ДобавитьПанель(<?>,,,,)
Синтаксис:
ДобавитьПанель(<Наименование>,<Заголовок>,<Ширина>,<Стиль>,<Видимость>)
Назначение:
Метод добавляет панель с заданными параметрами. Панель становится текущей. В случае успеха возвращает код новой панели.
Панели, добавленные в основной части глобального модуля (после функций и процедур), будут расположены перед системными. Все остальные после системных.
Параметры:
<Наименование> - наименование панели, не обязательный, по умолчанию пустая строка;
<Заголовок> - заголовок панели, не обязательный, по умолчанию пустая строка;
<Ширина> - ширина панели, не обязательный, по умолчанию 20;
<Стиль> - стиль панели, не обязательный, по умолчанию 0;
<Видимость> - видимость панели, не обязательный, по умолчанию 0.
#16
FormEx / Доступ к панели строки состоян...
Последний ответ от MWW_Ruza - 11 ноября 2026, 23:54
Добрый день!
А вот интересно, сюда:

как-то можно джобраться?
Хочется сделать что-то типа такого:

На вскидку не нашел ничего такого, может плохо искал...
#17
FormEx / Re: Исходники Formex
Последний ответ от alyuev - 11 ноября 2026, 19:12
Альф, отправил тебе электронной почтой результаты анализа исходного кода. С помощью Fable 5.2, но с другим промтом. Тоже пожрал токенов, но чуть менее прожорливо.
#18
FormEx / Re: Исходники Formex
Последний ответ от alyuev - 11 ноября 2026, 13:35
И я попробовал сейчас проанализировать исходники Formex с помощью Fable 5.2 (обычно использовал Opus 5.5 и Sonnet). Так он мне за 5 минут сожрал весь мой 5часовой лимит и полез жрать деньгу, которую закидывал, как резерв! Ух... люто он пошел.

Из того, что успел заметить - он запустил 5 или 6 субагентов, и, к сожалению, я его не успел предупредить использовать Sonnet в качестве субагента. И он использовал себя же, т.е. Fable 5.2.

Пришлось экстренно отключать анализ.
#19
FormEx / Re: Исходники Formex
Последний ответ от Andrewalexk - 11 ноября 2026, 12:14
:)
привет
отпишись
потом можем предложить твои услуги Боре по 1с77
#20
FormEx / Re: Исходники Formex
Последний ответ от АЛьФ - 11 ноября 2026, 10:54
Решил тут прогнать исходники FormEx через DeepSeek. Обнаружилась куча критичных багов, есть предложения по оптимизации. Попробую на выходных поработать с советами ИИ. После этого выложу исходники.