TDialog
Razred TDialog vsebuje informacije o dialogih.
Vsebina
Lastnosti dialoga
ModalResult
Lastnost ModalResult .
| Property TDialog.ModalResult As Long | ||
| Result | Long | . |
Caption
Lastnost Caption določa naslov dialoga.
| Property TDialog.Caption As String | ||
| Result | String | Naslov dialoga. |
Width
Lastnost Width določa širino dialoga.
| Property TDialog.Width As Long | ||
| Result | Long | Širina dialoga v pixlih. |
Height
Lastnost Height določa višino dialoga.
| Property TDialog.Height As Long | ||
| Result | Long | Višina dialoga v pixlih. |
Controls
Lastnost Controls vrne razred za posamezno kontrolo po imenu.
| RO Property TDialog.Controls (Name As String) As TDialogControl | ||
| Name | String | Ime kontrole. |
| Result | TDialogControl | Referenca na kontrolo. |
ControlCount
Lastnost ControlCount vrne število kontrol v dialogu.
| RO Property TDialog.ControlCount As Long | ||
| Result | Long | Število kontrol. |
Controls
Lastnost Controls vrne razred za posamezno kontrolo po zaporedni številki.
| RO Property TDialog.Controls (Index As Long) As TDialogControl | ||
| Index | Long | Zaporedna številka kontrole. Prva kontrola ima številko 0. |
| Result | TDialogControl | Referenca na kontrolo. |
Module
Lastnost Module določa ukaze v modulu.
| Property TDialog.Module As String | ||
| Result | String | . |
Metode dialoga
DialogCreate
Metoda DialogCreate .
| Method TDialog.DialogCreate |
DialogDestroy
Metoda DialogDestroy .
| Method TDialog.DialogDestroy |
DialogExecute
Metoda DialogExecute .
| Method TDialog.DialogExecute As Long | ||
| Result | Optional Long | . |
Eventi dialoga
OnCreate
Dogodek OnCreate se izvede, ko se dialog naloži z ukazom DialogCreate.
| Event TDialog.OnCreate |
Sub OnCreate
EndSubOnDestroy
Dogodek OnDestroy se izvede, ko se dialog zapre z ukazom DialogDestroy.
| Event TDialog.OnDestroy |
Sub OnDestroy
EndSubOpuščene metode dialoga
Activate
Metoda Activate naloži dialog. Metoda je opuščena in se priporoča uporaba metode DialogCreate.
| Method TDialog.Activate |
Deactivate
Metoda Deactivate zapre dialog. Metoda je opuščena in se priporoča uporaba metode DialogDestroy.
| Method TDialog.Deactivate |
Execute
Metoda Execute prikaže dialog. Metoda je opuščena in se priporoča uporaba metode DialogExecute.
| Method TDialog.Execute As Long | ||
| Result | Optional Long | . |
Skupne lastnosti
Lastnosti dialoga se običajno nastavljajo v Urejevalnik dialoga, 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 D as TDialog
D = [Nek dialog]
Message ("Lastnosti dialoga",
"Ime: " + D.Name + Line +
"Dodatna imena: " + D.Alias + Line +
"Komentar: " + D.Comment + Line +
"ID: $" + IntToHex (D.ID) + Line +
"Mapa: " + D.Parent.Name + Line +
"Naredil: " + D.Creator.Name + " Ob: " + DateTimeToStr (D.Created) + Line +
"Popravil: " + D.Modifier.Name + " Ob: " + DateTimeToStr (D.Modified) + Line +
"Pravica vpogleda: " + D.ViewAccess.Name + Line +
"Pravica urejanja: " + D.EditAccess.Name + Line +
"Cela pot: " + Dl.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 TDialog.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 TDialog.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 TDialog.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 TDialog.ID As Long | ||
| Result | Long | Identifikator objekta. |
Parent
Lastnost Parent določa ime mape, v kateri se imenovani objekt nahaja.
| Property TDialog.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 TDialog.FullName As String | ||
| Result | String | Vse mape in ime objekta. |
Creator
Lastnost Creator določa uporabnika, ki je objekt ustvaril.
| RO Property TDialog.Creator As TUser | ||
| Result | TUser | Uporabnik. |
Created
Lastnost Created določa datum in čas nastanka objekta.
| RO Property TDialog.Created As DateTime | ||
| Result | DateTime | Čas nastanka objekta. |
Modifier
Lastnost Modifier določa uporabnika, ki je objekt nazadnje spremenil.
| RO Property TDialog.Modifier As TUser | ||
| Result | TUser | Uporabnik. |
Modified
Lastnost Modified določa datum in čas, ko je bil objekt nazadnje spremenjen.
| RO Property TDialog.Modified As DateTime | ||
| Result | DateTime | Čas zadnje spremembe objekta. |
ViewAccess
Lastnost ViewAccess določa, katera skupina uporabnikov ima pravico uporabe objekta.
| Property TDialog.ViewAccess As TUserGroup | ||
| Result | TUserGroup | Skupina uporabnikov. |
EditAccess
Lastnost EditAccess določa, katera skupina uporabnikov ima pravico spreminjanja objekta.
| Property TDialog.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 TDialog.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 TDialog.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 TDialog.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 TDialog.ObjectType As Long | ||
| Result | Long | V danem primeru je vrednost otDialog. |
Skupne metode
Edit
Metoda Edit odpre urejevalnik objekta.
| Method TDialog.Edit |
[Nek dialog].EditStore
Metoda Store dejansko shrani spremembe objekta (izvedene z SDMS Basic ukazi).
| Method TDialog.Store |
[Nek dialog].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 TDialog.Duplicate (DuplicateData As Boolean) As TDialog | ||
| DuplicateData | Boolean | Pri dialogu se ignorira. |
| Result | Optional TDialog | Referenca na kreiran objekt. |
Dim D As TDialog
D = [Nek dialog].Duplicate(False)
D.Name = 'Novo ime'
D.StoreSaveToNewObject
Metoda SaveToNewObject prikaže dialog za shranjevanje objekta.
| Method TDialog.SaveToNewObject (Caption As String, Root As TFolder) As TDialog | ||
| Caption | String | Napis na dialogu. |
| Root | TFolder | Izhodišče za izbiro lokacije shranjevanja. |
| Result | Optional TDialog | . |
[Nek dialog].SaveToNewObject ('Shranjevanje dialoga', root)Clear
Metoda Clear briše vse lastnosti dialoga razen imena, dialod in modul.
| Method TDialog.Clear |
[Nek dialog].Clear
[Nek dialog].StoreDelete
Metoda Delete briše objekt iz sistema.
| Method TDialog.Delete As Boolean | ||
| Result | Optional Boolean | Vrne True, če je bilo brisanje uspešno. |
[Nek dialog].DeleteSaveToFile
Metoda SaveToFile shrani objekt v binarni obliki v dano datoteko.
| Method TDialog.SaveToFile (FileName As String) | ||
| FileName | String | Polno ime datoteke, v katero naj se objekt shrani. |
[Nek dialog].SaveToFile ('c:\temp\Dialog.tmp')LoadFromFile
Metoda LoadFromFile naloži objekt iz datoteke v binarni obliki. Ta datoteka je predhodno nastala z ukazom SaveToFile.
| Method TDialog.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. |
[Nek dialog].LoadFromFile ('c:\temp\Dialog.tmp')SaveToSif
Metoda SaveToSif shrani objekt v SIF obliki v datoteko.
| Method TDialog.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 TDialog.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 TDialog.SaveToXml (FileName As String) | ||
| FileName | String | Polno ime datoteke, v katero naj se objekt shrani. |