object MainForm: TMainForm Left = 199 Top = 99 AutoScroll = False Caption = 'Key Info' ClientHeight = 305 ClientWidth = 503 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'System' Font.Style = [] KeyPreview = True OldCreateOrder = True OnKeyDown = FormKeyDown OnKeyPress = FormKeyPress OnKeyUp = FormKeyUp PixelsPerInch = 120 TextHeight = 20 object Bevel5: TBevel Left = 10 Top = 20 Width = 181 Height = 81 Style = bsRaised end object Bevel4: TBevel Left = 320 Top = 20 Width = 161 Height = 151 Style = bsRaised end object Bevel3: TBevel Left = 200 Top = 180 Width = 281 Height = 61 end object Bevel2: TBevel Left = 200 Top = 110 Width = 111 Height = 63 end object Bevel1: TBevel Left = 200 Top = 20 Width = 111 Height = 81 end object Label2: TLabel Left = 20 Top = 50 Width = 157 Height = 20 Caption = 'Keypress character' end object CharLabel: TLabel Left = 210 Top = 40 Width = 91 Height = 46 Alignment = taCenter AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -40 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label3: TLabel Left = 40 Top = 130 Width = 125 Height = 20 Caption = 'Key down value' end object Label4: TLabel Left = 40 Top = 200 Width = 117 Height = 20 Caption = 'Key down shift' end object ValueLabel: TLabel Left = 220 Top = 130 Width = 71 Height = 20 Alignment = taCenter AutoSize = False end object ShiftLabel: TLabel Left = 230 Top = 200 Width = 201 Height = 20 AutoSize = False end object Label1: TLabel Left = 330 Top = 30 Width = 141 Height = 131 AutoSize = False Caption = 'Press any key, and hold down Shift, Alt, and Ctrl keys to see th' + 'eir ASCII and virtual key values.' WordWrap = True end object Bevel6: TBevel Left = 10 Top = 110 Width = 181 Height = 61 Style = bsRaised end object Bevel7: TBevel Left = 10 Top = 180 Width = 181 Height = 61 Style = bsRaised end object CloseButton: TBitBtn Left = 370 Top = 250 Width = 111 Height = 41 Caption = 'Close' TabOrder = 0 Kind = bkClose end end