Difference between revisions of "KeychainItem.ServiceName"
From Xojo Documentation
m (Gperlman moved page KeyChainItem.ServiceName to KeychainItem.ServiceName) |
|||
Line 1: | Line 1: | ||
{{PropertyBox | {{PropertyBox | ||
| name=ServiceName | | name=ServiceName | ||
− | | owner=[[ | + | | owner=[[KeychainItem]] |
| ownertype=class | | ownertype=class | ||
| scope=public | | scope=public | ||
Line 12: | Line 12: | ||
==Example== | ==Example== | ||
− | This example set the text of a [[TextField]] to the description of a ''' | + | This example set the text of a [[TextField]] to the description of a '''KeychainItem'''. |
<rbcode> | <rbcode> | ||
− | Var kc As | + | Var kc As Keychain |
− | Var kci As | + | Var kci As KeychainItem |
− | kc = New | + | kc = New Keychain(Listbox1.SelectedIndex) |
If kc <> Nil Then | If kc <> Nil Then | ||
− | kci = New | + | kci = New KeychainItem |
kci.ServiceName = SearchField.Value | kci.ServiceName = SearchField.Value | ||
Revision as of 23:51, 30 July 2019
Property (As String )
![]() |
This property is only available on the macOS platform. For cross-platform compatibility, use #If...#Endif with the Target... specifiers to make sure you will not attempt to use this property on an incompatible platform. |
aKeychainItem.ServiceName = newStringValue
or
StringValue = aKeychainItem.ServiceName
Supported for all project types and targets.
or
StringValue = aKeychainItem.ServiceName
Supported for all project types and targets.
Contains the name of the service (required for adding, can be Nil to find). To add a password for an application, set ServiceName to the application’s name.
Example
This example set the text of a TextField to the description of a KeychainItem.
Var kc As Keychain
Var kci As KeychainItem
kc = New Keychain(Listbox1.SelectedIndex)
If kc <> Nil Then
kci = New KeychainItem
kci.ServiceName = SearchField.Value
PasswordField.Value = kc.FindPassword(kci)
ServiceNameField.Value = kci.ServiceName
AccountNameField.Value = kci.AccountName
CommentField.Value = kci.Comment
LabelField.Value = kci.Label
End If
Var kci As KeychainItem
kc = New Keychain(Listbox1.SelectedIndex)
If kc <> Nil Then
kci = New KeychainItem
kci.ServiceName = SearchField.Value
PasswordField.Value = kc.FindPassword(kci)
ServiceNameField.Value = kci.ServiceName
AccountNameField.Value = kci.AccountName
CommentField.Value = kci.Comment
LabelField.Value = kci.Label
End If