| Предыдущая тема :: Следующая тема   | 
	
	
	
		| Автор | 
		Сообщение | 
	
	
		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    Заголовок сообщения:  | 
				     | 
			 
			
				
  | 
			 
			
				| Спасибо. Получилось. | 
			 
		  | 
	
	
		| Вернуться к началу | 
		 | 
	
	
		  | 
	
	
		 |