home *** CD-ROM | disk | FTP | other *** search
- object fWholeSet: TfWholeSet
- Left = 154
- Top = 132
- Width = 800
- Height = 575
- BorderIcons = [biSystemMenu, biMinimize]
- Caption = 'Entire Character Set'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- FormStyle = fsStayOnTop
- OldCreateOrder = True
- Position = poScreenCenter
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnHide = FormHide
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object sg1: TStringGrid
- Left = 0
- Top = 40
- Width = 790
- Height = 505
- ColCount = 16
- DefaultColWidth = 48
- DefaultRowHeight = 30
- FixedCols = 0
- RowCount = 16
- FixedRows = 0
- Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goDrawFocusSelected]
- PopupMenu = PopupMenu1
- ScrollBars = ssNone
- TabOrder = 0
- OnDrawCell = sg1DrawCell
- OnMouseDown = sg1MouseDown
- OnMouseMove = sg1MouseMove
- OnMouseUp = sg1MouseUp
- OnSelectCell = sg1SelectCell
- end
- object RG1: TRadioGroup
- Left = 240
- Top = 0
- Width = 233
- Height = 33
- Columns = 3
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Items.Strings = (
- 'Decimal'
- 'Hex'
- 'Character')
- ParentFont = False
- TabOrder = 1
- OnClick = RG1Click
- end
- object CopyBuffer: TEdit
- Left = 488
- Top = 3
- Width = 161
- Height = 28
- Hint = 'Characters to copy to clipboard'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- end
- object BtnCopy: TBitBtn
- Left = 712
- Top = 5
- Width = 30
- Height = 30
- Hint = 'Copy to clipboard'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- OnClick = BtnCopyClick
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000130B0000130B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333330B7FFF
- FFB0333333777F3333773333330B7FFFFFB0333333777F3333773333330B7FFF
- FFB0333333777F3333773333330B7FFFFFB03FFFFF777FFFFF77000000000077
- 007077777777777777770FFFFFFFF00077B07F33333337FFFF770FFFFFFFF000
- 7BB07F3FF3FFF77FF7770F00F000F00090077F77377737777F770FFFFFFFF039
- 99337F3FFFF3F7F777FF0F0000F0F09999937F7777373777777F0FFFFFFFF999
- 99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
- 99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
- 93337FFFF7737777733300000033333333337777773333333333}
- NumGlyphs = 2
- end
- object BtnClear: TBitBtn
- Left = 752
- Top = 5
- Width = 30
- Height = 30
- Hint = 'Clear characters'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 4
- OnClick = BtnClearClick
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
- 55555FFFFFFF5F55FFF5777777757559995777777775755777F7555555555550
- 305555555555FF57F7F555555550055BB0555555555775F777F55555550FB000
- 005555555575577777F5555550FB0BF0F05555555755755757F555550FBFBF0F
- B05555557F55557557F555550BFBF0FB005555557F55575577F555500FBFBFB0
- B05555577F555557F7F5550E0BFBFB00B055557575F55577F7F550EEE0BFB0B0
- B05557FF575F5757F7F5000EEE0BFBF0B055777FF575FFF7F7F50000EEE00000
- B0557777FF577777F7F500000E055550805577777F7555575755500000555555
- 05555777775555557F5555000555555505555577755555557555}
- NumGlyphs = 2
- end
- object FontSize: TEdit
- Left = 664
- Top = 8
- Width = 25
- Height = 21
- Hint = 'Font Size'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- ReadOnly = True
- TabOrder = 5
- Text = '4'
- end
- object UpDown1: TUpDown
- Left = 689
- Top = 8
- Width = 15
- Height = 21
- Associate = FontSize
- Min = 4
- Max = 144
- Position = 4
- TabOrder = 6
- Wrap = False
- end
- object PopupMenu1: TPopupMenu
- Left = 504
- Top = 8
- object Copy1: TMenuItem
- Caption = 'Copy'
- OnClick = Copy1Click
- end
- object ClearandCopy1: TMenuItem
- Caption = 'Clear and Copy'
- OnClick = ClearandCopy1Click
- end
- object N1: TMenuItem
- Caption = '-'
- end
- object PrintCharacterSet1: TMenuItem
- Caption = 'Print Character Set...'
- OnClick = PrintCharacterSet1Click
- end
- object N2: TMenuItem
- Caption = '-'
- end
- object Close1: TMenuItem
- Caption = 'Close'
- OnClick = Close1Click
- end
- end
- end
-