u_zjkgl_zjkgl_grzj.dfm

这是一个非常使用的DELPHI源码的例子,用的是SQL数据库和DELPHI企业版

      DataField = 'Bh'
      DataSource = Data.Mr_people_add
      ParentCtl3D = False
      TabOrder = 1
      Visible = False
    end
    object DBEdit3: TDBEdit
      Left = 228
      Top = 144
      Width = 25
      Height = 19
      Color = clMoneyGreen
      Ctl3D = False
      DataField = 'Xm'
      DataSource = Data.Mr_people_add
      ParentCtl3D = False
      TabOrder = 2
      Visible = False
    end
    object DBEdit4: TDBEdit
      Left = 228
      Top = 180
      Width = 27
      Height = 19
      Color = clMoneyGreen
      Ctl3D = False
      DataField = 'Kh'
      DataSource = Data.Mr_people_add
      ParentCtl3D = False
      TabOrder = 3
      Visible = False
    end
    object DBEdit5: TDBEdit
      Left = 228
      Top = 218
      Width = 27
      Height = 19
      Color = clMoneyGreen
      Ctl3D = False
      DataField = 'Ycje'
      DataSource = Data.Mr_people_add
      ParentCtl3D = False
      TabOrder = 4
      Visible = False
    end
    object DBEdit7: TDBEdit
      Left = 238
      Top = 342
      Width = 17
      Height = 19
      Color = clMoneyGreen
      Ctl3D = False
      DataField = 'Kzt'
      DataSource = Data.Mr_people_add
      ParentCtl3D = False
      TabOrder = 5
      Visible = False
    end
    object Edt_zjje: TEdit
      Left = 97
      Top = 250
      Width = 151
      Height = 35
      Color = clMoneyGreen
      Ctl3D = False
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -24
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 6
      Text = '0.00'
    end
    object Panel2: TPanel
      Left = 93
      Top = 69
      Width = 131
      Height = 21
      BevelOuter = bvLowered
      Ctl3D = False
      ParentCtl3D = False
      TabOrder = 7
      object Lbl_bmmc: TLabel
        Left = 1
        Top = 1
        Width = 129
        Height = 19
        Align = alClient
        Alignment = taCenter
        Color = clMoneyGreen
        ParentColor = False
      end
    end
    object Panel3: TPanel
      Left = 93
      Top = 107
      Width = 131
      Height = 21
      BevelOuter = bvLowered
      Ctl3D = False
      ParentCtl3D = False
      TabOrder = 8
      object Lbl_Rybh: TLabel
        Left = 1
        Top = 1
        Width = 129
        Height = 19
        Align = alClient
        Alignment = taCenter
        Color = clMoneyGreen
        ParentColor = False
      end
    end
    object Panel4: TPanel
      Left = 94
      Top = 141
      Width = 131
      Height = 21
      BevelOuter = bvLowered
      Ctl3D = False
      ParentCtl3D = False
      TabOrder = 9
      object Lbl_xm: TLabel
        Left = 1
        Top = 1
        Width = 129
        Height = 19
        Align = alClient
        Alignment = taCenter
        Color = clMoneyGreen
        ParentColor = False
      end
    end
    object Panel5: TPanel
      Left = 94
      Top = 178
      Width = 131
      Height = 21
      BevelOuter = bvLowered
      Ctl3D = False
      ParentCtl3D = False
      TabOrder = 10
      object Lbl_Kh: TLabel
        Left = 1
        Top = 1
        Width = 129
        Height = 19
        Align = alClient
        Alignment = taCenter
        Color = clMoneyGreen
        ParentColor = False
      end
    end
    object Panel6: TPanel
      Left = 96
      Top = 213
      Width = 131
      Height = 21
      BevelOuter = bvLowered
      Ctl3D = False
      ParentCtl3D = False
      TabOrder = 11
      object Lbl_ye: TLabel
        Left = 1
        Top = 1
        Width = 129
        Height = 19
        Align = alClient
        Alignment = taCenter
        Color = clMoneyGreen
        ParentColor = False
      end
    end
    object Panel7: TPanel
      Left = 98
      Top = 340
      Width = 131
      Height = 21
      BevelOuter = bvLowered
      Ctl3D = False
      ParentCtl3D = False
      TabOrder = 12
      object Lbl_kzt: TLabel
        Left = 1
        Top = 1
        Width = 129
        Height = 19
        Align = alClient
        Alignment = taCenter
        Color = clMoneyGreen
        ParentColor = False
      end
    end
    object cmx_lb: TComboBox
      Left = 96
      Top = 300
      Width = 145
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      TabOrder = 13
      OnChange = Action6Execute
      OnClick = Action6Execute
    end
  end
  object ActionManager1: TActionManager
    Left = 270
    Top = 21
    StyleName = 'XP Style'
    object Action1: TAction
      Caption = #20154#21592#36873#25321
    end
    object Action2: TAction
      Caption = #21047#21345
      OnExecute = Action2Execute
    end
    object Action3: TAction
      Caption = #20445#23384
      OnExecute = Action3Execute
    end
    object Action4: TAction
      Caption = #36864#20986
      OnExecute = Action4Execute
    end
    object Action5: TAction
      Caption = #20154#21592#23545#32771
      OnExecute = Action5Execute
    end
    object Action6: TAction
      Caption = 'fs'
      OnExecute = Action6Execute
    end
  end
end