source: ModularSystem/Demo/UMainForm.lfm

object MainForm: TMainForm
  Left = 217
  Height = 308
  Top = 177
  Width = 649
  Caption = 'Module test'
  ClientHeight = 308
  ClientWidth = 649
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  LCLVersion = '1.0.1.3'
  object ListViewModules: TListView
    Left = 8
    Height = 257
    Top = 8
    Width = 632
    Anchors = [akTop, akLeft, akRight, akBottom]
    Columns = <    
      item
        Caption = 'Name'
        Width = 70
      end    
      item
        Caption = 'System name'
        Width = 70
      end    
      item
        Caption = 'Version'
      end    
      item
        Caption = 'Installed'
        Width = 80
      end    
      item
        Caption = 'Running'
        Width = 80
      end    
      item
        Caption = 'License'
        Width = 70
      end    
      item
        Caption = 'Dependencies'
        Width = 162
      end    
      item
        Caption = 'Description'
        Width = 200
      end>
    OwnerData = True
    PopupMenu = PopupMenu1
    ReadOnly = True
    RowSelect = True
    TabOrder = 0
    ViewStyle = vsReport
    OnData = ListViewModulesData
    OnSelectItem = ListViewModulesSelectItem
  end
  object ButtonInstall: TButton
    Left = 8
    Height = 25
    Top = 273
    Width = 75
    Action = AModuleInstall
    Anchors = [akLeft, akBottom]
    TabOrder = 1
  end
  object ButtonUninstall: TButton
    Left = 88
    Height = 25
    Top = 273
    Width = 75
    Action = AModuleUninstall
    Anchors = [akLeft, akBottom]
    TabOrder = 2
  end
  object ButtonUpdate: TButton
    Left = 168
    Height = 25
    Top = 273
    Width = 75
    Action = AModuleUpdate
    Anchors = [akLeft, akBottom]
    TabOrder = 3
  end
  object ButtonUpdate1: TButton
    Left = 248
    Height = 25
    Top = 273
    Width = 75
    Action = AModuleStart
    Anchors = [akLeft, akBottom]
    TabOrder = 4
  end
  object ButtonUpdate2: TButton
    Left = 328
    Height = 25
    Top = 273
    Width = 75
    Action = AModuleStop
    Anchors = [akLeft, akBottom]
    TabOrder = 5
  end
  object PopupMenu1: TPopupMenu
    left = 183
    top = 67
    object MenuItem1: TMenuItem
      Action = AModuleInstall
    end
    object MenuItem2: TMenuItem
      Action = AModuleUninstall
    end
    object MenuItem3: TMenuItem
      Action = AModuleUpdate
    end
    object MenuItem4: TMenuItem
      Action = AModuleStart
    end
    object MenuItem5: TMenuItem
      Action = AModuleStop
    end
  end
  object ActionList1: TActionList
    left = 184
    top = 136
    object AModuleInstall: TAction
      Caption = 'Install'
      OnExecute = ButtonInstallClick
    end
    object AModuleUninstall: TAction
      Caption = 'Uninstall'
      OnExecute = ButtonUninstallClick
    end
    object AModuleUpdate: TAction
      Caption = 'Update'
      OnExecute = ButtonUpdateClick
    end
    object AModuleStart: TAction
      Caption = 'Start'
      OnExecute = AModuleStartExecute
    end
    object AModuleStop: TAction
      Caption = 'Stop'
      OnExecute = AModuleStopExecute
    end
  end
  object ModuleManager: TModuleManager
    left = 296
    top = 72
  end
end