u_mainform.dfm

中控800型号考勤机的自动采集数据程序。能够手动采集

object MainForm: TMainForm
  Left = 69
  Top = 169
  Width = 902
  Height = 643
  Caption = #25968#25454#37319#38598#31995#32479
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object dxNavBar1: TdxNavBar
    Left = 0
    Top = 0
    Width = 177
    Height = 609
    Align = alLeft
    ActiveGroupIndex = 0
    DragCopyCursor = -1119
    DragCursor = -1120
    DragDropFlags = [fAllowDragLink, fAllowDropLink, fAllowDragGroup, fAllowDropGroup]
    HotTrackedGroupCursor = crDefault
    HotTrackedLinkCursor = -1118
    LargeImages = ImageList1
    ShowNavigationPaneOverflowPanelHints = False
    View = 12
    object dxNavBar1Group1: TdxNavBarGroup
      Caption = #25968#25454#37319#38598
      LargeImageIndex = 1
      LinksUseSmallImages = False
      SelectedLinkIndex = -1
      ShowAsIconView = False
      ShowControl = False
      TopVisibleLinkIndex = 0
      UseControl = True
      UseSmallImages = True
      Visible = True
      Links = <
        item
          Item = dxNavBar1Item1
        end
        item
          Item = dxNavBar1Item4
        end>
    end
    object dxNavBar1Group2: TdxNavBarGroup
      Caption = #21442#25968#35774#32622
      LargeImageIndex = 2
      LinksUseSmallImages = False
      SelectedLinkIndex = -1
      ShowAsIconView = False
      ShowControl = False
      TopVisibleLinkIndex = 0
      UseControl = True
      UseSmallImages = True
      Visible = True
      Links = <
        item
          Item = dxNavBar1Item2
        end
        item
          Item = dxNavBar1Item3
        end
        item
          Item = dxNavBar1Item5
        end>
    end
    object dxNavBar1Item1: TdxNavBarItem
      Action = Action1
      LargeImageIndex = 4
      SmallImageIndex = -1
    end
    object dxNavBar1Item2: TdxNavBarItem
      Action = Action3
      LargeImageIndex = 1
      SmallImageIndex = -1
    end
    object dxNavBar1Item3: TdxNavBarItem
      Action = Action4
      LargeImageIndex = 2
      SmallImageIndex = -1
    end
    object dxNavBar1Item4: TdxNavBarItem
      Action = Action2
      LargeImageIndex = 3
      SmallImageIndex = -1
    end
    object dxNavBar1Item5: TdxNavBarItem
      Action = Action7
      LargeImageIndex = 0
      SmallImageIndex = -1
    end
    object dxNavBar1Group1Control: TdxNavBarGroupControl
      Left = 10
      Top = 4
      Width = 157
      Height = 28
      Caption = 'dxNavBar1Group1Control'
      TabOrder = 0
      GroupIndex = 0
      OriginalHeight = 41
    end
    object dxNavBar1Group2Control: TdxNavBarGroupControl
      Left = 10
      Top = 130
      Width = 157
      Height = 28
      Caption = 'dxNavBar1Group2Control'
      TabOrder = 1
      GroupIndex = 1
      OriginalHeight = 41
    end
  end
  object Panel1: TPanel
    Left = 177
    Top = 0
    Width = 717
    Height = 609
    Align = alClient
    BevelOuter = bvNone
    TabOrder = 1
    object Panel2: TPanel
      Left = 0
      Top = 0
      Width = 717
      Height = 152
      Align = alTop
      BevelOuter = bvNone
      Caption = 'Panel2'
      Color = 15520176
      TabOrder = 0
      object GroupBox1: TGroupBox
        Left = 0
        Top = 0
        Width = 717
        Height = 152
        Align = alClient
        Caption = #26426#22120#21015#34920
        TabOrder = 0
        object DevList: TListView
          Left = 2
          Top = 15
          Width = 713
          Height = 135
          Align = alClient
          Checkboxes = True
          Color = clWhite
          Columns = <
            item
              Caption = #35774#22791'ID'
              Width = 80
            end
            item
              Caption = #35774#22791#21517#31216
              Width = 100
            end
            item
              Caption = #35774#22791#29366#24577
              Width = 100
            end
            item
              Caption = 'IP'
              Width = 150
            end
            item
              Caption = #31471#21475
              Width = 60
            end>
          GridLines = True
          ReadOnly = True
          RowSelect = True
          SmallImages = ImageList
          TabOrder = 0
          ViewStyle = vsReport
          OnClick = DevListClick
          OnMouseDown = DevListMouseDown
        end
      end
    end
    object MainPn: TPanel
      Left = 0
      Top = 152
      Width = 717
      Height = 457
      Align = alClient
      BevelOuter = bvNone
      Color = 15520176
      TabOrder = 1
    end
  end
  object ImageList: TImageList
    Left = 144
    Top = 104
    Bitmap = {
      494C010104000900040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
      0000000000003600000028000000400000003000000001002000000000000030
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000