home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Delphi 4 Bible
/
Delphi_4_Bible_Tom_Swan_IDG_Books_1998.iso
/
source
/
KEYINFO
/
MAIN.dfm
/
MAIN.txt
Wrap
Text File
|
1998-05-14
|
2KB
|
138 lines
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