TPrintLayout

Razred TPrintLayout se uporablja za spreminjanje predlog izrisa. Spreminja se osnovne lastnosti predloge, samo elemente predloge, posamezni element pa se ureja preko razreda TPrintItem.

Spreminja se lahko:

• vse predloge izrisa shranjene v sistemu,

Urejanje predloge izrisa

Count

Lastnost Count vrne število elementov na predlogi.

RO Property TPrintLayout.Count As Long
Result	Long	Število elementov.

Message ("Lastnosti predloge", "V predlogi je " + IntToStr ([Neka predloga].Count) + " elementov.")

Items

Lastnost Items vrne določen element.

RO Property TPrintLayout.Items (Index As Long) As TPrintItem
Index	Long	Zaporedna številka elementa. Prvi element ima številko 0.
Result	TPrintItem	Referenca na element.

Dim I As Long
For I = 0 To [Neka predloga].Count - 1
  [Neka predloga].Items (I).Closest = true // nastavi vse informacija na prikaz samo najbližjega zapisa xxx
Next

Add

Metoda Add doda nov element v predlogo.

Method TPrintLayout.Add As TPrintItem
Result	Optional TPrintItem	Vrne referenco na nov element.

Dim PL As TPrintLayout, PIt As TPrintItem
PL = [Neka predloga izrisa]
PIt = PL.Add             // Doda element
PIt.Name = '_legEl'      // Določi ime elementa
PIt.Type = piPrintLayout // Določi tip elementa

Skupno za objekte

Lastnosti predloge izrisa se običajno nastavljajo v Urejevalnik predloge izrisa, možen pa je tudi dostop do vseh podatkov preko basica. Pri spreminjanju katerikolih podatkov objekta, morate za dokončno spremembo izvesti še Store ukaz.

Dim PL as TPrintLayout
PL = [Neka predloga izrisa]
Message ("Lastnosti predloge izrisa", 
  "Ime: " + PL.Name + Line +
  "Dodatna imena: " + PL.Alias + Line +
  "Komentar: " + PL.Comment + Line +
  "ID: $" + IntToHex (PL.ID) + Line +
  "Mapa: " + PL.Parent.Name + Line +
  "Naredil: " + PL.Creator.Name + " Ob: " + DateTimeToStr (PL.Created) + Line +
  "Popravil: " + PL.Modifier.Name + " Ob: " + DateTimeToStr (PL.Modified) + Line +
  "Pravica vpogleda: " + PL.ViewAccess.Name + Line +
  "Pravica urejanja: " + PL.EditAccess.Name + Line +
  "Cela pot: " + PL.FullName
)

Name

Lastnost Name določa osnovno ime objekta (opisno ime). Ker se ime lahko občasno spreminja, se sklicevanje na objekt z uporabo imena odsvetuje. Uporabljate rajši dodatno ime ali ID objekta.

Property TPrintLayout.Name As String
Result	String	Ime objekta.

Alias

Lastnost Alias določa dodatno ime objekta ali celo več dodatnih imen. Ta lastnost se načeloma uporablja za sklice na objekt namesto osnovnega imena objekta.

Property TPrintLayout.Alias As String
Result	String	Dodatna imena. Če jih je več, morajo biti ločena s podpičjem.

Comment

Lastnost Comment določa komentar k objektu.

Property TPrintLayout.Comment As String
Result	String	Poljuben komentar.

ID

Lastnost ID določa unikatni identifikator objekta, ki se samodejno kreira pri kreiranju objekta in se nikdar ne spremeni.

RO Property TPrintLayout.ID As Long
Result	Long	Identifikator objekta.

Parent

Lastnost Parent določa ime mape, v kateri se imenovani objekt nahaja.

Property TPrintLayout.Parent As TFolder
Result	TFolder	Mapa objekta.

FullName

Lastnost FullName vrne polno ime objekta, ki je sestavljeno iz imen vseh map nad objektom in imena objekta.

RO Property TPrintLayout.FullName As String
Result	String	Vse mape in ime objekta.

Creator

Lastnost Creator določa uporabnika, ki je objekt ustvaril.

RO Property TPrintLayout.Creator As TUser
Result	TUser	Uporabnik.

Created

Lastnost Created določa datum in čas nastanka objekta.

RO Property TPrintLayout.Created As DateTime
Result	DateTime	Čas nastanka objekta.

Modifier

Lastnost Modifier določa uporabnika, ki je objekt nazadnje spremenil.

RO Property TPrintLayout.Modifier As TUser
Result	TUser	Uporabnik.

Modified

Lastnost Modified določa datum in čas, ko je bil objekt nazadnje spremenjen.

RO Property TPrintLayout.Modified As DateTime
Result	DateTime	Čas zadnje spremembe objekta.

ViewAccess

Lastnost ViewAccess določa, katera skupina uporabnikov ima pravico uporabe objekta.

Property TPrintLayout.ViewAccess As TUserGroup
Result	TUserGroup	Skupina uporabnikov.

EditAccess

Lastnost EditAccess določa, katera skupina uporabnikov ima pravico spreminjanja objekta.

Property TPrintLayout.EditAccess As TUserGroup
Result	TUserGroup	Skupina uporabnikov.

UsedIn

Lastnost UsedIn določa, v katerih aplikacijah je določen objekt uporabljan. Če nastavimo vrednost UsedIn na "*", potem je objekt dosegljiv v vseh aplikacijah. Ta podatek se uporablja izključno za izvoz aplikacije v SIF.

Property TPrintLayout.UsedIn As String
Result	String	Aplikacije, ki uporabljajo ta objekt. Če je navedenih več aplikacij, se le-te ločijo s podpičjem.

IsFolder

Lastnost IsFolder določa, ali je dani objekt mapa ali kak drug objekt.

RO Property TPrintLayout.IsFolder As Boolean
Result	Boolean	V danem primeru je vrednost vedno False.

IsObject

Lastnost IsObject določa, ali je dani objekt mapa ali kak drug objekt.

RO Property TPrintLayout.IsObject As Boolean
Result	Boolean	V danem primeru je vrednost vedno True.

ObjectType

Lastnost ObjectType določa vrsto objekta. Vrsto določajo Konstante.Object_Types_Constants

RO Property TPrintLayout.ObjectType As Long
Result	Long	V danem primeru je vrednost otPrintLayout.

Edit

Metoda Edit odpre urejevalnik objekta.

Method TPrintLayout.Edit

[Neka predloga izrisa].Edit

Store

Metoda Store dejansko shrani spremembe objekta (izvedene z SDMS Basic ukazi).

Method TPrintLayout.Store

[Neka predloga izrisa].Store

Duplicate

Metoda Duplicate podvoji objekt. Ime podvojenega objekta je sestavljeno iz "Kopija " in imena originala, dodatno ime (Alias) pa je zbrisano. Objekt se kreira v isti mapi, kot je original.

Method TPrintLayout.Duplicate (DuplicateData As Boolean) As TPrintLayout
DuplicateData	Boolean	Pri predlogi izrisa se ignorira.
Result	Optional TPrintLayout	Referenca na kreiran objekt.

Dim PL As TPrintLayout
PL = [Neka predloga izrisa].Duplicate(False)
PL.Name = 'Novo ime'
PL.Store

SaveToNewObject

Metoda SaveToNewObject prikaže dialog za shranjevanje objekta.

Method TPrintLayout.SaveToNewObject (Caption As String, Root As TFolder) As TPrintLayout
Caption	String	Napis na dialogu.
Root	TFolder	Izhodišče za izbiro lokacije shranjevanja.
Result	Optional TPrintLayout	Referenca na shranjeni objekt.

[Neka predloga izrisa].SaveToNewObject ('Shranjevanje predloge izrisa', root)

Clear

Metoda Clear briše vse elemente iz predloge izrisa.

Method TPrintLayout.Clear

[Neka predloga izrisa].Clear

Delete

Metoda Delete briše objekt iz sistema.

Method TPrintLayout.Delete As Boolean
Result	Optional Boolean	Vrne True, če je bilo brisanje uspešno.

[Neka predloga izrisa].Delete

SaveToFile

Metoda SaveToFile shrani objekt v binarni obliki v dano datoteko.

Method TPrintLayout.SaveToFile (FileName As String)
FileName	String	Polno ime datoteke, v katero naj se objekt shrani.

[Neka predloga izrisa].SaveToFile ('c:\temp\PredlogaIzrisa.tmp')

LoadFromFile

Metoda LoadFromFile naloži objekt iz datoteke v binarni obliki. Ta datoteka je predhodno nastala z ukazom SaveToFile.

Method TPrintLayout.LoadFromFile (FileName As String) As Boolean
FileName	String	Polno ime datoteke, iz katere naj se objekt naloži.
Result	Optional Boolean	Vrne True, če je bil objekt uspešno naložen.

[Neka predloga izrisa].LoadFromFile ('c:\temp\PredlogaIzrisa.tmp')

SaveToSif

Metoda SaveToSif shrani objekt v SIF obliki v datoteko.

Method TPrintLayout.SaveToSif (FileName As String)
FileName	String	Polno ime datoteke, v katero naj se objekt shrani.

SaveToSifAppend

Metoda SaveToSifAppend doda objekt v obstoječo SIF datoteko.

Method TPrintLayout.SaveToSifAppend (FileName As String)
FileName	String	Polno ime datoteke, v katero naj se objekt doda.

SaveToXml

Metoda SaveToXml shrani objekt v XML obliki v datoteko.

Method TPrintLayout.SaveToXml (FileName As String)
FileName	String	Polno ime datoteke, v katero naj se objekt shrani.