u_system.dfm

repair repairrepairrepairrepair

object F_system: TF_system
  Left = 285
  Top = 221
  Width = 508
  Height = 402
  Caption = '系统维护'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 13
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 500
    Height = 375
    ActivePage = TabSheet3
    Align = alClient
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = '用户管理'
      OnShow = TabSheet1Show
      object DBGrid1: TDBGrid
        Left = 0
        Top = 0
        Width = 121
        Height = 347
        Align = alLeft
        DataSource = DM_main.DS_person
        Options = [dgEditing, dgTitles, dgIndicator, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        Columns = <
          item
            Expanded = False
            FieldName = 'ID'
            Title.Caption = '账号'
            Visible = True
          end>
      end
      object GroupBox1: TGroupBox
        Left = 121
        Top = 0
        Width = 371
        Height = 347
        Align = alClient
        Caption = '基本信息'
        TabOrder = 1
        object Label1: TLabel
          Left = 48
          Top = 32
          Width = 48
          Height = 13
          AutoSize = False
          Caption = '账　号：'
        end
        object Label2: TLabel
          Left = 48
          Top = 72
          Width = 48
          Height = 13
          AutoSize = False
          Caption = '姓　名：'
        end
        object Label3: TLabel
          Left = 48
          Top = 112
          Width = 48
          Height = 13
          AutoSize = False
          Caption = '电　话：'
        end
        object GroupBox2: TGroupBox
          Left = 2
          Top = 183
          Width = 367
          Height = 137
          Align = alBottom
          Caption = '修改密码'
          TabOrder = 0
          object Label4: TLabel
            Left = 48
            Top = 44
            Width = 60
            Height = 13
            AutoSize = False
            Caption = '新的密码：'
          end
          object Label5: TLabel
            Left = 48
            Top = 84
            Width = 60
            Height = 13
            AutoSize = False
            Caption = '确认密码：'
          end
          object i_passwd: TEdit
            Left = 120
            Top = 40
            Width = 121
            Height = 21
            PasswordChar = '*'
            TabOrder = 0
          end
          object i_passwd2: TEdit
            Left = 120
            Top = 80
            Width = 121
            Height = 21
            PasswordChar = '*'
            TabOrder = 1
          end
          object B_change: TButton
            Left = 272
            Top = 40
            Width = 65
            Height = 57
            Caption = '修改密码'
            TabOrder = 2
            OnClick = B_changeClick
          end
        end
        object DBNavigator1: TDBNavigator
          Left = 2
          Top = 320
          Width = 367
          Height = 25
          DataSource = DM_main.DS_person
          Align = alBottom
          Flat = True
          TabOrder = 1
        end
        object DBEdit1: TDBEdit
          Left = 64
          Top = 48
          Width = 121
          Height = 21
          DataField = 'ID'
          DataSource = DM_main.DS_person
          TabOrder = 2
        end
        object DBEdit2: TDBEdit
          Left = 64
          Top = 88
          Width = 121
          Height = 21
          DataField = 'NAME'
          DataSource = DM_main.DS_person
          TabOrder = 3
        end
        object DBEdit3: TDBEdit
          Left = 64
          Top = 128
          Width = 121
          Height = 21
          DataField = 'TEL'
          DataSource = DM_main.DS_person
          TabOrder = 4
        end
        object DBRadioGroup1: TDBRadioGroup
          Left = 216
          Top = 32
          Width = 113
          Height = 121
          Caption = '权限'
          DataField = 'AUTHORITY'
          DataSource = DM_main.DS_person
          Items.Strings = (
            '普通用户'
            '数据维护'
            '系统管理员')
          TabOrder = 5
          Values.Strings = (
            '0'
            '1'
            '2')
        end
      end
    end
    object TabSheet2: TTabSheet
      Caption = '设备分组'
      ImageIndex = 1
      OnShow = TabSheet2Show
      object GroupBox3: TGroupBox
        Left = 0
        Top = 0
        Width = 129
        Height = 347
        Align = alLeft
        Caption = '未分组工作位置列表'
        TabOrder = 0
        object DBG_ungroup: TDBGrid
          Left = 2
          Top = 15
          Width = 125
          Height = 330
          Align = alClient
          DataSource = DM_main.DS_wp_ungroup
          TabOrder = 0
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'MS Sans Serif'
          TitleFont.Style = []
          OnDblClick = DBG_ungroupDblClick
          Columns = <
            item
              Expanded = False
              FieldName = 'CODE'
              Title.Caption = '工作位置'
              Visible = True
            end>
        end
      end
      object GroupBox4: TGroupBox
        Left = 256
        Top = 0
        Width = 236
        Height = 347
        Align = alRight
        Caption = '设备组信息'
        TabOrder = 1
        object DBG_group_info: TDBGrid
          Left = 2
          Top = 15
          Width = 232
          Height = 90
          Align = alTop
          DataSource = DM_main.DS_group
          TabOrder = 0
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'MS Sans Serif'
          TitleFont.Style = []
          Columns = <
            item
              Expanded = False
              FieldName = 'ID'
              Title.Caption = '设备组编号'
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'NAME'
              Title.Caption = '名称'
              Visible = True
            end>
        end
        object DBNavigator3: TDBNavigator
          Left = 2
          Top = 320
          Width = 232
          Height = 25
          DataSource = DM_main.DS_group
          Align = alBottom
          Flat = True
          TabOrder = 1
        end
        object GroupBox6: TGroupBox
          Left = 2
          Top = 105
          Width = 232
          Height = 88
          Align = alTop
          Caption = '工程特性'
          TabOrder = 2
          object DBMemo1: TDBMemo
            Left = 2
            Top = 15
            Width = 228
            Height = 71
            Align = alClient
            DataField = 'GROUP_CHAR'
            DataSource = DM_main.DS_group
            TabOrder = 0
          end
        end
        object GroupBox7: TGroupBox
          Left = 2
          Top = 193
          Width = 232
          Height = 127
          Align = alClient
          Caption = '设备边界图'
          TabOrder = 3
          object DBImage1: TDBImage
            Left = 2
            Top = 15
            Width = 228
            Height = 110
            Align = alClient
            DataField = 'BOUNDARY'
            DataSource = DM_main.DS_group
            TabOrder = 0
            OnDblClick = DBImage1DblClick
          end
        end
      end
      object GroupBox5: TGroupBox
        Left = 129
        Top = 0
        Width = 127
        Height = 347
        Align = alClient
        Caption = '设备组成员'
        TabOrder = 2
        object DBG_group: TDBGrid
          Left = 2
          Top = 15
          Width = 123
          Height = 330
          Align = alClient
          DataSource = DM_main.DS_wp_group
          TabOrder = 0
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'MS Sans Serif'
          TitleFont.Style = []
          OnDblClick = DBG_groupDblClick
          Columns = <
            item
              Expanded = False
              FieldName = 'CODE'
              Title.Caption = '工作位置'
              Visible = True
            end>
        end
      end
    end
    object TabSheet3: TTabSheet
      Caption = '代码表管理'
      ImageIndex = 2
      object TableList: TListBox
        Left = 0
        Top = 0
        Width = 492
        Height = 33
        Align = alTop
        BorderStyle = bsNone
        Color = clSilver
        Columns = 5
        ItemHeight = 13
        Items.Strings = (
          '失效原因'
          '可能结果'
          '失效分布'
          '供货商'
          '失效模式'
          '变更操作'
          '维修结果'
          '系统编号'
          '设备类型'
          '工作位置')
        TabOrder = 0
        OnClick = TableListClick
      end
      object DBNavigator2: TDBNavigator
        Left = 0
        Top = 322
        Width = 492
        Height = 25
        DataSource = DM_main.DS_code
        Align = alBottom
        Flat = True
        TabOrder = 1
      end
      object DBGrid2: TDBGrid
        Left = 0
        Top = 33
        Width = 492
        Height = 289
        Align = alClient
        DataSource = DM_main.DS_code
        Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 2
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
      end
    end
  end
  object OPD1: TOpenPictureDialog
    Filter = 'Bitmaps (*.bmp)|*.bmp'
    Left = 358
    Top = 65529
  end
end