CPP_Builder/smartCARD
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

First commit 07/07/2002

Browse Source
This commit is contained in:
José David Guillén
2021-09-12 20:55:27 +02:00
commit 3a630dba1d
16 changed files with 1109 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

208
Main.dfm Normal file
View File

@ -0,0 +1,208 @@
object SmartCard_Reader: TSmartCard_Reader
Left = 191
Top = 116
Width = 572
Height = 368
Caption = 'SmartCard_Reader'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Menu = MainMenu1
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object StatusBar1: TStatusBar
Left = 0
Top = 303
Width = 564
Height = 19
Panels = <>
SimplePanel = False
end
object PageControl1: TPageControl
Left = 0
Top = 0
Width = 564
Height = 303
ActivePage = cmdManual
Align = alClient
MultiLine = True
TabOrder = 1
TabPosition = tpBottom
object TabSheet1: TTabSheet
Caption = 'TabSheet1'
object Label1: TLabel
Left = 0
Top = 16
Width = 77
Height = 13
Caption = 'Direcci<63>n inicial:'
end
object Label2: TLabel
Left = 104
Top = 16
Width = 44
Height = 13
Caption = 'Longitud:'
end
object Edit1: TEdit
Left = 0
Top = 32
Width = 80
Height = 21
TabOrder = 0
Text = '0'
end
object Edit2: TEdit
Left = 104
Top = 32
Width = 80
Height = 21
TabOrder = 1
Text = '0'
end
object UpDown1: TUpDown
Left = 80
Top = 32
Width = 12
Height = 21
Associate = Edit1
Min = 0
Position = 0
TabOrder = 2
Wrap = False
end
object UpDown2: TUpDown
Left = 184
Top = 32
Width = 12
Height = 21
Associate = Edit2
Min = 0
Position = 0
TabOrder = 3
Wrap = False
end
object Button1: TButton
Left = 208
Top = 32
Width = 75
Height = 21
Caption = 'Leer &Eeprom'
TabOrder = 4
end
end
object TabHistorico: TTabSheet
Caption = 'Hist<73>rico'
ImageIndex = 1
object mlog: TMemo
Left = 0
Top = 0
Width = 556
Height = 275
Align = alClient
Lines.Strings = (
'mlog')
ScrollBars = ssVertical
TabOrder = 0
end
end
object cmdManual: TTabSheet
Caption = 'cmdManual'
ImageIndex = 2
object Label3: TLabel
Left = 8
Top = 16
Width = 80
Height = 13
Caption = 'Enviar comando:'
end
object Label4: TLabel
Left = 0
Top = 48
Width = 142
Height = 13
Caption = 'Respuesta al <20>ltimo comando:'
end
object Memo1: TMemo
Left = 0
Top = 64
Width = 556
Height = 211
Align = alBottom
Color = clAppWorkSpace
ReadOnly = True
TabOrder = 0
end
object Edit3: TEdit
Left = 96
Top = 8
Width = 433
Height = 21
TabOrder = 1
OnKeyPress = Edit3KeyPress
end
object BitBtn1: TBitBtn
Left = 528
Top = 5
Width = 25
Height = 25
Caption = '>>'
TabOrder = 2
OnClick = BitBtn1Click
end
end
end
object MainMenu1: TMainMenu
Left = 168
Top = 120
object Archivo1: TMenuItem
Caption = '&Archivo'
object Acercade1: TMenuItem
Caption = 'Acerca &de...'
end
object N1: TMenuItem
Caption = '-'
end
object Salir1: TMenuItem
Caption = '&Salir'
OnClick = Salir1Click
end
end
object Configuracin1: TMenuItem
Caption = '&Configuraci<63>n'
object Puertoserie1: TMenuItem
Caption = '&Puerto serie'
OnClick = Puertoserie1Click
end
object N2: TMenuItem
Caption = '-'
end
object Conectar1: TMenuItem
Caption = 'Conectado'
GroupIndex = 1
RadioItem = True
OnClick = Conectar1Click
end
object Desconectar1: TMenuItem
Caption = 'Desconectado'
Checked = True
GroupIndex = 1
RadioItem = True
OnClick = Desconectar1Click
end
object N4: TMenuItem
Caption = '-'
GroupIndex = 2
end
object ATR1: TMenuItem
Caption = 'Reset'
GroupIndex = 2
OnClick = ATR1Click
end
end
end
end