企业管理

开发平台：
Delphi

f_kqcx.dfm：源码内容
							object w_kqcx: Tw_kqcx
  Left = 225
  Top = 214
  BorderStyle = bsDialog
  Caption = #32771#21220#20449#24687#26597#35810
  ClientHeight = 362
  ClientWidth = 404
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 94
  TextHeight = 13
  object Label1: TLabel
    Left = 72
    Top = 8
    Width = 3
    Height = 13
  end
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 401
    Height = 105
    Caption = #26597#35810#26465#20214
    TabOrder = 0
    object Label2: TLabel
      Left = 16
      Top = 24
      Width = 74
      Height = 13
      Caption = #32844#24037#32534#21495'      '
    end
    object Label3: TLabel
      Left = 208
      Top = 24
      Width = 86
      Height = 13
      Caption = #32844#24037#22995#21517'          '
    end
    object Label4: TLabel
      Left = 16
      Top = 64
      Width = 46
      Height = 13
      Caption = #20986#21220'      '
    end
    object Edit1: TEdit
      Left = 88
      Top = 24
      Width = 97
      Height = 21
      TabOrder = 0
    end
    object Edit2: TEdit
      Left = 280
      Top = 24
      Width = 105
      Height = 21
      TabOrder = 1
    end
    object ComboBox1: TComboBox
      Left = 88
      Top = 64
      Width = 153
      Height = 21
      ItemHeight = 13
      TabOrder = 2
      Items.Strings = (
        #27491#24120
        #30719#24037
        #35831#20551)
    end
  end
  object GroupBox2: TGroupBox
    Left = 0
    Top = 104
    Width = 401
    Height = 65
    TabOrder = 1
    object b_xs: TBitBtn
      Left = 16
      Top = 16
      Width = 81
      Height = 33
      Caption = #20840#37096#26174#31034
      TabOrder = 0
      OnClick = b_xsClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300130000031
        00333773F77777FF7733331000909000133333377737F777FF33330098F0F890
        0333337733F733F77F33370980FFF08907333373373F373373F33099FF0FFFF9
        903337F3F373F33FF7F33090FFF0FF00903337F73337F37737F33099FFF0FFF9
        9033373F33F7F3F33733370980F0F0890733337FF737F7337F33330098F0F890
        03333F77FF3733377FFF000009999900000377777FFFFF77777F088700000008
        77037F3377777773337F088887707888870373F3337773F33373307880707088
        7033373FF737F73FF733337003303300733333777337FF777333333333000333
        3333333333777333333333333333333333333333333333333333}
      NumGlyphs = 2
    end
    object b_cx: TBitBtn
      Left = 136
      Top = 16
      Width = 89
      Height = 33
      Caption = #26597#35810#32467#26524
      ModalResult = 8
      TabOrder = 1
      OnClick = b_cxClick
      Glyph.Data = {
        F2010000424DF201000000000000760000002800000024000000130000000100
        0400000000007C01000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333334433333
        3333333333388F3333333333000033334224333333333333338338F333333333
        0000333422224333333333333833338F33333333000033422222243333333333
        83333338F3333333000034222A22224333333338F33F33338F33333300003222
        A2A2224333333338F383F3338F33333300003A2A222A222433333338F8333F33
        38F33333000034A22222A22243333338833333F3338F333300004222A2222A22
        2433338F338F333F3338F3330000222A3A2224A22243338F3838F338F3338F33
        0000A2A333A2224A2224338F83338F338F3338F300003A33333A2224A2224338
        333338F338F3338F000033333333A2224A2243333333338F338F338F00003333
        33333A2224A2233333333338F338F83300003333333333A2224A333333333333
        8F338F33000033333333333A222433333333333338F338F30000333333333333
        A224333333333333338F38F300003333333333333A223333333333333338F8F3
        000033333333333333A3333333333333333383330000}
      NumGlyphs = 2
    end
    object b_gb: TBitBtn
      Left = 264
      Top = 16
      Width = 81
      Height = 33
      Caption = #36864#20986#31995#32479
      TabOrder = 2
      OnClick = b_gbClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333333333333333333333333333333FFF33FF333FFF339993370733
        999333777FF37FF377733339993000399933333777F777F77733333399970799
        93333333777F7377733333333999399933333333377737773333333333990993
        3333333333737F73333333333331013333333333333777FF3333333333910193
        333333333337773FF3333333399000993333333337377737FF33333399900099
        93333333773777377FF333399930003999333337773777F777FF339993370733
        9993337773337333777333333333333333333333333333333333333333333333
        3333333333333333333333333333333333333333333333333333}
      NumGlyphs = 2
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 168
    Width = 401
    Height = 193
    TabOrder = 2
    object DBGrid1: TDBGrid
      Left = 0
      Top = 8
      Width = 393
      Height = 177
      DataSource = data_kaoqin
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
    end
  end
  object data_kaoqin: TDataSource
    DataSet = ado_kaoqin
    Left = 264
    Top = 56
  end
  object ado_kaoqin: TADOQuery
    Active = True
    Connection = Data1.database1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from kaoqin ')
    Left = 312
    Top = 64
    object ado_kaoqinrs_id: TStringField
      DisplayLabel = #32844#24037#32534#21495
      FieldName = 'rs_id'
      FixedChar = True
      Size = 5
    end
    object ado_kaoqinrs_name: TStringField
      DisplayLabel = #32844#24037#22995#21517
      FieldName = 'rs_name'
      FixedChar = True
      Size = 15
    end
    object ado_kaoqins_time: TDateTimeField
      DisplayLabel = #19978#29677#26102#38388
      FieldName = 's_time'
    end
    object ado_kaoqinx_time: TDateTimeField
      DisplayLabel = #19979#29677#26102#38388
      FieldName = 'x_time'
    end
    object ado_kaoqinc_sh: TStringField
      DisplayLabel = #20986#21220
      FieldName = 'c_sh'
      FixedChar = True
      Size = 4
    end
  end
end

						