KeychainItem.Label
From Xojo Documentation
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.Label = newStringValue
or
StringValue = aKeychainItem.Label
Supported for all project types and targets.
or
StringValue = aKeychainItem.Label
Supported for all project types and targets.
End-user editable string containing the label for this Keychain item.
Example
This example sets the text in a TextField to the value of the Label property.
Dim kc As Keychain
Dim 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
Dim 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