wmwindowsform.~dfm

管理

object WMwindowForm: TWMwindowForm
  Left = 246
  Top = 136
  Width = 354
  Height = 421
  BorderIcons = [biSystemMenu]
  Caption = #31995#32479#36873#39033
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object PageControl1: TPageControl
    Left = 8
    Top = 8
    Width = 329
    Height = 345
    ActivePage = TabSheet3
    Style = tsFlatButtons
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = #20462#25913#23494#30721
      object GroupBox2: TGroupBox
        Left = 0
        Top = 8
        Width = 321
        Height = 183
        Caption = #35831#36755#20837'...   '
        TabOrder = 0
        object Label1: TLabel
          Left = 8
          Top = 66
          Width = 60
          Height = 12
          Caption = #26087' '#23494' '#30721#65306
        end
        object Label2: TLabel
          Left = 8
          Top = 102
          Width = 60
          Height = 12
          Caption = #26032' '#23494' '#30721#65306
        end
        object Label3: TLabel
          Left = 8
          Top = 136
          Width = 60
          Height = 12
          Caption = #30830#35748#23494#30721#65306
        end
        object Label7: TLabel
          Left = 8
          Top = 32
          Width = 60
          Height = 12
          Caption = #29992'    '#25143#65306
        end
        object Edit1: TEdit
          Left = 72
          Top = 61
          Width = 217
          Height = 20
          ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
          PasswordChar = '*'
          TabOrder = 0
        end
        object Edit2: TEdit
          Left = 72
          Top = 97
          Width = 217
          Height = 20
          ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
          PasswordChar = '*'
          TabOrder = 1
        end
        object Edit3: TEdit
          Left = 72
          Top = 131
          Width = 217
          Height = 20
          ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
          PasswordChar = '*'
          TabOrder = 2
        end
        object ComboBox1: TComboBox
          Left = 72
          Top = 27
          Width = 220
          Height = 20
          ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
          ItemHeight = 12
          TabOrder = 3
        end
      end
    end
    object TabSheet2: TTabSheet
      Caption = #28155#21152#29992#25143'...  '
      ImageIndex = 1
      object GroupBox1: TGroupBox
        Left = 0
        Top = 0
        Width = 321
        Height = 315
        Align = alClient
        TabOrder = 0
        object Bevel1: TBevel
          Left = 7
          Top = 145
          Width = 304
          Height = 4
        end
        object Bevel2: TBevel
          Left = 7
          Top = 256
          Width = 304
          Height = 4
        end
        object Label4: TLabel
          Left = 16
          Top = 163
          Width = 36
          Height = 12
          Caption = #29992#25143#65306
        end
        object Label5: TLabel
          Left = 16
          Top = 195
          Width = 36
          Height = 12
          Caption = #23494#30721#65306
        end
        object Label6: TLabel
          Left = 16
          Top = 223
          Width = 36
          Height = 12
          Caption = #30830#35748#65306
        end
        object Panel1: TPanel
          Left = 3
          Top = 8
          Width = 312
          Height = 131
          BevelInner = bvLowered
          BorderWidth = 2
          TabOrder = 0
          object DBGrid1: TDBGrid
            Left = 4
            Top = 4
            Width = 304
            Height = 123
            Align = alClient
            BorderStyle = bsNone
            Color = clBtnHighlight
            DataSource = doAppendUser
            ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
            Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
            ParentShowHint = False
            ShowHint = False
            TabOrder = 0
            TitleFont.Charset = GB2312_CHARSET
            TitleFont.Color = clWindowText
            TitleFont.Height = -12
            TitleFont.Name = #23435#20307
            TitleFont.Style = []
          end
        end
        object Edit4: TEdit
          Left = 56
          Top = 158
          Width = 241
          Height = 20
          ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
          TabOrder = 1
        end
        object Edit5: TEdit
          Left = 56
          Top = 190
          Width = 241
          Height = 20
          ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
          TabOrder = 2
        end
        object Edit6: TEdit
          Left = 56
          Top = 219
          Width = 241
          Height = 20
          ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
          TabOrder = 3
        end
        object Button3: TButton
          Left = 8
          Top = 272
          Width = 75
          Height = 25
          Caption = #28155#21152' . . .'
          TabOrder = 4
          OnClick = Button3Click
        end
        object Button4: TButton
          Left = 96
          Top = 272
          Width = 75
          Height = 25
          Caption = #21024#38500#29992#25143
          TabOrder = 5
          OnClick = Button4Click
        end
      end
    end
    object TabSheet3: TTabSheet
      Caption = #31995#32479#35774#32622
      ImageIndex = 2
      object GroupBox3: TGroupBox
        Left = 0
        Top = 0
        Width = 321
        Height = 315
        Align = alClient
        TabOrder = 0
        object Panel2: TPanel
          Left = 10
          Top = 23
          Width = 303
          Height = 29
          BevelOuter = bvLowered
          TabOrder = 0
          OnClick = Panel2Click
        end
      end
    end
  end
  object Button1: TButton
    Left = 148
    Top = 362
    Width = 75
    Height = 25
    Caption = #30830#23450'(&E)'
    TabOrder = 1
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 248
    Top = 362
    Width = 75
    Height = 25
    Caption = #21462#28040
    TabOrder = 2
    OnClick = Button2Click
  end
  object doAppendUser: TDataSource
    DataSet = adoAppendUser
    Left = 156
    Top = 114
  end
  object adoAppendUser: TADODataSet
    Connection = MainForm.ADOConnection1
    CursorType = ctStatic
    CommandText = 'select UserID, USerName, Password, ReMark from TsUSer'
    Parameters = <>
    Left = 215
    Top = 120
    object adoAppendUserUserID: TAutoIncField
      DisplayLabel = #33258#21160'ID'
      FieldName = 'UserID'
      ReadOnly = True
    end
    object adoAppendUserUSerName: TStringField
      DisplayLabel = #29992#25143
      FieldName = 'USerName'
      Size = 50
    end
    object adoAppendUserPassword: TIntegerField
      DisplayLabel = #23494#30721
      FieldName = 'Password'
    end
    object adoAppendUserReMark: TStringField
      DisplayLabel = #22791#27880
      FieldName = 'ReMark'
      Size = 50
    end
  end
  object adoNote: TADODataSet
    Connection = MainForm.ADOConnection1
    CursorType = ctStatic
    CommandText = 'select UserID, USerName, Password, ReMark from TsUSer'
    Parameters = <>
    Left = 116
    Top = 226
    object adoNoteUserID: TAutoIncField
      FieldName = 'UserID'
      ReadOnly = True
    end
    object adoNoteUSerName: TStringField
      FieldName = 'USerName'
      Size = 50
    end
    object adoNotePassword: TIntegerField
      FieldName = 'Password'
    end
    object adoNoteReMark: TStringField
      FieldName = 'ReMark'
      Size = 50
    end
  end
  object ColorDialog1: TColorDialog
    Left = 260
    Top = 98
  end
end