unit_enterprise.~dfm

来自「美汇美容网网站管理系统」· ~DFM 代码 · 共 611 行 · 第 1/2 页

          Height = 13
          AutoSize = False
          Caption = #20225#19994#21517#31216
          FocusControl = dbeName
        end
        object Label6: TLabel
          Left = 16
          Top = 82
          Width = 100
          Height = 13
          AutoSize = False
          Caption = #36127#36131#20154
          FocusControl = dbePrin
        end
        object Label7: TLabel
          Left = 16
          Top = 110
          Width = 100
          Height = 13
          AutoSize = False
          Caption = #30005#35805
          FocusControl = dbePhone
        end
        object Label8: TLabel
          Left = 16
          Top = 138
          Width = 100
          Height = 13
          AutoSize = False
          Caption = #22320#22336
          FocusControl = dbeAddress
        end
        object Label9: TLabel
          Left = 16
          Top = 167
          Width = 100
          Height = 13
          AutoSize = False
          Caption = 'Email'
          FocusControl = dbeEmail
        end
        object Label11: TLabel
          Left = 16
          Top = 197
          Width = 100
          Height = 13
          AutoSize = False
          Caption = #25152#22312#30465
        end
        object Label14: TLabel
          Left = 16
          Top = 225
          Width = 100
          Height = 13
          AutoSize = False
          Caption = #25152#22312#22478#24066
        end
        object dbeusername: TDBEdit
          Left = 80
          Top = 24
          Width = 200
          Height = 20
          DataField = 'vUserName'
          DataSource = dm.dsEnterprise
          Enabled = False
          ImeName = #20013#25991' ('#31616#20307') - '#20116#31508#21152#21152
          TabOrder = 0
        end
        object dbeName: TDBEdit
          Left = 80
          Top = 52
          Width = 200
          Height = 20
          DataField = 'vName'
          DataSource = dm.dsEnterprise
          Enabled = False
          ImeName = #20013#25991' ('#31616#20307') - '#20116#31508#21152#21152
          TabOrder = 1
        end
        object dbePrin: TDBEdit
          Left = 80
          Top = 80
          Width = 200
          Height = 20
          DataField = 'vPrin'
          DataSource = dm.dsEnterprise
          Enabled = False
          ImeName = #20013#25991' ('#31616#20307') - '#20116#31508#21152#21152
          TabOrder = 2
        end
        object dbePhone: TDBEdit
          Left = 80
          Top = 108
          Width = 200
          Height = 20
          DataField = 'vPhone'
          DataSource = dm.dsEnterprise
          Enabled = False
          ImeName = #20013#25991' ('#31616#20307') - '#20116#31508#21152#21152
          TabOrder = 3
        end
        object dbeAddress: TDBEdit
          Left = 80
          Top = 136
          Width = 200
          Height = 20
          DataField = 'vAddress'
          DataSource = dm.dsEnterprise
          Enabled = False
          ImeName = #20013#25991' ('#31616#20307') - '#20116#31508#21152#21152
          TabOrder = 4
        end
        object dbeEmail: TDBEdit
          Left = 80
          Top = 164
          Width = 200
          Height = 20
          DataField = 'vEmail'
          DataSource = dm.dsEnterprise
          Enabled = False
          ImeName = #20013#25991' ('#31616#20307') - '#20116#31508#21152#21152
          TabOrder = 5
        end
        object dbeProvince: TDBEdit
          Left = 80
          Top = 193
          Width = 200
          Height = 20
          DataField = 'vProvince'
          DataSource = dm.dsEnterprise
          Enabled = False
          ImeName = #20013#25991' ('#31616#20307') - '#20116#31508#21152#21152
          TabOrder = 6
        end
        object dbeCity: TDBEdit
          Left = 80
          Top = 221
          Width = 200
          Height = 20
          DataField = 'vCity'
          DataSource = dm.dsEnterprise
          Enabled = False
          ImeName = #20013#25991' ('#31616#20307') - '#20116#31508#21152#21152
          TabOrder = 7
        end
        object GroupBox2: TGroupBox
          Left = 296
          Top = 16
          Width = 309
          Height = 227
          Caption = ' '#35746#21333#21015#34920' '
          TabOrder = 8
          object Label10: TLabel
            Left = 8
            Top = 200
            Width = 65
            Height = 13
            AutoSize = False
            Caption = #35746#21333#24635#25968':'
          end
          object Label15: TLabel
            Left = 152
            Top = 200
            Width = 65
            Height = 13
            AutoSize = False
            Caption = #20132#26131#24635#39069':'
          end
          object DBGrid2: TDBGrid
            Left = 8
            Top = 24
            Width = 293
            Height = 161
            DataSource = dm.dsOrder
            ImeName = #20013#25991' ('#31616#20307') - '#20116#31508#21152#21152
            Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgCancelOnExit]
            TabOrder = 0
            TitleFont.Charset = ANSI_CHARSET
            TitleFont.Color = clWindowText
            TitleFont.Height = -12
            TitleFont.Name = #23435#20307
            TitleFont.Style = []
            OnDblClick = DBGrid2DblClick
            Columns = <
              item
                Expanded = False
                FieldName = 'iNo'
                Title.Caption = #35746#21333#21495
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'fMoney'
                Title.Caption = #20132#26131#37329#39069
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'vFettle'
                Title.Caption = #35746#21333#29366#24577
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'dDate'
                Title.Caption = #19979#21333#26085#26399
                Width = 88
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'vChamberlain'
                Title.Caption = #25910#27454#20154
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'vShipper'
                Title.Caption = #21457#36135#20154
                Visible = True
              end>
          end
        end
      end
    end
  end
  object XPMenu1: TXPMenu
    DimLevel = 30
    GrayLevel = 10
    Font.Charset = GB2312_CHARSET
    Font.Color = clMenuText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    Color = clBtnFace
    IconBackColor = clBtnFace
    MenuBarColor = clBtnFace
    SelectColor = clHighlight
    SelectBorderColor = clHighlight
    SelectFontColor = clMenuText
    DisabledColor = clInactiveCaption
    SeparatorColor = clBtnFace
    CheckedColor = clHighlight
    IconWidth = 24
    DrawSelect = True
    UseSystemColors = True
    OverrideOwnerDraw = False
    Gradient = False
    FlatMenu = False
    AutoDetect = False
    Active = True
    Left = 576
    Top = 48
  end
  object pmClass: TPopupMenu
    OwnerDraw = True
    Left = 504
    Top = 40
    object N1: TMenuItem
      Caption = #28155#21152#30465
      OnClick = N1Click
    end
    object N2: TMenuItem
      Caption = #28155#21152#24066
      OnClick = N2Click
    end
    object N4: TMenuItem
      Caption = '-'
    end
    object N3: TMenuItem
      Caption = #32534#36753#24403#21069#30465#24066
      OnClick = N3Click
    end
    object N5: TMenuItem
      Caption = '-'
    end
    object N6: TMenuItem
      Caption = #21024#38500#24403#21069#30465#24066
      OnClick = N6Click
    end
  end
  object pmInfoList: TPopupMenu
    OwnerDraw = True
    Left = 536
    Top = 40
    object N11: TMenuItem
      Caption = #26174#31034#20840#37096#32463#38144#21830
      OnClick = N11Click
    end
  end
  object pmInfoSearch: TPopupMenu
    OwnerDraw = True
    Left = 472
    Top = 40
    object N7: TMenuItem
      Caption = #24555#36895#23450#20301'..'
      OnClick = N7Click
    end
    object N8: TMenuItem
      Caption = #39640#32423#26597#35810'..'
      OnClick = N8Click
    end
  end
end