cardcleanup.~dfm

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

inherited fCardCleanUp: TfCardCleanUp
  Left = 202
  Top = 187
  BorderIcons = [biSystemMenu]
  Caption = #21047#21345#25976#25818#25972#29702
  ClientHeight = 272
  ClientWidth = 444
  PixelsPerInch = 96
  TextHeight = 13
  inherited Bevel1: TBevel
    Width = 444
  end
  inherited Label1: TLabel
    Width = 126
    Caption = #21047#21345#25976#25818#25972#29702
  end
  inherited Image1: TImage
    Picture.Data = {
      055449636F6E0000010001002020000001000800A80800001600000028000000
      2000000040000000010008000000000000000000000000000000000000010000
      0000000000000000000080000080000000808000800000008000800080800000
      C0C0C000C0DCC000F0CAA600D4F0FF00B1E2FF008ED4FF006BC6FF0048B8FF00
      25AAFF0000AAFF000092DC00007AB90000629600004A730000325000D4E3FF00
      B1C7FF008EABFF006B8FFF004873FF002557FF000055FF000049DC00003DB900
      003196000025730000195000D4D4FF00B1B1FF008E8EFF006B6BFF004848FF00
      2525FF000000FE000000DC000000B900000096000000730000005000E3D4FF00
      C7B1FF00AB8EFF008F6BFF007348FF005725FF005500FF004900DC003D00B900
      310096002500730019005000F0D4FF00E2B1FF00D48EFF00C66BFF00B848FF00
      AA25FF00AA00FF009200DC007A00B900620096004A00730032005000FFD4FF00
      FFB1FF00FF8EFF00FF6BFF00FF48FF00FF25FF00FE00FE00DC00DC00B900B900
      960096007300730050005000FFD4F000FFB1E200FF8ED400FF6BC600FF48B800
      FF25AA00FF00AA00DC009200B9007A009600620073004A0050003200FFD4E300
      FFB1C700FF8EAB00FF6B8F00FF487300FF255700FF005500DC004900B9003D00
      960031007300250050001900FFD4D400FFB1B100FF8E8E00FF6B6B00FF484800
      FF252500FE000000DC000000B9000000960000007300000050000000FFE3D400
      FFC7B100FFAB8E00FF8F6B00FF734800FF572500FF550000DC490000B93D0000
      963100007325000050190000FFF0D400FFE2B100FFD48E00FFC66B00FFB84800
      FFAA2500FFAA0000DC920000B97A000096620000734A000050320000FFFFD400
      FFFFB100FFFF8E00FFFF6B00FFFF4800FFFF2500FEFE0000DCDC0000B9B90000
      969600007373000050500000F0FFD400E2FFB100D4FF8E00C6FF6B00B8FF4800
      AAFF2500AAFF000092DC00007AB90000629600004A73000032500000E3FFD400
      C7FFB100ABFF8E008FFF6B0073FF480057FF250055FF000049DC00003DB90000
      319600002573000019500000D4FFD400B1FFB1008EFF8E006BFF6B0048FF4800
      25FF250000FE000000DC000000B90000009600000073000000500000D4FFE300
      B1FFC7008EFFAB006BFF8F0048FF730025FF570000FF550000DC490000B93D00
      009631000073250000501900D4FFF000B1FFE2008EFFD4006BFFC60048FFB800
      25FFAA0000FFAA0000DC920000B97A000096620000734A0000503200D4FFFF00
      B1FFFF008EFFFF006BFFFF0048FFFF0025FFFF0000FEFE0000DCDC0000B9B900
      009696000073730000505000F2F2F200E6E6E600DADADA00CECECE00C2C2C200
      B6B6B600AAAAAA009E9E9E0092929200868686007A7A7A006E6E6E0062626200
      565656004A4A4A003E3E3E0032323200262626001A1A1A000E0E0E00F0FBFF00
      A4A0A000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000
      FFFFFF0015151515151515151515151515151515151515151515151515151515
      15151515150C0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
      0E0E1115150A0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B
      0B0B0E15150A0B0B0B0B0B0B0B0B0B0B0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
      0C0B0E15150A0B0B0B0B0B0B0B0B0B0B27292929292929292929292929292929
      0C0B0E15150A0B0B0B0B0B0B0B0B0B0B26272727272727272727272727272729
      0C0B0E15150A0B0B0B0B0B0B0B0B0B0B26272222222222222727272727272729
      0C0B0E15150A0B0B0B0B0B0B0B0B0B0B26272222222222222727272727272729
      0C0B0E15150A0B0B0B0B0B0B0B0B0B0B26272222222222222323232727272729
      0C0B0E15150A0B0B0B0B0B0B0B0B0B0B26272222222222222323232727272729
      0C0B0E15150A0B0B0C0C0C0C0C0C0C0C26272222222222222323232424242729
      0C0B0E15150A0B0B2C2D2D2D2D2D2D2D26272222222222222323232424242729
      0C0B0E15150A0B0B2B2C2C2C2C2C2C2C26272222222222222323232424242729
      0C0B0E15150A0B0B2B2C2C2C2C2C2C2C26272222222222222323232424242729
      0C0B0E15150A0B0B2B2C2C2C2C2C2C2C26272727272323232323232424242729
      0C0B0E15150A0B0B2B2C2C2C2C2C2C2C26272727272323232323232424242729
      0C0B0E15150A0B0B2B2C2C2C2C2C2C2C26272727272727272424242424242729
      0C0B0E15150A0B0B2B2C2C2C2C2C2C2C26272727272727272424242424242729
      0C0B0E15150A0B0B2B2C2C2C2C2C2C2C26272727272727272727272727272729
      0C0B0E15150A0B0B2B2C2C2C2C2C2C2C26272727272727262626262626262627
      0C0B0E15150A0B0B2B2C2C2C2C2C2C2C262727272727292D0C0B0B0B0B0C0B0B
      0B0B0E15150A0B0B2B2C2C2C2C2C2C2C252626262626272D0C0B0B0B0C0D0C0B
      0B0B0E15150A0B0B2B2C2C2C2C2C2C2C2C2C2C2C2C2C2C2D0C0B0B0C0D2D0D0C
      0B0B0E15150A0B0B2B2C2C2C2C2C2C2C2C2C2C2C2C2C2C2D0C0B0B0C2D2D2D0C
      0B0B0E15150A0B0B2B2C2C2C2C2C2C2C2C2C2C2C2C2C2C2D0C0B0B0B0B2D0C0B
      0B0B0E15150A0B0B2B2C2C2C2C2C2C2C2C2C2C2C2C2C2C2D0C0B0C0C0C2D0C0B
      0B0B0E15150A0B0B2B2C2C2C2C2C2C2B2B2B2B2B2B2B2B2C0C0B2D2D2D2D0C0B
      0B0B0E15150A0B0B2B2C2C2C2C2C2D0C0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B
      0B0B0E15150A0B0B2A2B2B2B2B2B2C0C0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B
      0B0B0E15150A0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B
      0B0B0E1515FF0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A
      0A0A0C1515151515151515151515151515151515151515151515151515151515
      1515151500000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      00000000}
  end
  inherited btnExit: TBitBtn
    Left = 343
  end
  object wwDBGrid1: TwwDBGrid
    Left = 0
    Top = 42
    Width = 294
    Height = 230
    DisableThemesInTitle = False
    Selected.Strings = (
      'cWorkerNo'#9'8'#9#24037#34399
      'cWorkerName'#9'8'#9#22995#21517
      'cCardNo'#9'6'#9#21345#34399
      'tTime'#9'18'#9#25171#21345#26178#38291#9'F')
    IniAttributes.Delimiter = ';;'
    TitleColor = clBtnFace
    FixedCols = 0
    ShowHorzScrollBar = True
    Align = alClient
    DataSource = DataSource
    ReadOnly = True
    TabOrder = 1
    TitleAlignment = taCenter
    TitleFont.Charset = CHINESEBIG5_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -13
    TitleFont.Name = #26032#32048#26126#39636
    TitleFont.Style = []
    TitleLines = 1
    TitleButtons = True
    UseTFields = False
    OnTitleButtonClick = wwDBGrid1TitleButtonClick
    PaintOptions.AlternatingRowColor = clInfoBk
  end
  object Panel1: TPanel
    Left = 294
    Top = 42
    Width = 150
    Height = 230
    Align = alRight
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 2
    object Label2: TLabel
      Left = 6
      Top = 190
      Width = 29
      Height = 11
      Caption = 'Label2'
      Font.Charset = CHINESEBIG5_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = #26032#32048#26126#39636
      Font.Style = []
      ParentFont = False
      Visible = False
    end
    object Label3: TLabel
      Left = 6
      Top = 151
      Width = 32
      Height = 13
      Caption = 'Label3'
      Font.Charset = CHINESEBIG5_CHARSET
      Font.Color = clFuchsia
      Font.Height = -13
      Font.Name = #26032#32048#26126#39636
      Font.Style = []
      ParentFont = False
      Visible = False
    end
    object Label4: TLabel
      Left = 6
      Top = 167
      Width = 32
      Height = 13
      Caption = 'Label3'
      Font.Charset = CHINESEBIG5_CHARSET
      Font.Color = clFuchsia
      Font.Height = -13
      Font.Name = #26032#32048#26126#39636
      Font.Style = []
      ParentFont = False
      Visible = False
    end
    object RadioGroup1: TRadioGroup
      Left = 8
      Top = 13
      Width = 137
      Height = 66
      Caption = #25976#25818#29376#24907
      ItemIndex = 0
      Items.Strings = (
        #26410#25972#29702
        #24050#25972#29702
        #20840#37096#25976#25818)
      TabOrder = 0
      OnClick = RadioGroup1Click
    end
    object ProgressBar1: TProgressBar
      Left = 3
      Top = 208
      Width = 144
      Height = 16
      Min = 0
      Max = 100
      TabOrder = 1
    end
    object BitBtn1: TBitBtn
      Left = 16
      Top = 104
      Width = 121
      Height = 33
      Caption = #38283#22987#25972#29702
      TabOrder = 2
      OnClick = BitBtn1Click
    end
  end
  object ADOQuery1: TADOQuery
    Active = True
    Connection = fDataMod.adocon
    CursorType = ctStatic
    Parameters = <>
    Prepared = True
    SQL.Strings = (
      'Select * From V_Temp_Card')
    Left = 72
    Top = 168
    object ADOQuery1cWorkerNo: TStringField
      FieldName = 'cWorkerNo'
      Size = 8
    end
    object ADOQuery1cWorkerName: TStringField
      FieldName = 'cWorkerName'
      Size = 8
    end
    object ADOQuery1cCardNo: TStringField
      FieldName = 'cCardNo'
      Size = 5
    end
    object ADOQuery1tTime: TDateTimeField
      FieldName = 'tTime'
      ReadOnly = True
      DisplayFormat = 'yyyy/mm/dd HH:MM:SS'
    end
  end
  object DataSource: TDataSource
    DataSet = ADOQuery1
    Left = 136
    Top = 80
  end
end