object MainForm: TMainForm Left = 205 Top = 81 ActiveControl = sgMap BorderIcons = [biSystemMenu, biMinimize] BorderStyle = bsSingle Caption = 'ExtendedCharacterMap' ClientHeight = 431 ClientWidth = 477 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -10 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {} KeyPreview = True Menu = mmnMain Position = poScreenCenter OnClose = FormClose OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 11 Top = 10 Width = 24 Height = 13 Alignment = taRightJustify Caption = '&Font:' FocusControl = cbFonts Transparent = True end object Label2: TLabel Left = 360 Top = 56 Width = 67 Height = 13 Caption = 'Big Character:' FocusControl = pnlBigChar Transparent = True end object Label3: TLabel Left = 11 Top = 34 Width = 92 Height = 13 Alignment = taRightJustify Caption = '&Characters to copy:' FocusControl = eChar Transparent = True end object Label4: TLabel Left = 11 Top = 56 Width = 73 Height = 13 Caption = 'Character &Map:' FocusControl = sgMap Transparent = True end object Bevel1: TBevel Left = 0 Top = 0 Width = 477 Height = 3 Align = alTop end object lblBigCharSize: TLabel Left = 383 Top = 222 Width = 3 Height = 13 Transparent = True end object Label5: TLabel Left = 358 Top = 222 Width = 23 Height = 13 Caption = 'Size:' Transparent = True end object lblCharMapSize: TLabel Left = 95 Top = 374 Width = 3 Height = 13 Transparent = True end object Label7: TLabel Left = 70 Top = 374 Width = 23 Height = 13 Caption = 'Size:' Transparent = True end object Bevel2: TBevel Left = 358 Top = 240 Width = 108 Height = 3 Shape = bsTopLine end object Label6: TLabel Left = 360 Top = 354 Width = 20 Height = 13 Caption = 'Dec' Transparent = True end object Label8: TLabel Left = 360 Top = 368 Width = 19 Height = 13 Caption = 'Hex' Transparent = True end object Label9: TLabel Left = 360 Top = 382 Width = 17 Height = 13 Caption = 'Oct' Transparent = True end object Label10: TLabel Left = 360 Top = 396 Width = 15 Height = 13 Caption = 'Bin' Transparent = True end object lblDec: TLabel Left = 392 Top = 354 Width = 3 Height = 13 PopupMenu = ppmBase Transparent = True OnMouseDown = lblDecMouseDown end object lblHex: TLabel Left = 392 Top = 368 Width = 3 Height = 13 PopupMenu = ppmBase Transparent = True OnMouseDown = lblHexMouseDown end object lblOct: TLabel Left = 392 Top = 382 Width = 3 Height = 13 PopupMenu = ppmBase Transparent = True OnMouseDown = lblOctMouseDown end object lblBin: TLabel Left = 392 Top = 396 Width = 3 Height = 13 PopupMenu = ppmBase Transparent = True OnMouseDown = lblBinMouseDown end object Bevel3: TBevel Left = 358 Top = 347 Width = 108 Height = 3 Shape = bsTopLine end object sgMap: TStringGrid Left = 11 Top = 73 Width = 339 Height = 297 Hint = 'Character Map' ColCount = 16 DefaultColWidth = 20 DefaultRowHeight = 20 DragCursor = crDefault FixedCols = 0 RowCount = 14 FixedRows = 0 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goDrawFocusSelected] ParentFont = False ParentShowHint = False PopupMenu = ppmMain ShowHint = True TabOrder = 4 OnDblClick = sgMapDblClick OnKeyDown = sgMapKeyDown OnMouseDown = sgMapMouseDown OnSelectCell = sgMapSelectCell end object pnlBigChar: TPanel Left = 358 Top = 73 Width = 108 Height = 129 Hint = 'Big Character Display' BevelOuter = bvNone BorderStyle = bsSingle Color = clWhite Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False PopupMenu = ppmMain ShowHint = True TabOrder = 6 OnMouseDown = pnlBigCharMouseDown end object sbMain: TStatusBar Left = 0 Top = 411 Width = 477 Height = 20 Panels = < item Text = 'Author: Sony Arianto Kurniawan' Width = 300 end item Text = 'Keystroke =' Width = 125 end> SimplePanel = False SizeGrip = False end object eChar: TEdit Left = 110 Top = 31 Width = 98 Height = 21 TabOrder = 1 OnChange = eCharChange end object btnCopy: TButton Left = 214 Top = 31 Width = 60 Height = 21 Hint = 'Copy Character(s)' Caption = 'C&opy' Enabled = False ParentShowHint = False ShowHint = True TabOrder = 2 OnClick = btnCopyClick end object cbFonts: TRzFontComboBox Left = 43 Top = 7 Width = 295 Height = 22 Hint = 'Font List' About = aiRaizeComponents FontName = 'Abadi MT Condensed Light' FontSize = 10 ParentShowHint = False ShowHint = True TabOrder = 0 OnChange = cbFontsChange end object sbBigChar: TScrollBar Left = 358 Top = 206 Width = 108 Height = 12 Hint = 'Font Size' Min = 1 ParentShowHint = False Position = 50 ShowHint = True TabOrder = 7 OnChange = sbBigCharChange end object btnSelect: TButton Left = 278 Top = 31 Width = 60 Height = 21 Hint = 'Select Highlighted Character' Caption = '&Select' ParentShowHint = False ShowHint = True TabOrder = 3 OnClick = btnSelectClick end object sbMap: TScrollBar Left = 11 Top = 376 Width = 54 Height = 10 Hint = 'Character Map Size' Max = 15 Min = 10 ParentShowHint = False Position = 10 ShowHint = True TabOrder = 5 OnChange = sbMapChange end object eSample: TEdit Left = 120 Top = 374 Width = 230 Height = 21 Hint = 'Sample text using selected font' Ctl3D = True ParentCtl3D = False ParentShowHint = False ShowHint = True TabOrder = 13 end object cbxBold: TCheckBox Left = 360 Top = 248 Width = 97 Height = 17 Caption = '&Bold' TabOrder = 8 OnClick = cbxBoldClick end object cbxItalic: TCheckBox Left = 360 Top = 264 Width = 97 Height = 17 Caption = 'It&alic' TabOrder = 9 OnClick = cbxItalicClick end object cbxUnderline: TCheckBox Left = 360 Top = 280 Width = 97 Height = 17 Caption = '&Underline' TabOrder = 10 OnClick = cbxUnderlineClick end object cbxStrikeOut: TCheckBox Left = 360 Top = 296 Width = 97 Height = 17 Caption = 'S&trikeOut' TabOrder = 11 OnClick = cbxStrikeOutClick end object cbcColor: TRzColorComboBox Left = 360 Top = 320 Width = 105 Height = 22 About = aiRaizeComponents TabOrder = 12 OnChange = cbcColorChange end object ppmMain: TPopupMenu AutoPopup = False Left = 368 Top = 80 object Copythischaracter1: TMenuItem Caption = 'Copy this character' OnClick = Copythischaracter1Click end object Selectthischaracter1: TMenuItem Caption = 'Select this character' OnClick = Selectthischaracter1Click end end object mmnMain: TMainMenu Left = 400 Top = 80 object File1: TMenuItem Caption = '&Program' object Exit1: TMenuItem Caption = 'E&xit' OnClick = Exit1Click end end object Help1: TMenuItem Caption = '&Help' object Content1: TMenuItem Caption = '&Content' OnClick = Content1Click end object N2: TMenuItem Caption = '-' end object ContactAuthor1: TMenuItem Caption = 'C&ontact Author' OnClick = ContactAuthor1Click end object AriTechDevelopmentIndonesiaWeb1: TMenuItem Caption = 'AriTech &Development Indonesia Web' OnClick = AriTechDevelopmentIndonesiaWeb1Click end object ExtendedCharacterMapWeb1: TMenuItem Caption = '&ExtendedCharacterMap Web' OnClick = ExtendedCharacterMapWeb1Click end object N1: TMenuItem Caption = '-' end object About1: TMenuItem Caption = '&About' OnClick = About1Click end end end object bcMain: TATBaseConverter Author = 'Sony Arianto K of AriTech Development [July,1998]' Decimal = 0 Octal = '0' Hexa = '0' Binary = '0' Left = 368 Top = 115 end object ppmBase: TPopupMenu Left = 400 Top = 115 object mnCopy: TMenuItem Caption = 'Copy' OnClick = mnCopyClick end end end