Имя: Пароль:
1C
 
Как подключить индикатор?
0 iceborn
 
05.11.10
14:48
Никогда не подключал индикаторы. Подскажите как это осуществить? Осуществляю соединение с другой базой, грузится не очень быстро, и хочется прикрепить индикатор.

Есть процедура:

connection = Новый COMObject("V81.COMConnector");

connection = connection.Connect("File=""C:\1с\InfoBase2"";Usr="""";");
Номенклатура = connection.Справочники.Номенклатура;
Выборка = Номенклатура.Выбрать();
Пока Выборка.Следующий() Цикл
ПолеСписка1.Добавить(Выборка.Наименование);
КонецЦикла;
1 AndrejDen
 
05.11.10
14:54
ЭлементыФормы.Индикатор.МаксимальноеЗначение = Выборка.Количество();
Пока Выборка.Следующий() Цикл
ПолеСписка1.Добавить(Выборка.Наименование);
СчётчикСостояния = СчётчикСостояния + 1;
       ЭлементыФормы.Индикатор.Значение = СчётчикСостояния;
КонецЦикла;
2 iceborn
 
05.11.10
15:05
А так корректно будет работать индикатор?


Индикатор = ЭлементыФормы.Индикатор.МаксимальноеЗначение = 10;
connection = Новый COMObject("V81.COMConnector");

connection = connection.Connect("File=""C:\1с\InfoBase2"";Usr="""";");
Номенклатура = connection.Справочники.Номенклатура;
Выборка = Номенклатура.Выбрать();
Пока Выборка.Следующий() Цикл
ПолеСписка1.Добавить(Выборка.Наименование);
ЭлементыФормы.Индикатор.Значение = 10;
КонецЦикла;
3 Defender aka LINN
 
05.11.10
15:10
(2) Сам-то как думаешь?
4 AndrejDen
 
05.11.10
15:20
Еще раз

connection = Новый COMObject("V81.COMConnector");
connection = connection.Connect("File=""C:\1с\InfoBase2"";Usr="""";");
Номенклатура = connection.Справочники.Номенклатура;
Выборка = Номенклатура.Выбрать();
ЭлементыФормы.Индикатор.МаксимальноеЗначение = Выборка.Количество();
СчётчикСостояния = 0;
Пока Выборка.Следующий() Цикл
       ПолеСписка1.Добавить(Выборка.Наименование);
       СчётчикСостояния = СчётчикСостояния + 1;
       ЭлементыФормы.Индикатор.Значение = СчётчикСостояния;
КонецЦикла;
5 iceborn
 
05.11.10
15:22
Сразу грузится на 10% потом 100%.
6 iceborn
 
05.11.10
15:24
(4) Все точно как ты написал сделал, пишет:

Метод объекта не обнаружен (Количество)
ЭлементыФормы.Индикатор.МаксимальноеЗначение = Выборка.Количество();
7 AndrejDen
 
05.11.10
15:31
connection = Новый COMObject("V81.COMConnector");
connection = connection.Connect("File=""C:\1с\InfoBase2"";Usr="""";");
Запрос = connection.NewObject("Запрос");
Запрос.Текст = "ВЫБРАТЬ
   |    Номенклатура.Ссылка
   |ИЗ
   |    Справочник.Номенклатура КАК Номенклатура";

Выборка = Запрос.Выполнить.Выбрать();
ЭлементыФормы.Индикатор.МаксимальноеЗначение = Выборка.Количество();
СчётчикСостояния = 0;
Пока Выборка.Следующий() Цикл
       ПолеСписка1.Добавить(Выборка.Наименование);
       СчётчикСостояния = СчётчикСостояния + 1;
       ЭлементыФормы.Индикатор.Значение = СчётчикСостояния;
КонецЦикла;
8 ice777
 
05.11.10
15:36
(7) вот еще. Пусть думает.
9 iceborn
 
05.11.10
16:57
Метод объекта не обнаружен (Количество)
ЭлементыФормы.Индикатор.МаксимальноеЗначение = Выборка.Количество();

Ничего не понимаю где ошибка
10 AndrejDen
 
05.11.10
18:12
кинь весь твой код
11 iceborn
 
05.11.10
21:00
connection = Новый COMObject("V81.COMConnector");
connection = connection.Connect("File=""C:\1с\InfoBase2"";Usr="""";");
Запрос = connection.NewObject("Запрос");
Запрос.Текст = "ВЫБРАТЬ
   |    Номенклатура.Ссылка
   |ИЗ
   |    Справочник.Номенклатура КАК Номенклатура";

Выборка = Запрос.Выполнить().Выбрать();
ЭлементыФормы.Индикатор.МаксимальноеЗначение = Выборка.Количество();
СчётчикСостояния = 0;
Пока Выборка.Следующий() Цикл
       ПолеСписка1.Добавить(Выборка.Наименование);
       СчётчикСостояния = СчётчикСостояния + 1;
       ЭлементыФормы.Индикатор.Значение = СчётчикСостояния;
КонецЦикла;


Поле объекта не обнаружено (Наименование)
ПолеСписка1.Добавить(Выборка.Наименование);
12 AndrejDen
 
08.11.10
11:18
Ну эт уже слишком....
Понятно что наименования больше нет мы же запрос переделали

Возьми остановись на выборке...
Данные должны быть примерно там:

ПолеСписка1.Добавить(Выборка.Ссылка.Наименование);
13 iceborn
 
08.11.10
23:03
Спасибо разобрался
14 Defender aka LINN
 
08.11.10
23:08
А почему вы все пишете "ЭлементыФормы.Индикатор.Значение"? Этого же явно мало. Надо писать, как минимум "ЭтаФорма.ЭтаФорма.ЭтаФорма.ЭтаФорма.ЭтаФорма.ЭтаФорма.ЭтаФорма.ЭтаФорма.ЭтаФорма.ЭтаФорма.ЭтаФорма.ЭтаФорма.ЭтаФорма.ЭтаФорма.ЭтаФорма.ЭтаФорма.ЭлементыФормы.Индикатор.Значение"
Так же еще больше букв получается!
15 zzerro
 
08.11.10
23:17
(14) Не.. ну написать

Индикатор = Индикатор + 1;

религия не позволяет, слишком коротковато
16 Defender aka LINN
 
08.11.10
23:22
(15) Не, ну может им за количество символов платят :)
17 iceborn
 
09.11.10
10:53
(16) Ага, в двойне :)