Фигасе подарочек выпал. Пару часов назад сидел и думал, как бы так в форуме намекнуть что прям жить не могу без такого провайдера, и тут на тебе. Миша, ты телепат?
Пошел отмечать сие событие...


P.S. На том же месте? Или завтра соберется?

Давно народ ждал этого! Спасибо!

Нарвался на непонятный и неприятный момент. Что делаю:
1. Создаю ИТ, содержащей 2 колонки: "Элемент" и "Родитель". На форме есть списокЗначений ("спГрупп"), куда выгружаются все группы:

Перем тпНаФорме;//:ТабличноеПоле
//*******************************************
Процедура СоздатьТП()
	итРезультат=СоздатьОбъект("ИндексированнаяТаблица");
	БД=СоздатьОбъект("OLEDBData");
	Каталог=?(Прав(КаталогИБ(), 1)= "\", Лев(КаталогИБ(), СтрДлина(КаталогИБ())-1), КаталогИБ());
	СтрокаСоединения="Provider=VFPOLEDB.1;Deleted=Yes;Data Source="+Каталог+";Mode=ReadWrite;Collating Sequence=Machine;";;
	Рез=БД.Соединение(СтрокаСоединения);
	Запрос=БД.СоздатьКоманду();

	ТекстЗапроса="
	|SELECT Спр.ID as [Элемент $Справочник.Контрагенты]
	|	,Род.ID as [Родитель $Справочник.Контрагенты]
	|FROM $Справочник.Контрагенты as Спр
	|LEFT JOIN $Справочник.Контрагенты as Род ON Род.ID=Спр.ParentID
	|";
	итРезультат.Загрузить(Запрос.ВыполнитьИнструкцию(ТекстЗапроса));
	итРезультат.ДобавитьИндекс("Родитель","Родитель");
	итРезультат.Выгрузить(спГрупп, "Родитель", "Родитель", 1);

	Поставщик=СоздатьОбъект("ПоставщикДанныхИТ");
	Поставщик.ИндексированнаяТаблица=итРезультат;
	тпНаФорме.ПоставщикДанных=Поставщик;

	Колонка=тпНаФорме.Колонки.Добавить("Элемент");
	Колонка.Данные = "Элемент";
	Колонка=тпНаФорме.Колонки.Добавить("Родитель");
	Колонка.Данные = "Родитель";
КонецПроцедуры	// СоздатьТП 

2. Хочу, чтобы ТП менялось при выьоре группы из списка. Пишу:

Процедура ПриВыбореРодителя()
	ТекРодитель=спГрупп.ПолучитьЗначение(спГрупп.ТекущаяСтрока());
	тпНаФорме.ПоставщикДанных.ИндексированнаяТаблица.УстановитьФильтр(ТекРодитель, ТекРодитель, "Родитель");
	тпНаФорме.ПоставщикДанных.Индекс="Родитель";
	тпНаФорме.ОбновитьСтроки();
КонецПроцедуры	// ПриВыбореРодителя 

Вроде бы всё нормально, НО при последующем выборе первый видимый элемент не перерисовывается. Т.е. была группа "Физ.лица" с первым элементом "Иванов", выбираем из списка групп "Юр.Лица", - всё поменялось кроме первого элемента, который так и остался = "Иванов". Если прокрутить вниз, а потом обратно вверх, то всё становится на свои места. 

Если кому-то лень делать тест, прикладываю здесь.

kms

Дождались, СПАСИБО!

Привиду пример как всё это происходит у меня.
1. Заполняем ИТ
2. Устанавливаем фмльтр по "Родителю" = "Юр лица":

4. Прокручиваем ПОДАЛЬШЕ вниз, и возвращаемс обратно:

PVR писал(а) 01. Мая 2008 :: 08:12:

Проверял на версии от Uzhast все ОК,
на версии от kms подтверждаю баг.

В тесте заменял:
    итРезультат.Загрузить(Запрос.ВыполнитьИнструкцию(ТекстЗапроса));
на      
    Запрос.ВыполнитьИнструкцию(ТекстЗапроса,итРезультат);
для версии от Uzhast

JohnyDeath

Да, и не надо индекс каждый раз переставлять.
Достаточно изменить фильтр и обновить строки.

Кроме того, желательно ставить индекс ДО подключения поставщика к ТП.
В этом случае поведение вертикального скроллбара четко фиксировано.
В зависимости от типа индекса поведение будет разное.

Как-то так должно быть:
Создание:

	Поставщик=СоздатьОбъект("ПоставщикДанныхИТ");
	Поставщик.ИндексированнаяТаблица=итРезультат;
	Поставщик.Индекс="Родитель";
	тпНаФорме.ПоставщикДанных=Поставщик;
 

Фильтрация:

	ТекРодитель=спГрупп.ПолучитьЗначение(спГрупп.ТекущаяСтрока());
	тпНаФорме.ПоставщикДанных.ИндексированнаяТаблица.УстановитьФильтр(ТекРодитель, ТекРодитель, "Родитель");
	тпНаФорме.ОбновитьСтроки();