uregister.dfm

三层ERP系统 (SQL)

inherited frmregister: Tfrmregister
  Left = 586
  Top = 166
  ActiveControl = DBEditEh1
  BorderStyle = bsSingle
  Caption = #29992#25142#27880#37559
  ClientHeight = 235
  ClientWidth = 370
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object imagetop: TImage
    Left = 0
    Top = 0
    Width = 370
    Height = 57
    Align = alTop
    Stretch = True
    Transparent = True
  end
  object Panel1: TPanel
    Left = 0
    Top = 151
    Width = 370
    Height = 84
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 0
    object Label1: TLabel
      Left = 21
      Top = 15
      Width = 48
      Height = 13
      AutoSize = False
      Caption = #30331#37636#21517
    end
    object Label2: TLabel
      Left = 189
      Top = 15
      Width = 48
      Height = 13
      AutoSize = False
      Caption = #23494#30908
    end
    object Bevel1: TBevel
      Left = -3
      Top = 37
      Width = 382
      Height = 2
    end
    object DBEditEh1: TDBEditEh
      Left = 68
      Top = 9
      Width = 103
      Height = 21
      CharCase = ecUpperCase
      EditButtons = <>
      TabOrder = 0
      Visible = True
    end
    object DBEditEh2: TDBEditEh
      Left = 237
      Top = 9
      Width = 102
      Height = 21
      EditButtons = <>
      PasswordChar = '*'
      TabOrder = 1
      Visible = True
    end
    object Button1: TButton
      Left = 288
      Top = 48
      Width = 75
      Height = 25
      Caption = #21462#28040
      TabOrder = 3
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 212
      Top = 48
      Width = 75
      Height = 25
      Caption = #30906#23450
      TabOrder = 2
      OnClick = Button2Click
    end
  end
  object DBGridEh1: TDBGridEh
    Left = 0
    Top = 57
    Width = 370
    Height = 94
    Align = alClient
    DataSource = dsaccount
    Flat = True
    FooterColor = clWindow
    FooterFont.Charset = ANSI_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -13
    FooterFont.Name = #32048#26126#39636
    FooterFont.Style = []
    ReadOnly = True
    TabOrder = 1
    TitleFont.Charset = ANSI_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -13
    TitleFont.Name = #32048#26126#39636
    TitleFont.Style = []
    OnGetCellParams = DBGridEh1GetCellParams
    OnKeyDown = DBGridEh1KeyDown
    Columns = <
      item
        EditButtons = <>
        FieldName = 'accname'
        Footers = <>
        Title.Caption = #20844#21496#21517#31281
        Width = 130
      end
      item
        EditButtons = <>
        FieldName = 'dbname'
        Footers = <>
        Title.Caption = #24115#22871#21517#31281
        Width = 70
      end
      item
        EditButtons = <>
        FieldName = 'remark'
        Footers = <>
        Title.Caption = #20633#27880
        Width = 150
      end>
  end
  object CDSaccount: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 184
    Top = 96
  end
  object dsaccount: TDataSource
    DataSet = CDSaccount
    Left = 224
    Top = 112
  end
end