card_inout.dfm

用户名：SYSTEM 密码：空 第一次运行请先恢复数据库 DATABASE 到SQL服务器

          Top = 34
          Width = 82
          Height = 21
          CalAlignment = dtaLeft
          Date = 37540
          Time = 37540
          DateFormat = dfShort
          DateMode = dmComboBox
          Enabled = False
          Font.Charset = CHINESEBIG5_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = #26032#32048#26126#39636
          Font.Style = []
          Kind = dtkDate
          ParseInput = False
          ParentFont = False
          TabOrder = 11
        end
        object CheckBox6: TCheckBox
          Left = 466
          Top = 10
          Width = 65
          Height = 17
          Caption = #26410#22238#20358
          TabOrder = 12
        end
      end
      object wwDBGrid2: TwwDBGrid
        Left = 0
        Top = 65
        Width = 753
        Height = 388
        DisableThemesInTitle = False
        Selected.Strings = (
          'cWorkerNo'#9'8'#9#24037#34399#9'F'
          'cWorkerName'#9'8'#9#22995#21517#9'F'
          'cDepartmentName'#9'22'#9#37096#38272#9'F'
          'cCardNo'#9'6'#9#21345#34399
          'tOut'#9'20'#9#20986#9'F'#9#36914#20986#26178#38291
          'tIn'#9'20'#9#36914#9'F'#9#36914#20986#26178#38291
          'iMinutes'#9'6'#9#26178#38291#9'F'#9#36914#20986#26178#38291)
        IniAttributes.Delimiter = ';;'
        TitleColor = clBtnFace
        FixedCols = 0
        ShowHorzScrollBar = True
        Align = alClient
        DataSource = DataSource1
        Font.Charset = CHINESEBIG5_CHARSET
        Font.Color = clNavy
        Font.Height = -13
        Font.Name = #32048#26126#39636
        Font.Style = []
        Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit, dgWordWrap]
        ParentFont = False
        RowHeightPercent = 120
        TabOrder = 1
        TitleAlignment = taCenter
        TitleFont.Charset = CHINESEBIG5_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -13
        TitleFont.Name = #26032#32048#26126#39636
        TitleFont.Style = []
        TitleLines = 2
        TitleButtons = False
        UseTFields = False
        PaintOptions.AlternatingRowColor = clInfoBk
      end
    end
    inherited tbsEdit: TTabSheet [2]
      Caption = #25976#25818#25972#29702
      TabVisible = False
      inherited Panel2: TPanel
        Top = 415
        Width = 753
        Caption = ''
        inherited btnNew: TBitBtn
          Left = 255
        end
        inherited btnModify: TBitBtn
          Left = 354
        end
        inherited btnDelete: TBitBtn
          Left = 453
        end
        inherited btnSave: TBitBtn
          Left = 552
        end
        inherited btnCancel: TBitBtn
          Left = 651
        end
      end
      inherited Panel1: TPanel
        Width = 753
        Height = 415
        inherited pnlFieldsPanel: TPanel
          Width = 753
          Height = 415
          Font.Charset = ANSI_CHARSET
          Font.Height = -15
          Font.Name = #23435#20307
          object Label2: TLabel
            Left = 216
            Top = 87
            Width = 46
            Height = 15
            Caption = #21345'  '#34399
          end
          object Label5: TLabel
            Left = 218
            Top = 133
            Width = 46
            Height = 15
            Caption = #26178'  '#38291
          end
          object Label6: TLabel
            Left = 216
            Top = 40
            Width = 45
            Height = 15
            Caption = #21345#37912#34399
            FocusControl = DBEdit4
          end
          object DBEdit4: TDBEdit
            Left = 279
            Top = 37
            Width = 58
            Height = 23
            DataField = 'iMachineID'
            TabOrder = 1
          end
          object DBLookupListBox1: TDBLookupListBox
            Left = 1
            Top = 1
            Width = 193
            Height = 409
            Align = alLeft
            BevelOuter = bvRaised
            KeyField = 'cCardNo'
            ListField = 'cCardNo;cWorkerNo;cWorkerName'
            TabOrder = 0
            OnClick = DBLookupListBox1Click
          end
          object DBEdit1: TDBEdit
            Left = 279
            Top = 85
            Width = 105
            Height = 23
            DataField = 'cCardNo'
            TabOrder = 2
          end
          object wwDBDateTimePicker1: TwwDBDateTimePicker
            Left = 279
            Top = 128
            Width = 218
            Height = 23
            CalendarAttributes.Font.Charset = DEFAULT_CHARSET
            CalendarAttributes.Font.Color = clWindowText
            CalendarAttributes.Font.Height = -11
            CalendarAttributes.Font.Name = 'MS Sans Serif'
            CalendarAttributes.Font.Style = []
            DataField = 'tTime'
            Epoch = 1950
            ShowButton = True
            TabOrder = 3
          end
        end
      end
    end
  end
  inherited DataSource: TDataSource
    DataSet = ADOQ_Card_InOut
    Left = 208
    Top = 136
  end
  object ADOQ_Card_InOut: TADOQuery
    Active = True
    Connection = fDataMod.adocon
    CursorType = ctStatic
    AfterInsert = ADOQ_Card_InOutAfterInsert
    Parameters = <>
    SQL.Strings = (
      'Select * From V_Worker_InOut where 1=2')
    Left = 176
    Top = 136
  end
  object ppReport1: TppReport
    AutoStop = False
    DataPipeline = ppDBPipeline1
    PassSetting = psTwoPass
    PrinterSetup.BinName = 'Default'
    PrinterSetup.DocumentName = 'Report'
    PrinterSetup.PaperName = 'A4'
    PrinterSetup.PrinterName = 'Default'
    PrinterSetup.mmMarginBottom = 6350
    PrinterSetup.mmMarginLeft = 6350
    PrinterSetup.mmMarginRight = 6350
    PrinterSetup.mmMarginTop = 6350
    PrinterSetup.mmPaperHeight = 297127
    PrinterSetup.mmPaperWidth = 210079
    PrinterSetup.PaperSize = 9
    DeviceType = 'Screen'
    OnPreviewFormCreate = ppReport1PreviewFormCreate
    OutlineSettings.CreateNode = True
    OutlineSettings.CreatePageNodes = True
    OutlineSettings.Enabled = False
    OutlineSettings.Visible = False
    TextSearchSettings.DefaultString = '<FindText>'
    TextSearchSettings.Enabled = False
    Left = 280
    Top = 176
    Version = '7.02'
    mmColumnWidth = 0
    DataPipelineName = 'ppDBPipeline1'
    object ppHeaderBand1: TppHeaderBand
      mmBottomOffset = 0
      mmHeight = 17463
      mmPrintPosition = 0
      object ppLabel1: TppLabel
        UserName = 'Label1'
        Caption = #27704#40251#37341#32340#24288#19978#29677#26399#38291#22806#20986#24773#27841#26126#32048#34920
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = #27161#26999#39636
        Font.Size = 18
        Font.Style = [fsBold]
        TextAlignment = taCentered
        Transparent = True
        mmHeight = 7673
        mmLeft = 47361
        mmTop = 1323
        mmWidth = 102394
        BandType = 0
      end
      object ppLabel2: TppLabel
        UserName = 'Label2'
        Caption = #24037' '#34399
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial'
        Font.Size = 10
        Font.Style = []
        Transparent = True
        mmHeight = 3969
        mmLeft = 7938
        mmTop = 11642
        mmWidth = 10848
        BandType = 0
      end
      object ppLabel3: TppLabel
        UserName = 'Label3'
        Caption = #22995' '#21517
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial'
        Font.Size = 10
        Font.Style = []
        Transparent = True
        mmHeight = 3969
        mmLeft = 25400
        mmTop = 11642
        mmWidth = 10848
        BandType = 0
      end
      object ppLabel4: TppLabel
        UserName = 'Label4'
        Caption = #37096'  '#38272
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial'
        Font.Size = 10
        Font.Style = []
        Transparent = True
        mmHeight = 4022
        mmLeft = 46302
        mmTop = 11642
        mmWidth = 9059
        BandType = 0
      end
      object ppLabel5: TppLabel
        UserName = 'Label5'
        Caption = #21345'  '#34399
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial'
        Font.Size = 10
        Font.Style = []
        Transparent = True
        mmHeight = 4022
        mmLeft = 64558
        mmTop = 11642
        mmWidth = 9059
        BandType = 0
      end
      object ppLabel7: TppLabel
        UserName = 'Label7'
        Caption = #20986
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial'
        Font.Size = 8
        Font.Style = []
        Transparent = True
        mmHeight = 3175
        mmLeft = 89165
        mmTop = 14023
        mmWidth = 2910
        BandType = 0
      end
      object ppLabel8: TppLabel
        UserName = 'Label8'
        Caption = #36914
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial'
        Font.Size = 8
        Font.Style = []
        Transparent = True
        mmHeight = 3175
        mmLeft = 120915
        mmTop = 14023
        mmWidth = 2910
        BandType = 0
      end
      object ppLine1: TppLine
        UserName = 'Line1'
        Position = lpBottom
        Weight = 0.75
        mmHeight = 1588
        mmLeft = 4763
        mmTop = 15875
        mmWidth = 186267
        BandType = 0
      end
      object ppLine3: TppLine
        UserName = 'Line3'
        Weight = 0.75
        mmHeight = 1058