u_xtgl_xxgl.~dfm

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

        3A001F9D3900FFFFFE0027953200207C2E00B2BDAD0093B59C006A9C6E006B9C
        6A00629D6400649D6200519D5D002885390027953B007ABE7F00FFFFFD00FAFD
        F9001F8D2D00B6BDAD0083A98900518D5700286C3A0051735700FFFDFD00FFFE
        FF00FEFEFE00207433001F952800806A7200FDFFFF00FEFEFD001F8D2A001F8D
        32001F8D2500AAB5A50028743C000E852300B1B5AD00FDFDFD0030853F001685
        21001F852F0016852600B4B5AA00287C3F0016851D00167C28000E7C22001F85
        270020742B00308543000E7C1E00167C22000E852000207C2A00F8FAF7004185
        4A00176C2B000E7424000E74200017742A001774260017742000207C25000073
        160030743A009BBD9C008D8A88008D8C8B007B747B007B78760062846300286C
        2D00176C23000E741A0017741C000F6C18000F6C1E0038743E00387C46000F6C
        2200176C1E00177418000F641F0017642400A4BDA600498D4E00286C3200628C
        6700B7C6B500417C470007641A0007641E0017642800286C360030743E002064
        2A0017642C0059956400598C610072947800FDFD040003000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        000000000000000000000000000000000000ACFCFD0000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000F1F9FA538BD1FB0000000000000000000000000000000000000000000000
        000000000000000000000000000000000000F3ECF4F5F4ECF6F7F878125C0000
        0000000000000000000000000000000000000000000000000000000000000000
        0000EFE6E4E5E2E5E5E5E6E6F0E7F1F200000000000000000000000000000000
        000000000000000000000000000000000000E8E9EAEBE5E4E5E3E9E3ECEDE7EE
        00000000000000000000000000000000000000000000000000000000DCDD04DE
        DFE0E1D5D7E2D7D7D6E3E4E5D3E6E7DB00000000000000000000000000000000
        0000000000000000000000002B00000000D0D1D2D3D3D4D5D6D6D7D8D9D4DADB
        000000000000000000000000000000000000000000000000000000002BB20000
        00B7CBCCC7CDC7CDC7CDC7CDCEC1CFC400000000000000000000000000000000
        0000000000000000000000001FB2000000B7C5C6C7C7C8C7C7C7C8C7C8C9CAC4
        000000000000000000000000000000000000000000000000000000002BBF0000
        00B7C0C1C2C3C2C3C2C3C2C328C173C400000000000000000000000000000000
        0000000000000000000000001F00000000B7BCBA286C28B8286C28B8BDBA30BE
        00000000000000000000000000000000000000000000000000000000B500B600
        B1B742B8AAAAAA26AAAAAA26B9BA24BB00000000000000000000000000000000
        0000000000000000ACADAE8BAFA900B0B1B2B3986E6D6E6D6E6D6E6D6EB430AB
        00000000000000000000000000000000005B9FA0A1A2A35EA4A5A64438A7A800
        00A9459C3F323F323F323F3244AA42AB00000000000000000000000000000000
        009394959697989932324E829A6B7188009B899C323B323B323B323B3A9C9D9E
        0000000000000000000000000000000000688B8C4E33664F4F4E4E588D828E8F
        909173924F3B4F3B4F3B4F3B4F7D358A00000000000000000000000000000000
        00594D7F8081824E3D83586784588586878824583B4F3D433B4F3D435843898A
        000000000000000000000000000000000077783B433D663B43434E797A4E7B7C
        504C2474664F664F664F664F677D457E00000000000000000000000000000000
        0013696A266B6C6D6E6E6F6F706C717200177374434E4F66434E4F664E753076
        00000000000000000000000000000000005A5B145C5C5C5D5E425F6061626300
        16646543664E664E664E664E6743456800000000000000000000000000000000
        000000000000005122525354554B001515565743434E434E434E434E58434559
        000000000000000000000000000000000000000000000000004748494A4B0016
        004C4D4E4F434F434F434F434F441A5000000000000000000000000000000000
        0000000000000000000000002B000000004142263D433D433D433D433D444546
        000000000000000000000000000000000000000000000000000000001F000000
        001536372438393A3B3C3D333E3F402A00000000000000000000000000000000
        0000000000000000000000002B00000000152C002D2E2F303132273334323513
        000000000000000000000000000000000000000000000000000000001F000000
        0015000000202122232425262728292A00000000000000000000000000000000
        0000000000000000000000001400000000151600000000001718191A1B1C1D1E
        0000000000000000000000000000000000000000000000000000000102030405
        0603070803090A0B0C0D0E0F1011121300000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000}
      OnClick = SpeedButton4Click
    end
    object Label3: TLabel
      Left = 32
      Top = 20
      Width = 145
      Height = 23
      AutoSize = False
      Caption = #22522#26412#20449#24687#21015#34920
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Lbl_lb: TLabel
      Left = 213
      Top = 171
      Width = 57
      Height = 20
      AutoSize = False
      Caption = #31867#21035#65306
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      Visible = False
    end
    object DBGrid1: TDBGrid
      Left = 10
      Top = 48
      Width = 185
      Height = 301
      DataSource = Data.jbb_DataSource
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      OnDblClick = Action2Execute
      Columns = <
        item
          Expanded = False
          FieldName = 'M_Bh'
          Title.Caption = #32534#21495
          Width = 54
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'M_Name'
          Title.Caption = #21517#31216
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'M_Lb'
          Title.Caption = #31867#21035
          Visible = True
        end>
    end
    object DBEdit1: TDBEdit
      Left = 420
      Top = 78
      Width = 41
      Height = 19
      Ctl3D = False
      DataField = 'M_Bh'
      DataSource = Data.jbb_DataSource
      ParentCtl3D = False
      TabOrder = 1
      Visible = False
    end
    object DBEdit2: TDBEdit
      Left = 420
      Top = 126
      Width = 45
      Height = 19
      Ctl3D = False
      DataField = 'M_Name'
      DataSource = Data.jbb_DataSource
      ParentCtl3D = False
      TabOrder = 2
      Visible = False
    end
    object EDT_Bh: TEdit
      Left = 266
      Top = 74
      Width = 137
      Height = 19
      Ctl3D = False
      Enabled = False
      ParentCtl3D = False
      TabOrder = 3
    end
    object Edt_name: TEdit
      Left = 269
      Top = 125
      Width = 133
      Height = 19
      Ctl3D = False
      ParentCtl3D = False
      TabOrder = 4
    end
    object Cmx_lb: TComboBox
      Left = 268
      Top = 169
      Width = 139
      Height = 21
      Ctl3D = False
      ItemHeight = 13
      ParentCtl3D = False
      TabOrder = 5
      Visible = False
    end
    object DBEdit3: TDBEdit
      Left = 422
      Top = 172
      Width = 45
      Height = 19
      Ctl3D = False
      DataField = 'M_lb'
      DataSource = Data.jbb_DataSource
      ParentCtl3D = False
      TabOrder = 6
      Visible = False
    end
    object DBEdit4: TDBEdit
      Left = 420
      Top = 52
      Width = 41
      Height = 19
      Ctl3D = False
      DataField = 'M_lbbh'
      DataSource = Data.jbb_DataSource
      ParentCtl3D = False
      TabOrder = 7
      Visible = False
    end
  end
  object ActionManager1: TActionManager
    Left = 369
    Top = 14
    StyleName = 'XP Style'
    object Zj: TAction
      Caption = #22686#21152
      OnExecute = ZjExecute
    end
    object Xg: TAction
      Caption = #20462#25913
      OnExecute = XgExecute
    end
    object Sc: TAction
      Caption = #21024#38500
      OnExecute = ScExecute
    end
    object Tc: TAction
      Caption = #36864#20986
      OnExecute = TcExecute
    end
    object Action1: TAction
      Caption = #31995#32479#21021#20351#21270
      OnExecute = Action1Execute
    end
    object Action2: TAction
      Caption = #34920#26684#21333#36873
      OnExecute = Action2Execute
    end
  end
end