ChoiceActionItemCollection.Add(ChoiceActionItem) Method

XAF_how-to-change-connection-to-the-database-at-runtime-e1344/CS/RuntimeDbChooser.Module.Web/WebChangeDatabaseController.cs#L18

foreach(string databaseName in MSSqlServerChangeDatabaseHelper.Databases.Split(';')) {
    changeDatabaseAction.Items.Add(new ChoiceActionItem(databaseName, databaseName));
}

XAF_how-to-implement-custom-context-navigation-e1843/CS/ContextNavigation.Module/Controllers/TaskBasedHelpController.cs#L30

ChoiceActionItem docsGroup = new ChoiceActionItem("CustomDocuments", "Task-Based Help", null) { ImageName = "BO_Report" };
navigationItem.Items.Add(docsGroup);
foreach (HelpDocument doc in docs) {

XAF_how-to-use-criteria-property-editors-e932/CS/HowToUseCriteriaPropertyEditors.Module/CriteriaController.cs#L27

if (criterion.ObjectType.IsAssignableFrom(View.ObjectTypeInfo.Type)) {
    filteringCriterionAction.Items.Add(
        new ChoiceActionItem(criterion.Description, criterion.Criterion));

XAF_how-to-save-and-share-custom-view-settings-t537863/CS/ViewSettingsSolution.Module/Controllers/ViewVariantsController.cs#L61

foreach(SettingsStore item in objectSpace.GetObjects<SettingsStore>(criteria)) {
    SelectViewVariantAction.Items.Add(new ChoiceActionItem(item.Name, item));
}

XAF_how-to-change-connection-to-the-database-at-runtime-e1344/VB/RuntimeDbChooser.Module.Web/WebChangeDatabaseController.vb#L20

For Each databaseName As String In MSSqlServerChangeDatabaseHelper.Databases.Split(";"c)
    changeDatabaseAction.Items.Add(New ChoiceActionItem(databaseName, databaseName))
Next databaseName

XAF_how-to-implement-custom-context-navigation-e1843/VB/ContextNavigation.Module/Controllers/TaskBasedHelpController.vb#L33

Dim docsGroup As New ChoiceActionItem("CustomDocuments", "Task-Based Help", Nothing) With {.ImageName = "BO_Report"}
navigationItem.Items.Add(docsGroup)
For Each doc As HelpDocument In docs

XAF_how-to-use-criteria-property-editors-e932/VB/HowToUseCriteriaPropertyEditors.Module/CriteriaController.vb#L28

If criterion.ObjectType.IsAssignableFrom(View.ObjectTypeInfo.Type) Then
    filteringCriterionAction.Items.Add(New ChoiceActionItem(criterion.Description, criterion.Criterion))
End If

XAF_how-to-save-and-share-custom-view-settings-t537863/VB/ViewSettingsSolution.Module/Controllers/ViewVariantsController.vb#L63

For Each item As SettingsStore In objectSpace.GetObjects(Of SettingsStore)(criteria)
    SelectViewVariantAction.Items.Add(New ChoiceActionItem(item.Name, item))
Next item