TTransform

Iz SDMS
Jump to navigationJump to search
Ta stran je trenutno še v izdelavi.

Razred TTransform je namenjen transformaciji koordinat.

<my test="1">Vsebina</my>

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

TransformLayer

TransformRecordList

TransformCoorType

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

           '

TransformFieldY

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

Area

Property TTransform.Area As TPointArray

Property Area .

Result TPointArray .

2010-03-20 16:02:54

Edit

Method TTransform.Edit As Boolean

Method Edit .

Result Boolean .

2010-03-20 16:02:54

Execute

Method TTransform.Execute As Boolean

Method Execute .

Result Boolean .

2010-03-20 16:02:54

InputLayer

Property TTransform.InputLayer As TLayer

Property InputLayer .

Result TLayer .

2010-03-20 16:02:54

InputRecordList

Property TTransform.InputRecordList As TRecordList

Property InputRecordList .

Result TRecordList .

2010-03-20 16:02:54

OutputLayer

Property TTransform.OutputLayer As TLayer

Property OutputLayer .

Result TLayer .

2010-03-20 16:02:54

TransformBasePointAngle

Property TTransform.TransformBasePointAngle As Float

Property TransformBasePointAngle .

Result Float .

2010-03-20 16:02:54

TransformBasePointDeltaX

Property TTransform.TransformBasePointDeltaX As Float

Property TransformBasePointDeltaX .

Result Float .

2010-03-20 16:02:54

TransformBasePointDeltaY

Property TTransform.TransformBasePointDeltaY As Float

Property TransformBasePointDeltaY .

Result Float .

2010-03-20 16:02:54

TransformBasePointFacX

Property TTransform.TransformBasePointFacX As Float

Property TransformBasePointFacX .

Result Float .

2010-03-20 16:02:54

TransformBasePointFacY

Property TTransform.TransformBasePointFacY As Float

Property TransformBasePointFacY .

Result Float .

2010-03-20 16:02:54

TransformBasePointX

Property TTransform.TransformBasePointX As Float

Property TransformBasePointX .

Result Float .

2010-03-20 16:02:54

TransformBasePointY

Property TTransform.TransformBasePointY As Float

Property TransformBasePointY .

Result Float .

2010-03-20 16:02:54

TransformCoorType

Property TTransform.TransformCoorType As Long

Property TransformCoorType .

Result Long .

2010-03-20 16:02:54

TransformFieldX

Property TTransform.TransformFieldX As TField

Property TransformFieldX .

Result TField .

2010-03-20 16:02:54

TransformFieldY

Property TTransform.TransformFieldY As TField

Property TransformFieldY .

Result TField .

2010-03-20 16:02:54

TransformInputCS

Property TTransform.TransformInputCS As String

Property TransformInputCS .

Result String .

2010-03-20 16:02:54

TransformLayer

Property TTransform.TransformLayer As TLayer

Property TransformLayer .

Result TLayer .

2010-03-20 16:02:54

TransformOutputCS

Property TTransform.TransformOutputCS As String

Property TransformOutputCS .

Result String .

2010-03-20 16:02:54

TransformRecordList

Property TTransform.TransformRecordList As TRecordList

Property TransformRecordList .

Result TRecordList .

2010-03-20 16:02:54

TransformType

Property TTransform.TransformType As Long

Property TransformType .

Result Long .