object FormBrowse: TFormBrowse Left = 479 Height = 807 Top = 279 Width = 1446 Caption = 'Browse' ClientHeight = 807 ClientWidth = 1446 DesignTimePPI = 144 Menu = MainMenu1 OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow LCLVersion = '3.6.0.0' object TreeView1: TTreeView Left = 0 Height = 807 Top = 0 Width = 362 Align = alLeft TabOrder = 0 end object Splitter1: TSplitter Left = 362 Height = 807 Top = 0 Width = 8 end object ListView1: TListView Left = 370 Height = 807 Top = 0 Width = 1076 Align = alClient Columns = < item Caption = 'Name' Width = 450 end item Caption = 'Revision' Width = 120 end item Caption = 'Last change date' Width = 150 end item Caption = 'Last author' Width = 150 end item Caption = 'Status' Width = 388 end> OwnerData = True PopupMenu = PopupMenu1 ReadOnly = True RowSelect = True SmallImages = Core.ImageList1 TabOrder = 2 ViewStyle = vsReport OnData = ListView1Data OnDblClick = AOpenExecute OnSelectItem = ListView1SelectItem end object PopupMenu1: TPopupMenu Images = Core.ImageList1 Left = 530 Top = 197 object MenuItem1: TMenuItem Action = AAdd end object MenuItem2: TMenuItem Action = ADelete end object MenuItem3: TMenuItem Action = ARename end object MenuItem4: TMenuItem Action = AUpdate end object MenuItem5: TMenuItem Action = AProperties end object MenuItem6: TMenuItem Action = AOpen end object MenuItem7: TMenuItem Action = ALogShow end end object ActionList1: TActionList Images = Core.ImageList1 Left = 528 Top = 312 object AAdd: TAction Caption = 'Add' OnExecute = AAddExecute end object ADelete: TAction Caption = 'Delete' OnExecute = ADeleteExecute end object ARename: TAction Caption = 'Rename' OnExecute = ARenameExecute end object AUpdate: TAction Caption = 'Update' end object AProperties: TAction Caption = 'Properties' end object AOpen: TAction Caption = 'Open' OnExecute = AOpenExecute end object ALogShow: TAction Caption = 'Show log' OnExecute = ALogShowExecute end end object MainMenu1: TMainMenu Left = 644 Top = 774 end end