Предыдущая тема :: Следующая тема |
Автор |
Сообщение |
nawakster
Зарегистрирован: 17.06.2008 Сообщения: 59
|
Добавлено: Пт 01 Авг 2014 17:28 Заголовок сообщения: Спозиционировать выделение |
|
|
Господа, подскажите.
Выделил несколько объектов.
Как на них спозиционироваться.
F3 - программно нажать?
У Selection и Navigator - ничего похожего не нашел. |
|
Вернуться к началу |
|
 |
APopov
Зарегистрирован: 19.06.2006 Сообщения: 347 Откуда: Самара
|
Добавлено: Пт 01 Авг 2014 18:31 Заголовок сообщения: |
|
|
есть 2 пути:
1) пробежаться по всем объектам и сформировать общий баундбокс, затем IIngeoNavigator.FitWorldBounds
2) Вызвать акшон позиционирования (который F3):
Код: | const
fitOrPosActNames :array[boolean] of string =
('ActionsViewPosSelection', 'ActionsViewFitSelection');
procedure SelectObjAndPosOnIt(const aIngeoApp:IIngeoApplication;
const aObjID:string; fitOrPos:boolean);
begin
try
if aObjID<>'' then aIngeoApp.Selection.SelectAlone(aObjID, 0);
aIngeoApp.MainWindow.Actions.Item[fitOrPosActNames[fitOrPos]].Execute;
except
end;
end;
|
_________________ ОАО "Самара-Информспутник",
инженер-программист Попов Артем |
|
Вернуться к началу |
|
 |
nawakster
Зарегистрирован: 17.06.2008 Сообщения: 59
|
Добавлено: Вт 05 Авг 2014 16:06 Заголовок сообщения: |
|
|
Спасибо. Получилось. |
|
Вернуться к началу |
|
 |
|