TTransform

Ta stran je trenutno še v izdelavi.

Razred TTransform je namenjen transformaciji koordinat.

Tipično se uporablja na dva načina.

Uporabnik lahko sam nastavi parametre v prikazanem oknu:

 // odpre masko z nastavitvami in nato izvede transformacijo
 If Transform.Edit Then
   Transform.Execute
 EndIf

ali pa izvede transformacijo s fiksnimi nastavitvami:

 // naredi nekaj
 Transform.InputLayer = [ime plasti]
 Transform.OutputLayer = L2
 Transform.TransformType = 1
 Transform.TransformLayer = L
 Transform.TransformCoorType = 2
 If InputPolygon ("Vnesi območje transformacije", PA) Then
   Transform.Area = PA
   Destroy (PA)
 Else
   Transform.Area = Nil
 EndIf
 Transform.Execute

Edit

Method TTransform.Edit As Boolean

Metoda Edit odpre masko za roćno določanje nastavitev transformacije. Metoda vrne true/false glede na to, ali je uporabnik zapustil masko s Potrdi oz. Opusti.

Execute

Method TTransform.Execute As Boolean

Metoda Execute izvede transformacijo podatkov iz vhodne v izhodno podatkovno plast. Metoda vrne true/false glede na to, ali se je transformacija uspešno izvedla.

InputLayer

Property TTransform.InputLayer As TLayer

Lastnosti InputLayer nastavimo vhodno podatkovno plast transformacije. Kadar se nastavi InputRecordList, je ni potrebno nastavljati, ker se upošteva kar podatkovna plast iz liste zapisov.

InputRecordList

Property TTransform.InputRecordList As TRecordList

Lastnosti InputRecordList nastavimo vhodno listo zapisov transformacije. Če se ne nastavi oz. je nastavljena na nil, se privzame lista vseh zapisov. Če se nastavi, ni potrebno dodatno nastavljati InputLayer, saj se plast prevzame iz liste zapisov.

TransformType

0 - Linearna transformacija 1 - Po kvadratu oddaljenosti 2 - Kvadrat oddaljenosti (Veliko transformacijskih točk) 3 - Med koordinatnimi sistemi

TransformCoorType

0 - Centroid + Nova lokacija 1 - Centroid + Stara lokacija 2 - Linija (stare proti novi lokaciji)

           '

TransformFieldX

OutputLayer|Property TTransform.OutputLayer As TLayer

Lastnost OutputLayer nastavlja izhodno plast transformacije. Če se ne nastavi, se avtomatsko naredi nova plast in je po Execute ukazu shranjena referenca na novo plast. Če pa je nastavljena, se podatki in struktura obstoječe plasti briše in ponovno nastavi iz vhodne plasti za transformacijo.

Transform.OutputLayer = [Ime Plasti]

Area

Property TTransform.Area As TPointArray

Property Area .

Result

Property TPOINTARRAY

.

2010-03-19 18:09:32

Edit

Method TTransform.Edit As Boolean

Method Edit .

Result

Method BOOLEAN

.

2010-03-19 18:09:32

Execute

Method TTransform.Execute As Boolean

Method Execute .

Result

Method BOOLEAN

.

2010-03-19 18:09:32

InputLayer

Property TTransform.InputLayer As TLayer

Property InputLayer .

Result

Property TLAYER

.

2010-03-19 18:09:32

InputRecordList

Property TTransform.InputRecordList As TRecordList

Property InputRecordList .

Result

Property TRECORDLIST

.

2010-03-19 18:09:32

OutputLayer

Property TTransform.OutputLayer As TLayer

Property OutputLayer .

Result

Property TLAYER

.

2010-03-19 18:09:32

TransformBasePointAngle

Property TTransform.TransformBasePointAngle As Float

Property TransformBasePointAngle .

Result

Property FLOAT

.

2010-03-19 18:09:32

TransformBasePointDeltaX

Property TTransform.TransformBasePointDeltaX As Float

Property TransformBasePointDeltaX .

Result

Property FLOAT

.

2010-03-19 18:09:32

TransformBasePointDeltaY

Property TTransform.TransformBasePointDeltaY As Float

Property TransformBasePointDeltaY .

Result

Property FLOAT

.

2010-03-19 18:09:32

TransformBasePointFacX

Property TTransform.TransformBasePointFacX As Float

Property TransformBasePointFacX .

Result

Property FLOAT

.

2010-03-19 18:09:32

TransformBasePointFacY

Property TTransform.TransformBasePointFacY As Float

Property TransformBasePointFacY .

Result

Property FLOAT

.

2010-03-19 18:09:32

TransformBasePointX

Property TTransform.TransformBasePointX As Float

Property TransformBasePointX .

Result

Property FLOAT

.

2010-03-19 18:09:32

TransformBasePointY

Property TTransform.TransformBasePointY As Float

Property TransformBasePointY .

Result

Property FLOAT

.

2010-03-19 18:09:32

TransformCoorType

Property TTransform.TransformCoorType As Long

Property TransformCoorType .

Result

Property LONG

.

2010-03-19 18:09:32

TransformFieldX

Property TTransform.TransformFieldX As TField

Property TransformFieldX .

Result

Property TFIELD

.

2010-03-19 18:09:32

TransformFieldY

Property TTransform.TransformFieldY As TField

Property TransformFieldY .

Result

Property TFIELD

.

2010-03-19 18:09:32

TransformInputCS

Property TTransform.TransformInputCS As String

Property TransformInputCS .

Result

Property STRING

.

2010-03-19 18:09:32

TransformLayer

Property TTransform.TransformLayer As TLayer

Property TransformLayer .

Result

Property TLAYER

.

2010-03-19 18:09:32

TransformOutputCS

Property TTransform.TransformOutputCS As String

Property TransformOutputCS .

Result

Property STRING

.

2010-03-19 18:09:32

TransformRecordList

Property TTransform.TransformRecordList As TRecordList

Property TransformRecordList .

Result

Property TRECORDLIST

.

2010-03-19 18:09:32

TransformType

Property TTransform.TransformType As Long

Property TransformType .

Result

Property LONG

.