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,
Vsebina
- 1 Urejanje elementov predloge izrisa
- 2 Urejanje lista predloge izrisa
- 3 Prikaz predloge izrisa
- 4 Skupno za objekte
- 4.1 Name
- 4.2 Alias
- 4.3 Comment
- 4.4 ID
- 4.5 Parent
- 4.6 FullName
- 4.7 Creator
- 4.8 Created
- 4.9 Modifier
- 4.10 Modified
- 4.11 ViewAccess
- 4.12 EditAccess
- 4.13 UsedIn
- 4.14 IsFolder
- 4.15 IsObject
- 4.16 ObjectType
- 4.17 Edit
- 4.18 Store
- 4.19 Duplicate
- 4.20 SaveToNewObject
- 4.21 Clear
- 4.22 Delete
- 4.23 SaveToFile
- 4.24 LoadFromFile
- 4.25 SaveToSif
- 4.26 SaveToSifAppend
- 4.27 SaveToXml
Urejanje elementov predloge izrisa
GetItemByName
Lastnost GetItemByName .
| RO Property TPrintLayout.GetItemByName (Name As String) As TPrintItem | ||
| Name | String | . |
| Result | TPrintItem | . |
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
NextAdd
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 elementaUrejanje lista predloge izrisa
Width
Lastnost Width .
| Property TPrintLayout.Width As Float | ||
| Result | Float | . |
Height
Lastnost Height .
| Property TPrintLayout.Height As Float | ||
| Result | Float | . |
SetOutputSize
Metoda SetOutputSize .
| Method TPrintLayout.SetOutputSize (Width, Height As Float) | ||
| Width | Float | . |
| Height | Float | . |
TopMargin
Lastnost TopMargin .
| Property TPrintLayout.TopMargin As Float | ||
| Result | Float | . |
LeftMargin
Lastnost LeftMargin .
| Property TPrintLayout.LeftMargin As Float | ||
| Result | Float | . |
BottomMargin
Lastnost BottomMargin .
| Property TPrintLayout.BottomMargin As Float | ||
| Result | Float | . |
RightMargin
Lastnost RightMargin .
| Property TPrintLayout.RightMargin As Float | ||
| Result | Float | . |
Prikaz predloge izrisa
Preview
Metoda Preview .
| Method TPrintLayout.Preview |
Metoda Print .
| Method TPrintLayout.Print |
PrintNew
Metoda PrintNew .
| Method TPrintLayout.PrintNew |
Close
Metoda Close .
| Method TPrintLayout.Close |
SaveImage
Metoda SaveImage .
| Method TPrintLayout.SaveImage (FileName As String, Format, Resolution As Long) | ||
| FileName | String | . |
| Format | Long | . |
| Resolution | Long | . |
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].EditStore
Metoda Store dejansko shrani spremembe objekta (izvedene z SDMS Basic ukazi).
| Method TPrintLayout.Store |
[Neka predloga izrisa].StoreDuplicate
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.StoreSaveToNewObject
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].ClearDelete
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].DeleteSaveToFile
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. |