busiostate.dfm

停车场用

object WBusIOState: TWBusIOState
  Left = 66
  Top = 116
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = '当天车辆出入记录查看'
  ClientHeight = 369
  ClientWidth = 670
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Label9: TLabel
    Left = 268
    Top = 230
    Width = 56
    Height = 14
    Caption = '操作员：'
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlack
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 670
    Height = 37
    Align = alTop
    TabOrder = 0
    object SB_Close: TSpeedButton
      Left = 241
      Top = 4
      Width = 64
      Height = 29
      Hint = '关闭窗口'
      Flat = True
      Glyph.Data = {
        E6040000424DE604000000000000360000002800000014000000140000000100
        180000000000B0040000C40E0000C40E00000000000000000000CED3D6CED3D6
        CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3
        D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D684828484
        8284848284848284848284848284848284848284848284C6C3C6C6C3C6FFFFFF
        C6C3C6FFFFFFC6C3C6848284C6C3C6CED3D6CED3D68400008400008400008400
        00840000000000000000848284848284848284FFFFFFFFFFFFFFFFFF84000084
        0000840000840000840000CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6840000
        FF00FF840084000000000000C6C3C6FFFFFFFFFFFFFFFFFF840000CED3D6CED3
        D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6840000840084FF
        00FF840084000000FFFFFFFFFFFFFFFFFFFFFFFF840000CED3D6CED3D6CED3D6
        CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6840000FF00FF840084FF00
        FF000000FFFFFFFFFFFFFFFFFFFFFFFF840000CED3D6CED3D6CED3D6CED3D6CE
        D3D6CED3D6CED3D6CED3D6CED3D6CED3D6840000840084FF00FF840084000000
        FFFFFFFFFF00FFFFFFFFFF00840000CED3D6CED3D6CED3D6CED3D6CED3D6CED3
        D6CED3D6CED3D6CED3D6CED3D6840000FF00FF840084FF00FF000000FFFFFFFF
        FFFFFFFFFFFFFFFF840000CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6
        CED3D6CED3D6CED3D6840000840084FF00FF840084000000FFFFFFFFFF00FFFF
        FFFFFF00840000CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CE
        D3D6CED3D6840000FF00FF840084FF00FF000000FFFFFFFFFFFFFFFFFFFFFFFF
        840000CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3
        D6840000840084FF00FF840084000000FFFFFFFFFF00FFFFFFFFFF00840000CE
        D3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6840000
        FF00FF840084FF00FF000000FFFF00FFFFFFFFFF00FFFFFF840000CED3D6CED3
        D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6840000840084FF
        00FF840084000000FFFFFFFFFF00FFFFFFFFFF00840000CED3D6CED3D6CED3D6
        CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6840000FF00FF840084FF00
        FF000000FFFF00FFFFFFFFFF00FFFFFF840000CED3D6CED3D6CED3D6CED3D6CE
        D3D6CED3D6CED3D6CED3D6CED3D6CED3D6840000840000840000840000840000
        840000840000840000840000840000CED3D6CED3D6CED3D6CED3D6CED3D6CED3
        D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CE
        D3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6
        CED3D6CED3D6CED3D6CED3D6CED3D60000000000000000000000000000000000
        00CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CE
        D3D6CED3D6CED3D6CED3D600000000FF0000FF0000FF0000FF00000000CED3D6
        CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3
        D6CED3D6CED3D6000000000000000000000000000000000000CED3D6CED3D6CE
        D3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6
        CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3
        D6CED3D6CED3D6CED3D6}
      ParentShowHint = False
      ShowHint = True
      OnClick = SB_CloseClick
    end
    object DBNavigator1: TDBNavigator
      Left = 5
      Top = 4
      Width = 236
      Height = 29
      DataSource = PDataModule.DataSource_BusRecord
      VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
      Flat = True
      TabOrder = 0
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 37
    Width = 670
    Height = 332
    Align = alClient
    TabOrder = 1
    object Splitter1: TSplitter
      Left = 240
      Top = 1
      Width = 3
      Height = 330
      Cursor = crHSplit
    end
    object Panel3: TPanel
      Left = 1
      Top = 1
      Width = 239
      Height = 330
      Align = alLeft
      TabOrder = 0
      object DBGrid1: TDBGrid
        Left = 1
        Top = 1
        Width = 237
        Height = 328
        Align = alClient
        DataSource = PDataModule.DataSource_BusRecord
        ReadOnly = True
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        Columns = <
          item
            Expanded = False
            FieldName = 'UserName'
            Title.Caption = '车主名称'
            Width = 80
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'CardNo'
            Title.Caption = '卡号'
            Width = 64
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'BusNo'
            Title.Caption = '车牌号码'
            Width = 64
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'InTime'
            Width = 64
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'OutTime'
            Width = 64
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'TotalTime'
            Width = 64
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Price'
            Width = 64
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Operator'
            Width = 64
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'OperatorTime'
            Width = 64
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'InPhoto'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'OutPhoto'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Remark'
            Visible = True
          end>
      end
    end
    object Panel4: TPanel
      Left = 243
      Top = 1
      Width = 426
      Height = 330
      Align = alClient
      TabOrder = 1
      object Bevel1: TBevel
        Left = 9
        Top = 9
        Width = 409
        Height = 272
      end
      object Label1: TLabel
        Left = 19
        Top = 40
        Width = 42
        Height = 14
        Caption = '卡号：'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -14
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object Label2: TLabel
        Left = 177
        Top = 40
        Width = 70
        Height = 14
        Caption = '车主名称：'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -14
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object Label3: TLabel
        Left = 19
        Top = 80
        Width = 70
        Height = 14
        Caption = '用户类型：'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -14
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object Label4: TLabel
        Left = 214
        Top = 80
        Width = 70
        Height = 14
        Caption = '车牌号码：'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -14
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object Label5: TLabel
        Left = 19
        Top = 118
        Width = 70
        Height = 14
        Caption = '车辆类型：'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -14
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end