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

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

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

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

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

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

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

Пришлось экстренно отключать анализ.
#10
FormEx / Re: Исходники Formex
Последний ответ от Andrewalexk - Вчера в 12:14
:)
привет
отпишись
потом можем предложить твои услуги Боре по 1с77