Delphi/CppBuilder

开发平台：
Delphi

U_htglkp.dfm：源码内容
							object Form60: TForm60
  Left = 176
  Top = 148
  Width = 446
  Height = 182
  BorderIcons = [biSystemMenu]
  Caption = #21512#21516#24402#26723#21345#29255
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 438
    Height = 123
    Align = alClient
    BevelInner = bvLowered
    TabOrder = 0
    object Label1: TLabel
      Left = 8
      Top = 13
      Width = 54
      Height = 12
      Caption = #21512#21516#32534#21495':'
      FocusControl = DBEdit1
    end
    object Label3: TLabel
      Left = 8
      Top = 87
      Width = 54
      Height = 12
      Caption = #24402#26723#35828#26126':'
      FocusControl = DBEdit3
    end
    object Label2: TLabel
      Left = 8
      Top = 47
      Width = 54
      Height = 12
      Caption = #24402#26723#32534#21495':'
      FocusControl = DBEdit2
    end
    object Label4: TLabel
      Left = 158
      Top = 47
      Width = 54
      Height = 12
      Caption = #24402#26723#26631#39064':'
    end
    object Shape1: TShape
      Left = 212
      Top = 63
      Width = 115
      Height = 1
    end
    object DBEdit1: TDBEdit
      Left = 63
      Top = 10
      Width = 81
      Height = 20
      DataField = #21512#21516#32534#21495
      DataSource = Form51.DataSource1
      ReadOnly = True
      TabOrder = 0
    end
    object DBEdit3: TDBEdit
      Left = 63
      Top = 83
      Width = 367
      Height = 20
      DataField = #24402#26723#35828#26126
      DataSource = Form51.DataSource1
      TabOrder = 1
    end
    object DBEdit2: TDBEdit
      Left = 62
      Top = 44
      Width = 81
      Height = 20
      DataField = #24402#26723#32534#21495
      DataSource = Form51.DataSource1
      ReadOnly = True
      TabOrder = 2
    end
    object Edit1: TEdit
      Left = 213
      Top = 48
      Width = 114
      Height = 15
      BorderStyle = bsNone
      Color = clBtnFace
      Enabled = False
      ReadOnly = True
      TabOrder = 3
    end
    object BitBtn1: TBitBtn
      Left = 126
      Top = 12
      Width = 16
      Height = 16
      Hint = #21512#21516#32534#21495#36741#21161#24405#20837
      Caption = #8230
      ParentShowHint = False
      ShowHint = True
      TabOrder = 4
      OnClick = BitBtn1Click
    end
    object BitBtn2: TBitBtn
      Left = 125
      Top = 46
      Width = 16
      Height = 16
      Hint = #24402#26723#32534#21495#36741#21161#24405#20837
      Caption = #8230
      ParentShowHint = False
      ShowHint = True
      TabOrder = 5
      OnClick = BitBtn2Click
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 123
    Width = 438
    Height = 32
    Align = alBottom
    BevelInner = bvLowered
    TabOrder = 1
    object SpeedButton1: TSpeedButton
      Left = 259
      Top = 5
      Width = 73
      Height = 22
      Caption = #30830'  '#23450
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
        555555555555555555555555555555555555555555FF55555555555559055555
        55555555577FF5555555555599905555555555557777F5555555555599905555
        555555557777FF5555555559999905555555555777777F555555559999990555
        5555557777777FF5555557990599905555555777757777F55555790555599055
        55557775555777FF5555555555599905555555555557777F5555555555559905
        555555555555777FF5555555555559905555555555555777FF55555555555579
        05555555555555777FF5555555555557905555555555555777FF555555555555
        5990555555555555577755555555555555555555555555555555}
      NumGlyphs = 2
      OnClick = SpeedButton1Click
    end
    object SpeedButton2: TSpeedButton
      Left = 352
      Top = 5
      Width = 73
      Height = 22
      Caption = #21462'  '#28040
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
        33333337777FF377FF3333993370739993333377FF373F377FF3399993000339
        993337777F777F3377F3393999707333993337F77737333337FF993399933333
        399377F3777FF333377F993339903333399377F33737FF33377F993333707333
        399377F333377FF3377F993333101933399377F333777FFF377F993333000993
        399377FF3377737FF7733993330009993933373FF3777377F7F3399933000399
        99333773FF777F777733339993707339933333773FF7FFF77333333999999999
        3333333777333777333333333999993333333333377777333333}
      NumGlyphs = 2
      OnClick = SpeedButton2Click
    end
  end
  object ClientDataSet1: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'P_GDLX'
    Left = 160
    Top = 8
    object ClientDataSet1ID: TIntegerField
      FieldName = 'ID'
    end
    object ClientDataSet1CDSDesigner: TStringField
      FieldName = #24402#26723#32534#21495
      FixedChar = True
      Size = 7
    end
    object ClientDataSet1CDSDesigner2: TStringField
      FieldName = #24402#26723#26631#39064
      FixedChar = True
      Size = 40
    end
    object ClientDataSet1CDSDesigner3: TStringField
      FieldName = #24402#26723#35828#26126
      Size = 60
    end
  end
end

						