home *** CD-ROM | disk | FTP | other *** search
- object Form7: TForm7
- Left = 187
- Top = 194
- BorderIcons = [biSystemMenu, biMinimize, biMaximize, biHelp]
- BorderStyle = bsDialog
- Caption = 'Manage User Group'
- ClientHeight = 286
- ClientWidth = 467
- Color = clBtnFace
- Font.Charset = RUSSIAN_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnCreate = FormCreate
- OnHelp = FormHelp
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Label1: TLabel
- Left = 24
- Top = 11
- Width = 62
- Height = 13
- Alignment = taRightJustify
- Caption = 'Group name:'
- end
- object Label8: TLabel
- Left = 10
- Top = 47
- Width = 43
- Height = 13
- Caption = '&Members'
- FocusControl = ListView2
- end
- object ListView2: TListView
- Left = 6
- Top = 63
- Width = 450
- Height = 183
- HelpContext = 6001
- Columns = <
- item
- Caption = 'User name'
- Width = 150
- end
- item
- Caption = 'Description'
- Width = 280
- end>
- MultiSelect = True
- ReadOnly = True
- RowSelect = True
- SortType = stText
- TabOrder = 0
- ViewStyle = vsReport
- end
- object ToolBar1: TToolBar
- Left = 391
- Top = 33
- Width = 64
- Height = 27
- Align = alNone
- Caption = 'ToolBar1'
- EdgeBorders = []
- TabOrder = 1
- object ToolButton2: TToolButton
- Left = 0
- Top = 2
- Hint = 'List'
- Caption = 'ToolButton2'
- ImageIndex = 1
- ParentShowHint = False
- ShowHint = True
- OnClick = ToolButton2Click
- end
- object ToolButton3: TToolButton
- Left = 23
- Top = 2
- Hint = 'Details'
- Caption = 'ToolButton3'
- Down = True
- ImageIndex = 2
- ParentShowHint = False
- ShowHint = True
- OnClick = ToolButton3Click
- end
- end
- object Button12: TButton
- Left = 111
- Top = 251
- Width = 90
- Height = 23
- HelpContext = 6003
- Caption = '&Delete User'
- TabOrder = 2
- OnClick = Button12Click
- end
- object Button11: TButton
- Left = 10
- Top = 251
- Width = 90
- Height = 23
- HelpContext = 6002
- Caption = '&Add User'
- TabOrder = 3
- OnClick = Button11Click
- end
- object Button1: TButton
- Left = 378
- Top = 251
- Width = 75
- Height = 23
- HelpContext = 6004
- Cancel = True
- Caption = '&Close'
- TabOrder = 4
- OnClick = Button1Click
- end
- object StaticText1: TStaticText
- Left = 87
- Top = 9
- Width = 328
- Height = 19
- HelpContext = 6000
- AutoSize = False
- BorderStyle = sbsSunken
- Font.Charset = RUSSIAN_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 5
- end
- end
-