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


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

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

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

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

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

Фильтрация:

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

Просто меняем индекс.
Особый случай - переход от обычного индекса к индексу "" (и наоборот) - я еще посмотрю, как там лучше сделать.

Да, и (на всякий случай): поставщик не простит, если в процессе работы индекс будет физически удален из ИТ.
Т.е. пока поставщик подключен и индекс у него установлен, этот индекс должен непрерывно существовать в ИТ.

Получить ИТЗ от Поставщика по аналогии с ТЗ реализовать можно или мудрить с наследником?

Вопрос снят

Arta писал(а) 01. Мая 2008 :: 22:23:

Не подтверждается.

Цитата:

Да, номера строк.

Т.к. ТП теперь может отображать несколько картинок и может принимать ИТ в качестве поставщика, разрешите немного пофантазировать.
Реально ли сделать из ТП с поставщиком ИТ, которое было сгруппировано и имеет колонку "тзПотомки", некое дерево? Т.е. чтобы можно было сворачивать/разворачивать потомков?

JohnyDeath писал(а) 03. Мая 2008 :: 07:53:

Конечно, реально.
Причем никакой дополнительной поддержки от ТП для построения дерева уже не требуется.
Ну, разве что событие "ПриВыбореКартинки" еще должно появиться.

lustin писал(а) 03. Мая 2008 :: 12:17:

Каким образом?
Нет, поближе к реальности, пожалуйста.

Ну, надо подумать, можно ли положить логику дерева на один специально составленный индекс и плоскую таблицу.
Я подумаю чуть позже, если никто раньше не сделает.

PVR писал(а) 03. Мая 2008 :: 17:37:

ОК, всецело поддерживаю.

Если поставщик - ИТ, то не работает:

тпНаФорме.НачальноеПредставление=0; 

т.е. при первом отображении текущей строкой всегда является последняя.
На всякий пожарный: http://www.1cpp.ru/bugs/show_bug.cgi?id=3827

Хм.
Документацию на "НачальноеПредставление" нашел.
Ну и ну.

Это значит, что все работает ровно так, как я задумал.
Но во избежание дальнейших недоразумений, поведение пришлось изменить.

(*) обновление ТП отключено для момента установки поставщика

Changed files:
icpp/Source/CursorGrid/VTExtProvider.cpp,1.3

===
Отключена привязка к текущей строке индекса при установке поставщика.
Для обновления ТП в дальнейшем требуется явный вызов

ТП.ОбновитьСтроки()

или установка свойства

ТП.ТекущаяСтрока

Будет в следующем снапшоте icpp/3.0.

JohnyDeath писал(а) 08. Мая 2008 :: 10:07:

Не волнуйся, с поставщиком ТЗ это никак не связано.
Переделывать не придется.

Такое поведение как будет в поставщике ИТ, кстати, реализовано также для поставщика ODBC.
Логика в том, что я хочу иметь возможность спозиционироваться на конкретную строку за одно обновление, а не за два.

JohnyDeath писал(а) 08. Мая 2008 :: 10:25:

С этим тоже все нормально будет
После последнего вливания будет влияние.

Наверное следует сделать составной индекс (ДатаПриема,ДругаяКолонка) и передавать его ТП.

mdocs писал(а) 16. Мая 2008 :: 13:40:

Не нужен.

Когда пользователь определится, по каким полям он будет фильтровать, ты создаешь индекс по данным полям отбора плюс поля сортировки ("Наименование" в данном случае).
Далее накладываешь фильтр методом "Подмножество" на поля отбора.
Все.

mdocs писал(а) 16. Мая 2008 :: 16:31:

Ну я же четко написал - наименование идет первым ПОСЛЕ полей фильтра.

+
Ну, если это кажется сложновато  - можно вообще в два этапа сделать.
Выгружаешь отфильтрованные данные из исходной ИТЗ во временную ИТЗ (или ТЗ), сортируешь - и телемаркет.

Короче кто прочитал.. простите что смутил народ, я сам ступил, каждый раз обнулял данные на кой черт не помню... в общем приношу извинения за дезинформацию

Это противоречит идеологии ИТ, таблица никогда не меняется, изменения только в индексе

vandalsvq писал(а) 02. Сентября 2008 :: 05:08:


Так нумеруй их сам и заведи индекс по этому полю. А вставка в любое месть для ИТ по моему лишнее.

Здравствуйте!

Подскажите, как правильно обновить ТП?

Есть ТП + ПоставщикДанныхИТ + ИТ.
В цикле в ИТ добавляются строки.

Нужно сделать, чтобы после добавления каждой новой строки в ИТ, ТП обновилось и показало эту последнюю строку.
Какие методы каких объектов для этого нужно вызвать?

Сейчас у меня сделано просто вот так:
[code c++]

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

[/code]

Вроде работает, но интерфейс сильно "дергается" при этом.
Можно ли это сделать как-то по другому, чтобы было меньше "дерганий"?

[quote author=695A4A5D52280 link=1209592007/54#54 date=1720527877]
чтобы было меньше "дерганий" не надо вызывать ОбновитьСтроки() в цикле...
[/quote]

Идею понял, спасибо.

Непосредственно добавление и заполнение строки выполняется быстро - по сути это время выполнения метода ИТ.НоваяСтрока().
А вот "вычисление" нужных значений перед заполнением строки может выполняться  от долей секунды до нескольких секунд. Поэтому была мысль сделать отображение каждой строки.

Пока ждал здесь ответа, этот вопрос обсудили на Мисте:
https://forum.mista.ru/topic/894401

Оказалось, что мелькание происходит при включенном вертикальном скроллбаре.
Если при создании ТП у него включается "ВертСкроллер = 1":
[code c++]
     мТабличноеПоле = мФорма.СоздатьЭлементУправления("ТабличноеПоле", "дКнТабличноеПоле");
     мТабличноеПоле.ВертСкроллер = 1;
[/code]