1С, Поиск в табличной части элемента справочника, табличная часть справочника, справочник

1С

//ЭлСправочника – элемент справочника
//Параметры – имя табличной части справочника
//"Параметр" – поле, в котором производится поиск
//"Фото" – значение, которое необходимо найти в поле "Параметр"
//.ЗначениеПР – поле, из которого необходимо взять результат поиска

ЭлСправочника.Параметры.Найти("Фото", "Параметр").ЗначениеПР

Теги: 1С, Поиск в табличной части элемента справочника, табличная часть справочника, справочник

1С, Табличный документ, Печать табличного документа, ТабличныйДокумент, ТабДок, Макет, ПолучитьМакет, Область, ОбластьПечати, ПолучитьОбласть, Рисунок, Картинка, Печать, Шрифт, Текст

1С

//ТабДокПечать - табличный документ

//Рис1, Рис2 - рисунки из коллекции рисунков бласти макета

ЭлементыФормы.ТабДок.Очистить();
МакетЭтикетка = ПолучитьМакет("МакетЭтикетка");
ОбластьЭтикетка = МакетЭтикетка.ПолучитьОбласть("ОбластьЭтикетка");
НоваяЭтикетка = Новый Картинка("C:/1/КартинкаЭтикетка.jpg");
ОбластьЭтикетка.Рисунки.Рис1.Картинка = НоваяЭтикетка;
ОбластьЭтикетка.Рисунки.Рис2.Текст = Строка("Привет !!!");
ОбластьЭтикетка.Рисунки.Рис2.Шрифт = Новый Шрифт("Arial", 11, Истина);

ЭлементыФормы.ТабДок.ОбластьПечати = ОбластьЭтикетка;
ЭлементыФормы.ТабДок.АвтоМасштаб = Истина;
ЭлементыФормы.ТабДок.ОриентацияСтраницы = ОриентацияСтраницы.Портрет;
ЭлементыФормы.ТабДок.Вывести(ОбластьЭтикетка);
ЭлементыФормы.ТабДок.ВывестиГоризонтальныйРазделительСтраниц();

ЭлементыФормы.ТабДок.Напечатать();

//===================================================

ТабДок = Новый ТабличныйДокумент;
Макет = ПолучитьМакет("ЗаказНаПокупку");
ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");
ТабДок.Вывести(ОбластьЗаголовок);
ТабДок.Показать();

Теги: 1С, Табличный документ, ТабличныйДокумент, ТабДок, Макет, ПолучитьМакет, Область, ОбластьПечати, ПолучитьОбласть, Рисунок, Картинка, Печать, Шрифт, Текст

1С, Подключение к SQL-Server (ORACLE), COMОбъект, ADODB.Connection, ADODB.RecordSet, ADODB, SQL запрос

1С

Процедура КнопкаВыполнитьНажатие(Кнопка)
   Conn = Новый COMОбъект ("ADODB.Connection");
   Conn.Open("Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=Northwind");

   RS = Новый COMОбъект ("ADODB.RecordSet");
   RS.Open("select * from customers", Conn);

   Пока НЕ (RS.EOF) Цикл
       Сообщить(RS.Fields(1).Name());
       Сообщить(RS.Fields(1).Value());
       RS.MoveNext();
   КонецЦикла;

   RS.Close();
КонецПроцедуры

Небольшое описание ADODB

Теги: 1С, SQL-Server, ORACLE, COMОбъект, ADODB.Connection, ADODB.RecordSet, ADODB, SQL запрос

1С, запуск обработки, запустить обработку, открыть обработку программно

1С

//"ОбработкаДляЗапуска" - обработка, которую необходимо запустить

ЗапускаемаяОбработка = Обработки.ОбработкаДляЗапуска.Создать();
ФормаЗапускаемойОбработки = ЗапускаемаяОбработка.ПолучитьФорму();
ФормаЗапускаемойОбработки.Открыть();

Теги: 1С, запуск обработки, запустить обработку, открыть обработку программно

1С, обход (перебор) элементов формы, определение типа элемента формы, изменение цвета элемента формы, элемент формы, цвет, ТекущийЭлемент, тип значения, ТипЗнч

1С

НовыйЦвет = Новый Цвет(240, 235, 222);
Для Каждого Контрол Из ЭтаФорма.ЭлементыФормы Цикл
   Если ТипЗнч(Контрол) = Тип("Надпись") Тогда
       Контрол.ЦветФона = НовыйЦвет;
   КонецЕсли;
КонецЦикла;

ЭтаФорма.ТекущийЭлемент.ЦветФона = WebЦвета.Аквамарин;

Теги: 1С, элементы формы, тип элемента формы, цвет элемента формы, элементы формы, цвет, ТекущийЭлемент, ЦветФона, тип значения, ТипЗнч

1С, внешняя компонента AddHook.dll, перехват событий клавиатуры, события клавиатуры

1С

//Компонента AddHook.dll служит для перехвата событий клавиатуры.
//Подключение внешней компоненты AddHook.dll должно находиться в процедуре "ПриНачалеРаботыСистемы" или "ПриОткрытии".
//Переменную "GlobalReg" нужно объявить в глобальном модуле (Перем GlobalReg Экспорт;).

Процедура ПриНачалеРаботыСистемы()
   ЗагрузитьВнешнююКомпоненту("AddHook.dll");
   GlobalReg = Новый("AddIn.AddHookExtension");
   GlobalReg.HookEnabled = 1;   // Включаем Hook
КонецПроцедуры

//В процедуре "ПередЗавершениемРаботыСистемы" необходимо отключить внешнюю компоненту AddHook.dll
Процедура ПередЗавершениемРаботыСистемы(Отказ)
   GlobalReg.HookEnabled = 0;
   GlobalReg = 0;
КонецПроцедуры

//Обработка событий клавиатуры должна находиться в процедуре "ВнешнееСобытие(Источник, Событие, Данные)"
Процедура ВнешнееСобытие(Источник, Событие, Данные)
   Если Данные = "00038" Тогда
       Сообщить("Нажата кнопка Стрелка вверх");
   КонецЕсли;
КонецПроцедуры

Скачать внешнюю компоненту AddHook.dll

Теги: 1С, Внешняя компонента AddHook.dll, перехват событий клавиатуры, события клавиатуры