RUS  ENG 

Получение координат объекта

Страницы: 1
RSS
Получение координат объекта
 
Подскажите, пожалуйста, в чем ошибка:
Нужно определить координаты выделенного (мигающего) объекта (к примеру, той же станции метро)
Пытаюсь использовать для этих целей GetXY

function TSamplePlugin.OnZuluEvent(EventID: Integer;
const Source: IUnknown; Param1, Param2, Param3: OleVariant): Integer;
var
options: TLocateOptions;
DateA: WideString;
Elm: IElement;
XX,YY:Double;
EndResult: String;
begin
if EventID = evMapCurIDChanged then
begin
Table1.Locate( 'Sys', Param2, options );
...
Elm.GetXY(XX,YY);//В XX и YY ничего не возвращает, но как правильно использовать GetXY не пойму.
EndResult := FloatToStr(XX)+' '+FloatToStr(YY);
Edit3.Text := EndResult;
end;
end;


Заранее спасибо
 
разобрался сам
Страницы: 1