企业管理

开发平台：
Delphi

f_gzcx.dfm：源码内容
							object w_gzcx: Tw_gzcx
  Left = 276
  Top = 152
  BorderStyle = bsDialog
  Caption = #24037#36164#20449#24687#26597#35810
  ClientHeight = 384
  ClientWidth = 418
  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 Panel1: TPanel
    Left = 0
    Top = 175
    Width = 417
    Height = 209
    TabOrder = 0
    object DBGrid1: TDBGrid
      Left = 0
      Top = 0
      Width = 409
      Height = 201
      DataSource = data_gzxt
      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 GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 417
    Height = 105
    Caption = #26597#35810#26465#20214
    TabOrder = 1
    object Label2: TLabel
      Left = 8
      Top = 24
      Width = 61
      Height = 13
      Caption = '   '#24180#20221'        '
    end
    object Label3: TLabel
      Left = 192
      Top = 24
      Width = 64
      Height = 13
      Caption = #26376#20221'            '
    end
    object Label4: TLabel
      Left = 8
      Top = 64
      Width = 77
      Height = 13
      Caption = ' '#32844#32534#21495#24037'      '
    end
    object Label1: TLabel
      Left = 200
      Top = 64
      Width = 83
      Height = 13
      Caption = #32844#24037#22995#21517'         '
    end
    object Edit1: TEdit
      Left = 88
      Top = 24
      Width = 97
      Height = 21
      TabOrder = 0
    end
    object Edit2: TEdit
      Left = 272
      Top = 24
      Width = 121
      Height = 21
      TabOrder = 1
    end
    object Edit3: TEdit
      Left = 88
      Top = 64
      Width = 97
      Height = 21
      TabOrder = 2
    end
    object Edit4: TEdit
      Left = 272
      Top = 64
      Width = 121
      Height = 21
      TabOrder = 3
    end
  end
  object GroupBox2: TGroupBox
    Left = 0
    Top = 104
    Width = 417
    Height = 65
    TabOrder = 2
    object b_xs: TBitBtn
      Left = 24
      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 = 152
      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 = 280
      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 ado_gzxt: TADOQuery
    Active = True
    Connection = Data1.database1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from gzxt')
    Left = 264
    Top = 160
    object ado_gzxtg_nf: TStringField
      DisplayLabel = #24180#40836
      FieldName = 'g_nf'
      FixedChar = True
      Size = 8
    end
    object ado_gzxtg_yf: TStringField
      DisplayLabel = #26376#20221
      FieldName = 'g_yf'
      FixedChar = True
      Size = 5
    end
    object ado_gzxtrs_id: TStringField
      DisplayLabel = #32844#24037#32534#21495
      FieldName = 'rs_id'
      FixedChar = True
      Size = 5
    end
    object ado_gzxtrs_name: TStringField
      DisplayLabel = #32844#24037#22995#21517' '
      FieldName = 'rs_name'
      FixedChar = True
      Size = 10
    end
    object ado_gzxtg_jbgz: TFloatField
      DisplayLabel = #22522#26412#24037#36164
      FieldName = 'g_jbgz'
    end
    object ado_gzxtg_fdgz: TFloatField
      DisplayLabel = #28014#21160#24037#36164
      FieldName = 'g_fdgz'
    end
    object ado_gzxtg_grss: TFloatField
      DisplayLabel = #20010#20154#25152#30340#31246
      FieldName = 'g_grss'
    end
    object ado_gzxtg_gwgz: TFloatField
      DisplayLabel = #23703#20301#24037#36164
      FieldName = 'g_gwgz'
    end
    object ado_gzxtg_shbz: TFloatField
      DisplayLabel = #29983#27963#34917#21161
      FieldName = 'g_shbz'
    end
    object ado_gzxtg_bxkc: TFloatField
      DisplayLabel = #20445#38505#25187#38500
      FieldName = 'g_bxkc'
    end
    object ado_gzxtg_zgz: TFloatField
      DisplayLabel = #24635#24037#36164
      FieldName = 'g_zgz'
    end
    object ado_gzxtg_zkc: TFloatField
      DisplayLabel = #24635#25187#38500
      FieldName = 'g_zkc'
    end
    object ado_gzxtg_sfgz: TFloatField
      DisplayLabel = #23454#21457#24037#36164
      FieldName = 'g_sfgz'
    end
  end
  object data_gzxt: TDataSource
    DataSet = ado_gzxt
    Left = 200
    Top = 144
  end
end

						