 |
www.integro.ru
ЦСИ ИНТЕГРО
|
| Предыдущая тема :: Следующая тема |
| Автор |
Сообщение |
Вячеслав
Зарегистрирован: 05.02.2008
Сообщения: 2
|
 Добавлено: Вт 05 Фев 2008 16:46 Заголовок сообщения: Переход по координатам |
 |
|
| Допустим у меня есть координаты X и Y и я хочу переместить туда пользователя(показать) или есть допустим видимый объект и я его хочу показать, как это сделать, если какая то функция для этого? |
|
| Вернуться к началу |
|
 |
Вячеслав
Зарегистрирован: 05.02.2008
Сообщения: 2
|
| Добавлено: Вт 05 Фев 2008 20:27 Заголовок сообщения: |
|
|
| ну скажем, я создал объект добавил координаты вообщем описал его из файла(по анологии http://www.integro.ru/forum/viewtopic.php?t=407), но вот беда... Создать его создал, выделил, но пользователь его просто не видит, потому как он за гранью экрана, как его навести на вновь созданный объект? |
|
| Вернуться к началу |
|
|
RuslanG
Зарегистрирован: 10.07.2005
Сообщения: 171
Откуда: ИНТЕГРО
|
| Добавлено: Ср 06 Фев 2008 11:13 Заголовок сообщения: |
|
|
Пример реализации позиционирования окна карты на пространственный объект:
| Код: | uses Geomet;
procedure TTestForm.FitToMapObject(aMapObjectID: String);
function GetBounds: TDRect;
var
i: Integer;
aMapObjects: IIngeoMapObjects;
aMapObject: IIngeoMapObject;
aX1, aX2, aY1, aY2: Double;
begin
Result.Clear;
aMapObjects := FIngeo.ActiveDb.MapObjects;
aMapObject := aMapObjects.GetObject(aMapObjectID);
for i := 0 to aMapObject.Shapes.Count - 1 do begin
aMapObject.Shapes[i].Contour.GetBounds(aX1, aY1, aX2, aY2);
if i = 0 then begin
Result.Assign(aX1, aY1, aX2, aY2);
end
else begin
Result.Expand(DPoint(aX1, aY1));
Result.Expand(DPoint(aX2, aY2));
end;
end;
aMapObjects.UpdateChanges;
end;
var
aMapObjectBounds: TDRect;
begin
aMapObjectBounds := GetBounds;
with aMapObjectBounds do begin
FIngeo.MainWindow.MapWindow.Navigator.FitWorldBounds(X1, Y1, X2, Y2, infitAlwaysScale);
end;
end; |
_________________
С уважением, Руслан Гадеев
Видео уроки ИнГео
Документация ИнГео
Обновления ИнГео
Интегропедия |
|
| Вернуться к началу |
|
|
|
|
Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете голосовать в опросах
Вы не можете добавлять приложения в этом форуме
Вы можете скачивать файлы в этом форуме
|
|
FAQ
Поиск
Пользователи
Группы
Регистрация
Профиль
Войти и проверить личные сообщения
Вход
