TDialog: Razlika med redakcijama
m |
m (→Lastnosti dialoga) |
||
| (Vmesna redakcija istega uporabnika ni prikazana) | |||
| Vrstica 33: | Vrstica 33: | ||
Property|TDialog.Height | Property|TDialog.Height | ||
Result|Long|Višina dialoga v pixlih. | Result|Long|Višina dialoga v pixlih. | ||
| + | </declaration> | ||
| + | <source></source> | ||
| + | |||
| + | ===Controls=== | ||
| + | Lastnost '''Controls''' vrne razred za posamezno kontrolo po imenu. | ||
| + | <declaration> | ||
| + | RO Property|TDialog.Controls | ||
| + | Name|String|Ime kontrole. | ||
| + | Result|TDialogControl|Referenca na kontrolo. | ||
</declaration> | </declaration> | ||
<source></source> | <source></source> | ||
| Vrstica 49: | Vrstica 58: | ||
RO Property|TDialog.Controls | RO Property|TDialog.Controls | ||
Index|Long|Zaporedna številka kontrole. Prva kontrola ima številko 0. | Index|Long|Zaporedna številka kontrole. Prva kontrola ima številko 0. | ||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
Result|TDialogControl|Referenca na kontrolo. | Result|TDialogControl|Referenca na kontrolo. | ||
</declaration> | </declaration> | ||
| Vrstica 140: | Vrstica 140: | ||
==Skupne lastnosti== | ==Skupne lastnosti== | ||
| − | 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 {{PL|Store}} ukaz. | Pri spreminjanju katerikolih podatkov objekta, morate za dokončno spremembo izvesti še {{PL|Store}} ukaz. | ||
<source>Dim D as TDialog | <source>Dim D as TDialog | ||
| Vrstica 153: | Vrstica 153: | ||
"Popravil: " + D.Modifier.Name + " Ob: " + DateTimeToStr (D.Modified) + Line + | "Popravil: " + D.Modifier.Name + " Ob: " + DateTimeToStr (D.Modified) + Line + | ||
"Pravica vpogleda: " + D.ViewAccess.Name + Line + | "Pravica vpogleda: " + D.ViewAccess.Name + Line + | ||
| − | "Pravica urejanja: " + D.EditAccess.Name | + | "Pravica urejanja: " + D.EditAccess.Name + Line + |
| + | "Cela pot: " + Dl.FullName | ||
)</source> | )</source> | ||
| Vrstica 189: | Vrstica 190: | ||
Property|TDialog.Parent | Property|TDialog.Parent | ||
Result|TFolder|Mapa objekta. | Result|TFolder|Mapa objekta. | ||
| + | </declaration> | ||
| + | |||
| + | ===FullName=== | ||
| + | Lastnost '''FullName''' vrne polno ime objekta, ki je sestavljeno iz imen vseh map nad objektom in imena objekta. | ||
| + | <declaration> | ||
| + | RO Property|TDialog.FullName | ||
| + | Result|String|Vse mape in ime objekta. | ||
</declaration> | </declaration> | ||
| Vrstica 255: | Vrstica 263: | ||
===ObjectType=== | ===ObjectType=== | ||
| − | Lastnost '''ObjectType''' določa vrsto objekta. | + | Lastnost '''ObjectType''' določa vrsto objekta. Vrsto določajo {{EL|Konstante|Object_Types_Constants}} |
<declaration> | <declaration> | ||
RO Property|TDialog.ObjectType | RO Property|TDialog.ObjectType | ||
| − | Result|Long|V danem primeru je vrednost | + | Result|Long|V danem primeru je vrednost otDialog. |
</declaration> | </declaration> | ||
| Vrstica 268: | Vrstica 276: | ||
Method|TDialog.Edit | Method|TDialog.Edit | ||
</declaration> | </declaration> | ||
| − | <source></source> | + | <source>[Nek dialog].Edit</source> |
===Store=== | ===Store=== | ||
| Vrstica 275: | Vrstica 283: | ||
Method|TDialog.Store | Method|TDialog.Store | ||
</declaration> | </declaration> | ||
| − | <source></source> | + | <source>[Nek dialog].Store</source> |
===Duplicate=== | ===Duplicate=== | ||
| Vrstica 281: | Vrstica 289: | ||
<declaration> | <declaration> | ||
Method|TDialog.Duplicate | Method|TDialog.Duplicate | ||
| − | DuplicateData|Boolean| | + | DuplicateData|Boolean|Pri dialogu se ignorira. |
Result|Optional TDialog|Referenca na kreiran objekt. | Result|Optional TDialog|Referenca na kreiran objekt. | ||
</declaration> | </declaration> | ||
| − | <source></source> | + | <source>Dim D As TDialog |
| + | D = [Nek dialog].Duplicate(False) | ||
| + | D.Name = 'Novo ime' | ||
| + | D.Store</source> | ||
===SaveToNewObject=== | ===SaveToNewObject=== | ||
| − | Metoda '''SaveToNewObject''' | + | Metoda '''SaveToNewObject''' prikaže dialog za shranjevanje objekta. |
<declaration> | <declaration> | ||
Method|TDialog.SaveToNewObject | Method|TDialog.SaveToNewObject | ||
| − | Caption|String|. | + | Caption|String|Napis na dialogu. |
| − | Root|TFolder|. | + | Root|TFolder|Izhodišče za izbiro lokacije shranjevanja. |
Result|Optional TDialog|. | Result|Optional TDialog|. | ||
</declaration> | </declaration> | ||
| − | <source></source> | + | <source>[Nek dialog].SaveToNewObject ('Shranjevanje dialoga', root)</source> |
===Clear=== | ===Clear=== | ||
| − | Metoda '''Clear''' briše vse lastnosti | + | Metoda '''Clear''' briše vse lastnosti dialoga razen imena, dialod in modul. |
<declaration> | <declaration> | ||
Method|TDialog.Clear | Method|TDialog.Clear | ||
</declaration> | </declaration> | ||
| − | <source></source> | + | <source>[Nek dialog].Clear |
| + | [Nek dialog].Store</source> | ||
===Delete=== | ===Delete=== | ||
| Vrstica 307: | Vrstica 319: | ||
<declaration> | <declaration> | ||
Method|TDialog.Delete | Method|TDialog.Delete | ||
| − | Result|Optional Boolean| | + | Result|Optional Boolean|Vrne True, če je bilo brisanje uspešno. |
</declaration> | </declaration> | ||
| − | <source> | + | <source>[Nek dialog].Delete</source> |
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
===SaveToFile=== | ===SaveToFile=== | ||
| Vrstica 325: | Vrstica 329: | ||
FileName|String|Polno ime datoteke, v katero naj se objekt shrani. | FileName|String|Polno ime datoteke, v katero naj se objekt shrani. | ||
</declaration> | </declaration> | ||
| − | <source></source> | + | <source>[Nek dialog].SaveToFile ('c:\temp\Dialog.tmp')</source> |
===LoadFromFile=== | ===LoadFromFile=== | ||
| Vrstica 332: | Vrstica 336: | ||
Method|TDialog.LoadFromFile | Method|TDialog.LoadFromFile | ||
FileName|String|Polno ime datoteke, iz katere naj se objekt naloži. | FileName|String|Polno ime datoteke, iz katere naj se objekt naloži. | ||
| − | Result|Optional Boolean|. | + | Result|Optional Boolean|Vrne True, če je bil objekt uspešno naložen. |
</declaration> | </declaration> | ||
| − | <source></source> | + | <source>[Nek dialog].LoadFromFile ('c:\temp\Dialog.tmp')</source> |
===SaveToSif=== | ===SaveToSif=== | ||
Trenutna redakcija s časom 12:25, 11. november 2014
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. |