TRecord

Ta stran je trenutno še v izdelavi.

Razred TRecord vsebuje informacije o zapisoh v podatkovni plasti.

Osnovne lastnosti

TopologyType

Lastnost TopologyType določa tip topologije, katera je lahko ena od Topology type konstant.

RO Property TRecord.TopologyType As Long
Result	Long	.

Dim Rec As TRecord
Rec = [SomeLayer].AllRecords.Items (0)
Select Case Rec.TopologyType
  Case ttPoint //točka
    Message ("Topologija","Točka")
  Case ttPolyLine //Polilinija
    Message ("Topologija","Polilinija")
  Case ttPolygon //Poligon
    Message ("Topologija","poligon")
  Case ttRectangle // Pravokotnik
    Message ("Topologija","Karta")
EndSelect

X

Lastnost X določa X koordinato za aktivi zapis.

RO Property TRecord.X As Float
Result	Float	.

Dim Rec As TRecord
Rec = [SomeLayer].AllRecords.Items (0)
 CenterY = Rec.Y
 CenterX = Rec.X
redraw

Y

Lastnost Y določa horizontalno koordinato za aktivi zapis.

RO Property TRecord.Y As Float
Result	Float	.

Z

Lastnost Z .

RO Property TRecord.Z As Float
Result	Float	.

ID

Lastnost ID določa ID zapisa.

RO Property TRecord.ID As Long
Result	Long	.

PolyArea

Lastnost PolyArea določa površino poligona v kvadratnih metrih.

RO Property TRecord.PolyArea As Float
Result	Float	.

PolyAreaExact

Lastnost PolyAreaExact izračuna pravilno površino poligona, brez vsebovanih lukenj ali otokov. Površina je v kvadratnih metrih.

RO Property TRecord.PolyAreaExact As Float
Result	Float	.

PolyLength

Lastnost PolyLength določa dolžino polilinije v metrih.

RO Property TRecord.PolyLength As Float
Result	Float	.

PolyPerimeter

Lastnost PolyPerimeter določa obseg poligona v metrih.

RO Property TRecord.PolyPerimeter As Float
Result	Float	.

PolyCount

Lastnost PolyCount določa število vertexov (lomnih točk) na poliliniji ali poligonu.

RO Property TRecord.PolyCount As Long
Result	Long	.

Dim Rec As TRecord
Rec = [Naselja Nova].AllRecords.Items (0)
Select Case Rec.TopologyType
  Case ttPoint //point
  Case ttPolyLine, ttPolygon
    Hint (IntToStr(Rec.PolyCount))
EndSelect

PolyX

Lastnost PolyX določa X koordinato za index-to lomno točko na poliliniji ali poligonu.

RO Property TRecord.PolyX (Index As Long) As Float
Index	Long	Index lomne točke.
Result	Float	Vertikalna vrednost točke.

PolyXScreen

Lastnost PolyXScreen vrne vertikalno ekransko točko za podano zaporedno lomno točko na poliliniji ali poligonu.

RO Property TRecord.PolyXScreen (Index As Long) As Long
Index	Long	Index lomne točke.
Result	Long	Vertikalna vrednost točke.

PolyY

Lastnost PolyY določa Y koordinato za podano zaporedno lomno točko na poliliniji ali poligonu.

RO Property TRecord.PolyY (Index As Long) As Float
Index	Long	Index lomne točke.
Result	Float	Horizontalna vrednost točke.

PolyYScreen

Lastnost PolyYScreen vrne horizontalno ekransko točko za podano zaporedno lomno točko na poliliniji ali poligonu.

RO Property TRecord.PolyYScreen (Index As Long) As Long
Index	Long	Index lomne točke.
Result	Long	Horizontalna vrednost točke.

PolyZ

Lastnost PolyZ določa Z koordinato za podano točko na poliliniji ali poligonu.

RO Property TRecord.PolyZ (Index As Long) As Float
Index	Long	Index lomne točke.
Result	Float	Višina točke.

PointArray

Lastnost PointArray kreira, nastavi ali poda TPointArray objekt, ki predstavlja polilinijo ali poligon. Po uporabi se mora objekt uničiti.

RO Property TRecord.PointArray As TPointArray
Result	TPointArray	.

Dim PA As TPointArray
PA = CurRec.PointArray
...
PA.Destroy

PointArrayExact

Lastnost PointArrayExact .

RO Property TRecord.PointArrayExact As TPointArray
Result	TPointArray	.

Mejne vrednosti

MaxX

Lastnost MaxX določa največjo vrednost X koordinate za podani zapis.

RO Property TRecord.MaxX As Float
Result	Float	.

Dim Rec As TRecord
rec = [SomeLayer].AllRecords.Items (0)
Window (Rec.MinY-1000, Rec.MinX-1000, Rec.MaxY+1000, Rec.MaxX+1000)
redraw

MaxY

Lastnost MaxY določa največjo vrednost Y koordinate za podani zapis.

RO Property TRecord.MaxY As Float
Result	Float	.

MaxZ

Lastnost MaxZ določa največjo Z koordinato v zapisu.

RO Property TRecord.MaxZ As Float
Result	Float	.

MinX

Lastnost MinX določa najmanšo vrednost X koordinate za podani zapis.

RO Property TRecord.MinX As Float
Result	Float	.

MinY

Lastnost MinY določa najmanjšo vrednost Y koordinate za podani zapis.

RO Property TRecord.MinY As Float
Result	Float	.

MinZ

Lastnost MinZ določa najmanjšo Z koordinato v zapisu.

RO Property TRecord.MinZ As Float
Result	Float	.

Lok, krog

Radius

Lastnost Radius določa radij kroga ali loka.

RO Property TRecord.Radius As Float
Result	Float	.

StartAngle

Lastnost StartAngle določa začetni kot loka.

RO Property TRecord.StartAngle As Float
Result	Float	.

EndAngle

Lastnost EndAngle vam vrne končni kot loka.

RO Property TRecord.EndAngle As Float
Result	Float	.

Razno

AngleAtPolyLength

Lastnost AngleAtPolyLength .

RO Property TRecord.AngleAtPolyLength (Length As Float) As Float
Length	Float	.
Result	Float	.

BuildError

Lastnost BuildError .

RO Property TRecord.BuildError As Long
Result	Long	.

GetBoundingWindow

Lastnost GetBoundingWindow .

RO Property TRecord.GetBoundingWindow (Offset As Float) As String
Offset	Float	.
Result	String	.

PointAtPolyLength

Metoda PointAtPolyLength vrne koordinate točke, ki leži na poliliniji na podani dolžini.

Method TRecord.PointAtPolyLength (Length As Float, ByRef Y, ByRef X As Float)
Length	Float	Dolžina od začetka polilinije, kjer naj bi ležala točka.
Y	ByRef Float	Y koordinate točke.
X	ByRef Float	X koordinate točke.

Dim Ya, Xa as Float
CurRec = [SomeLayer].AllRecords.Items (0)
CurRec.PointAtPolyLength (200, Ya, Xa)
Message ("Koordinata", FloatToStr(Ya) + "-"+FloatToStr(Xa))

WindowLocked

Lastnost WindowLocked določa True, če je bil zapis zaklenjen pri zaklepanju za potrebe topološkega editiranja.

RO Property TRecord.WindowLocked As Boolean
Result	Boolean	.

ztCombination

Lastnost ztCombination .

RO Property TRecord.ztCombination (OP As String, ZV, ZVM, ZE, ZEM As TStringList, DEF As Boolean) As Boolean
OP	String	.
ZV	TStringList	.
ZVM	TStringList	.
ZE	TStringList	.
ZEM	TStringList	.
DEF	Boolean	.
Result	Boolean	.

ztGetLists

Lastnost ztGetLists .

RO Property TRecord.ztGetLists (L As TLayer, ZV, ZE As TStringList, DI1, DI2, DZ1, DZ2, DL1, DL2, DS1, DS2, DP1, DP2, VA1, VA2 As Long) As Boolean
L	TLayer	.
ZV	TStringList	.
ZE	TStringList	.
DI1	Long	.
DI2	Long	.
DZ1	Long	.
DZ2	Long	.
DL1	Long	.
DL2	Long	.
DS1	Long	.
DS2	Long	.
DP1	Long	.
DP2	Long	.
VA1	Long	.
VA2	Long	.
Result	Boolean	.