object MainReadWrite: TMainReadWrite
  Left = 385
  Top = 154
  Width = 440
  Height = 653
  Caption = 'Simple PCSC'
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnActivate = FormActivate
  PixelsPerInch = 96
  TextHeight = 14
  object GroupBox2: TGroupBox
    Left = 7
    Top = 7
    Width = 418
    Height = 610
    TabOrder = 7
    object Label1: TLabel
      Left = 16
      Top = 24
      Width = 259
      Height = 19
      Caption = 'This is a simple PCSC application.'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object bConnect: TButton
      Left = 16
      Top = 130
      Width = 169
      Height = 33
      Caption = 'SCardConnect'
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
      OnClick = bConnectClick
    end
    object bBeginTran: TButton
      Left = 16
      Top = 167
      Width = 169
      Height = 33
      Caption = 'SCardBeginTransaction'
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
      OnClick = bBeginTranClick
    end
    object bStatus: TButton
      Left = 16
      Top = 204
      Width = 169
      Height = 33
      Caption = 'SCardStatus'
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 2
      OnClick = bStatusClick
    end
    object bTransmit: TButton
      Left = 16
      Top = 241
      Width = 169
      Height = 33
      Caption = 'SCardTransmit'
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 3
      OnClick = bTransmitClick
    end
    object bEnd: TButton
      Left = 16
      Top = 279
      Width = 169
      Height = 33
      Caption = 'SCardEndTransaction'
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 4
      OnClick = bEndClick
    end
    object bDisconnect: TButton
      Left = 16
      Top = 316
      Width = 169
      Height = 33
      Caption = 'SCardDisconnect'
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 5
      OnClick = bDisconnectClick
    end
    object bRelease: TButton
      Left = 16
      Top = 353
      Width = 169
      Height = 33
      Caption = 'SCardReleaseContext'
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 6
      OnClick = bReleaseClick
    end
    object gbData: TGroupBox
      Left = 200
      Top = 128
      Width = 209
      Height = 105
      Caption = 'APDU Input'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 7
      object Label7: TLabel
        Left = 8
        Top = 64
        Width = 131
        Height = 14
        Caption = '(Use HEX values only)'
      end
      object tDataIn: TEdit
        Left = 8
        Top = 32
        Width = 193
        Height = 22
        TabOrder = 0
        OnKeyPress = tDataInKeyPress
      end
    end
  end
  object GroupBox1: TGroupBox
    Left = 239
    Top = 59
    Width = 177
    Height = 49
    Caption = 'Port'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 6
  end
  object cbReader: TComboBox
    Left = 247
    Top = 75
    Width = 161
    Height = 22
    ItemHeight = 14
    TabOrder = 0
    OnChange = cbReaderChange
  end
  object mMsg: TRichEdit
    Left = 15
    Top = 400
    Width = 402
    Height = 209
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    ScrollBars = ssVertical
    TabOrder = 1
  end
  object bInit: TButton
    Left = 23
    Top = 63
    Width = 169
    Height = 33
    Caption = 'SCardEstablishContext'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 2
    OnClick = bInitClick
  end
  object bReader: TButton
    Left = 23
    Top = 100
    Width = 169
    Height = 33
    Caption = 'SCardListReaders'
    Enabled = False
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 3
    OnClick = bReaderClick
  end
  object bReset: TButton
    Left = 248
    Top = 360
    Width = 169
    Height = 33
    Caption = 'Clear Output Window'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 4
    OnClick = bResetClick
  end
  object bQuit: TButton
    Left = 248
    Top = 323
    Width = 169
    Height = 33
    Caption = '&Quit'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 5
    OnClick = bQuitClick
  end
end
