GETPOINTADR
Akcia GETPOINTADR
Funkcia
Získanie adresy meraného bodu.
Deklarácia
GETPOINTADR pointIdent, adr1_Txt, adr2_Txt, retIdent_IntParametre
pointIdent | in | Odkaz na objekt typu Meraný bod. |
adr1_Txt | out | Identifikátor typu Text. |
adr2_Txt | out | Identifikátor typu Text. |
retIdent_Int | out | Identifikátor typu Int - návratový kód. |
Popis
Akcia zistí adresu meraného bodu daného parametrom pointIdent. Adresa je reprezentovaná dvoma reťazcami (adr1_Txt, adr2_Txt).
Ak zistenie adresy bolo úspešné, hodnota parametra retIdent_Int je 0 a parametre adr1_Txt, adr2_Txt sú naplnené príslušnými hodnotami.
Príklad
BEGIN
INT _retIdent
TEXT _adr1, _adr2
GETPOINTADR M.bod, _adr1, _adr2, _retIdent
IF _retIdent = _ERR_NO_ERROR THEN
MESSAGE "Adresa meraneho bodu M.bod:" + _adr1 + ", " + _adr2 ON srvskol1v.HIP
ELSE
MESSAGE "Nepodarilo sa zistit adresu meraneho bodu M.bod" ON srvskol1v.HIP
ENDIF
END Súvisiace stránky: