emptj_shouzhi_month.dfm

服装厂管理系统源程序压缩包, 请耐心阅读提供的文件包含的内容

object FrmEMPTJ_SHOUZHI_month: TFrmEMPTJ_SHOUZHI_month
  Left = 195
  Top = 141
  BorderStyle = bsDialog
  Caption = #21592#24037#26376#25910#25903#26126#32454#34920
  ClientHeight = 462
  ClientWidth = 680
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = True
  Position = poMainFormCenter
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object DBGrid: TDBGrid
    Left = 0
    Top = 0
    Width = 680
    Height = 352
    Align = alClient
    DataSource = DataSource
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
    TabOrder = 0
    TitleFont.Charset = ANSI_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -13
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'id'
        Title.Alignment = taCenter
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clBlue
        Title.Font.Height = -15
        Title.Font.Name = #23435#20307
        Title.Font.Style = []
        Width = 53
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'yearmonth'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        Title.Alignment = taCenter
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clBlue
        Title.Font.Height = -15
        Title.Font.Name = #23435#20307
        Title.Font.Style = []
        Width = 68
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'lastbalance'
        Font.Charset = ANSI_CHARSET
        Font.Color = clRed
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        Title.Alignment = taCenter
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clBlue
        Title.Font.Height = -15
        Title.Font.Name = #23435#20307
        Title.Font.Style = []
        Width = 110
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'shou'
        Font.Charset = ANSI_CHARSET
        Font.Color = clRed
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        Title.Alignment = taCenter
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clBlue
        Title.Font.Height = -15
        Title.Font.Name = #23435#20307
        Title.Font.Style = []
        Width = 111
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'fshou'
        Font.Charset = ANSI_CHARSET
        Font.Color = clRed
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        Title.Alignment = taCenter
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clBlue
        Title.Font.Height = -15
        Title.Font.Name = #23435#20307
        Title.Font.Style = []
        Width = 98
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'zhi'
        Font.Charset = ANSI_CHARSET
        Font.Color = clRed
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        Title.Alignment = taCenter
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clBlue
        Title.Font.Height = -15
        Title.Font.Name = #23435#20307
        Title.Font.Style = []
        Width = 90
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'balance'
        Font.Charset = ANSI_CHARSET
        Font.Color = clRed
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        Title.Alignment = taCenter
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clBlue
        Title.Font.Height = -15
        Title.Font.Name = #23435#20307
        Title.Font.Style = []
        Width = 110
        Visible = True
      end>
  end
  object Panel1: TPanel
    Left = 0
    Top = 352
    Width = 680
    Height = 110
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 1
    object Label4: TLabel
      Left = 8
      Top = 16
      Width = 75
      Height = 15
      Caption = #20154#21592#32534#30721#65306
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label1: TLabel
      Left = 8
      Top = 40
      Width = 45
      Height = 15
      Caption = #22995#21517#65306
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 8
      Top = 64
      Width = 45
      Height = 15
      Caption = #24615#21035#65306
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Bevel1: TBevel
      Left = 0
      Top = 0
      Width = 680
      Height = 6
      Align = alTop
      Shape = bsTopLine
    end
    object Label_Display: TLabel
      Left = 399
      Top = 11
      Width = 198
      Height = 15
      Caption = #27491#22312#32479#35745#25968#25454#65292#35831#31245#20505'......'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -15
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      Visible = False
    end
    object DBComboBox2: TComboBox
      Left = 72
      Top = 12
      Width = 150
      Height = 24
      Hint = #36755#20837#21592#24037#32534#21495#20877#25353#22238#36710#38190#65292#20197#20415#25214#21040#23545#24212#20154#21592#30340#20449#24687
      Font.Charset = ANSI_CHARSET
      Font.Color = clRed
      Font.Height = -16
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ItemHeight = 16
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      OnChange = DBComboBox2Change
      OnKeyPress = DBComboBox2KeyPress
    end
    object edtname: TEdit
      Left = 72
      Top = 37
      Width = 150
      Height = 23
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = #23435#20307
      Font.Style = []
      ParentColor = True
      ParentFont = False
      ReadOnly = True
      TabOrder = 1
    end
    object edtsex: TEdit
      Left = 72
      Top = 62
      Width = 49
      Height = 23
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = #23435#20307
      Font.Style = []
      ParentColor = True
      ParentFont = False
      ReadOnly = True
      TabOrder = 2
    end
    object GroupBox1: TGroupBox
      Left = 231
      Top = 8
      Width = 147
      Height = 82
      Caption = #36215#27490#26376#20221
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 3
      object Label5: TLabel
        Left = 12
        Top = 23
        Width = 15
        Height = 15
        Caption = #20174
      end
      object Label6: TLabel
        Left = 12
        Top = 55
        Width = 15
        Height = 15
        Caption = #21040
      end
      object sDate: TDateTimePicker
        Left = 34
        Top = 19
        Width = 103
        Height = 23
        Date = 38353.000000000000000000
        Time = 38353.000000000000000000
        DateFormat = dfLong
        TabOrder = 0
      end
      object eDate: TDateTimePicker
        Left = 34
        Top = 51
        Width = 103
        Height = 23
        Date = 38140.999305555550000000
        Time = 38140.999305555550000000
        DateFormat = dfLong
        TabOrder = 1
      end
    end
    object SearchBtn: TBitBtn
      Left = 399
      Top = 60
      Width = 80
      Height = 26
      Cursor = crHandPoint
      Caption = #26597#35810'&Q'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 4
      OnClick = SearchBtnClick
    end
    object PrtBtn: TBitBtn
      Left = 490
      Top = 60
      Width = 80
      Height = 26
      Cursor = crHandPoint
      Hint = #20462#25913'|'#20462#25913
      Caption = #25171#21360'&P'
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 5
      OnClick = PrtBtnClick
    end
    object ExtBtn: TBitBtn
      Left = 595
      Top = 60
      Width = 80
      Height = 26
      Cursor = crHandPoint
      Cancel = True
      Caption = #36864#20986'&X'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = #23435#20307
      Font.Style = []
      ModalResult = 7
      ParentFont = False
      TabOrder = 6
    end
    object CheckBox1: TCheckBox
      Left = 399
      Top = 31
      Width = 82
      Height = 17
      Caption = #37325#26032#32479#35745
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 7
    end
    object ProgressBar1: TProgressBar
      Left = 0
      Top = 94
      Width = 680
      Height = 16
      Align = alBottom
      TabOrder = 8
    end
  end
  object DataSource: TDataSource
    DataSet = ADOQuery1
    Left = 336
    Top = 168
  end
  object ADOQtmp: TADOQuery
    Connection = DataMod.ADOCon
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      ''
      'select * from earn_ABS')
    Left = 144
    Top = 144
  end
  object Rv_TJ_EMP_SZ: TRvDataSetConnection
    RuntimeVisibility = rtDeveloper
    DataSet = ADOQuery1
    Left = 488
    Top = 144
  end
  object RvSystem1: TRvSystem
    TitleSetup = #30830#23450#25253#34920#36755#20986#26041#24335
    TitleStatus = #27491#22312#29983#25104#25253#34920
    TitlePreview = #25968#25454#39044#35272
    SystemSetups = [ssAllowDestPrinter]
    SystemFiler.StatusFormat = #27491#22312#29983#25104#31532'%p'#39029','#35831#31245#20505'.....'
    SystemPreview.FormState = wsMaximized
    SystemPreview.ZoomFactor = 100.000000000000000000
    SystemPrinter.ScaleX = 100.000000000000000000
    SystemPrinter.ScaleY = 100.000000000000000000
    SystemPrinter.StatusFormat = #27491#22312#25171#21360#31532'%p'#39029
    SystemPrinter.Title = 'ReportPrinter Report'
    SystemPrinter.UnitsFactor = 1.000000000000000000
    Left = 488
    Top = 112
  end
  object RvProject1: TRvProject
    Engine = RvSystem1
    Left = 488
    Top = 72
  end
  object ADOQuery1: TADOQuery
    Connection = DataMod.ADOCon
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      
        'select id,yearmonth, lastbalance,shou,fshou,zhi,balance from Per' +
        'sonshouzhi')
    Left = 304
    Top = 168
    object ADOQuery1id: TAutoIncField
      DisplayLabel = #27969#27700#21495
      FieldName = 'id'
      ReadOnly = True
    end
    object ADOQuery1yearmonth: TStringField
      DisplayLabel = #26085#26399
      FieldName = 'yearmonth'
      Size = 7
    end
    object ADOQuery1lastbalance: TBCDField
      DisplayLabel = #19978#26376#32467#20313
      FieldName = 'lastbalance'
      DisplayFormat = #65509',0.00'
      Precision = 18
      Size = 2
    end
    object ADOQuery1shou: TBCDField
      DisplayLabel = #26412#26376#20027#25910#20837
      FieldName = 'shou'
      DisplayFormat = #65509',0.00'
      Precision = 18
      Size = 2
    end
    object ADOQuery1fshow: TBCDField
      DisplayLabel = #26412#26376#38468#25910#20837
      FieldName = 'fshou'
      DisplayFormat = #65509',0.00'
      Precision = 18
      Size = 2
    end
    object ADOQuery1zhi: TBCDField
      DisplayLabel = #26412#26376#25903#20986
      FieldName = 'zhi'
      DisplayFormat = #65509',0.00'
      Precision = 18
      Size = 2
    end
    object ADOQuery1balance: TBCDField
      DisplayLabel = #26412#26376#32467#20313
      FieldName = 'balance'
      DisplayFormat = #65509',0.00'
      Precision = 18
      Size = 2
    end
  end
  object ADOQpersonshouzhi: TADOQuery
    Connection = DataMod.ADOCon
    Parameters = <>
    Left = 144
    Top = 184
  end
  object ADOQemp: TADOQuery
    Connection = DataMod.ADOCon
    Parameters = <>
    Left = 144
    Top = 264
  end
  object ADOQupdate: TADOQuery
    Connection = DataMod.ADOCon
    Parameters = <>
    Left = 592
    Top = 272
  end
  object ADOQGetyearmonth: TADOQuery
    Connection = DataMod.ADOCon
    Parameters = <>
    Left = 592
    Top = 184
  end
  object ADOQ_TJFlag: TADOQuery
    Connection = DataMod.ADOCon
    Parameters = <>
    Left = 592
    Top = 320
  end
end