object frmObject: TfrmObject Left = 243 Top = 304 HelpContext = 176 BorderStyle = bsDialog Caption = 'Object' ClientHeight = 226 ClientWidth = 465 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter OnCreate = FormCreate OnDeactivate = FormDeactivate OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object bvlInsert: TBevel Left = 4 Top = 4 Width = 456 Height = 187 Shape = bsFrame IsControl = True end object lblAlignment: TLabel Left = 264 Top = 103 Width = 46 Height = 13 Alignment = taRightJustify Caption = 'Ali&gnment' FocusControl = cmbAlign Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object lblWidth: TLabel Left = 12 Top = 132 Width = 61 Height = 13 Caption = '&Width' FocusControl = txtWidth Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object lblHeight: TLabel Left = 128 Top = 132 Width = 61 Height = 13 Alignment = taRightJustify Caption = '&Height' FocusControl = txtHeight Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object lblBorder: TLabel Left = 271 Top = 134 Width = 39 Height = 11 Alignment = taRightJustify Caption = '&Border' FocusControl = txtBorder Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object lblHSpace: TLabel Left = 12 Top = 160 Width = 53 Height = 13 Caption = 'HSpace' FocusControl = txtHSpace Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object lblVSpace: TLabel Left = 128 Top = 160 Width = 61 Height = 13 Alignment = taRightJustify Caption = '&VSpace' FocusControl = txtVSpace Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object lblDir: TLabel Left = 176 Top = 103 Width = 13 Height = 13 Alignment = taRightJustify Caption = 'D&ir' FocusControl = cmbDir WordWrap = True end object lblStyle: TLabel Left = 208 Top = 74 Width = 23 Height = 13 Alignment = taRightJustify Caption = '&Style' FocusControl = txtStyle WordWrap = True end object lblClassID: TLabel Left = 12 Top = 103 Width = 61 Height = 13 Caption = 'C&lass ID' FocusControl = txtClassID WordWrap = True end object lblCode: TLabel Left = 12 Top = 18 Width = 25 Height = 13 Caption = '&Code' FocusControl = cmbCode WordWrap = True end object lblData: TLabel Left = 12 Top = 46 Width = 23 Height = 13 Caption = '&Data' FocusControl = cmbData WordWrap = True end object lblType: TLabel Left = 12 Top = 74 Width = 53 Height = 13 Caption = '&Type' FocusControl = txtType WordWrap = True end object cmbAlign: TComboBox Left = 314 Top = 101 Width = 54 Height = 21 Hint = 'Alignment of insert object' Style = csDropDownList Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 Items.Strings = ( 'default' 'texttop' 'middle' 'textmiddle' 'baseline' 'textbottom' 'eft' 'center' 'right' '') ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 8 end object txtHeight: TMaskEdit Left = 193 Top = 130 Width = 54 Height = 21 Hint = 'Height in units' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxLength = 0 ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 10 OnKeyPress = NumericKeyPress end object txtBorder: TMaskEdit Left = 314 Top = 130 Width = 54 Height = 21 Hint = 'Border thickness in units' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxLength = 0 ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 11 OnKeyPress = NumericKeyPress end object txtHSpace: TMaskEdit Left = 72 Top = 158 Width = 54 Height = 21 Hint = 'Extra horizontal space' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxLength = 0 ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 12 OnKeyPress = NumericKeyPress end object txtVSpace: TMaskEdit Left = 193 Top = 158 Width = 54 Height = 21 Hint = 'Extra vertical space' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxLength = 0 ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 13 OnKeyPress = NumericKeyPress end object txtWidth: TMaskEdit Left = 72 Top = 130 Width = 54 Height = 21 Hint = 'Width in units' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxLength = 0 ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 9 OnKeyPress = NumericKeyPress end object cmbDir: TComboBox Left = 193 Top = 101 Width = 54 Height = 21 Hint = 'The direction characters are read in the chosen language (LANG a' + 'ttribute)' ItemHeight = 13 Items.Strings = ( 'LTR' 'RTL') ParentShowHint = False ShowHint = True TabOrder = 7 end object txtClassID: TEdit Left = 72 Top = 101 Width = 54 Height = 21 Hint = 'The class identifier of the object' ParentShowHint = False ShowHint = True TabOrder = 6 end object cmbCode: TComboBox Left = 72 Top = 16 Width = 295 Height = 21 Hint = 'A URL referencing where to find the code which implements the ob' + 'ject'#39's behaviour' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 ParentFont = False ParentShowHint = False ShowHint = True Sorted = True TabOrder = 0 end object cmbData: TComboBox Left = 72 Top = 44 Width = 295 Height = 21 Hint = 'A URL referencing the object'#39's data' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 ParentFont = False ParentShowHint = False ShowHint = True Sorted = True TabOrder = 2 end object bbtnDataURL: TBitBtn Left = 373 Top = 40 Width = 77 Height = 27 Hint = 'Open the URL Builder' Caption = 'URL' ParentShowHint = False ShowHint = True TabOrder = 3 OnClick = bbtnDataURLClick Glyph.Data = { 42010000424D4201000000000000760000002800000012000000110000000100 040000000000CC00000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777070000007777777777777770000000000000000000007700070000000FFF FFFFFFF07000770000000FFFFFFF00008007770000000FFFFFF0877808777700 00000FFFFF0877E88077770000000FFFFF0777787077770000000FFFFF07E778 7077770000000FFFFF08EE788077770000000FFFFFF087780777770000000FFF FFFF00007777770000000FFFFFFFFFF07777770000000FFFFFFF000077777700 00000FFFFFFF07077777770000000FFFFFFF0077777777000000000000000777 777777000000} end object bbtnCodeURL: TBitBtn Left = 373 Top = 12 Width = 77 Height = 27 Hint = 'Open the URL Builder' Caption = 'URL' ParentShowHint = False ShowHint = True TabOrder = 1 OnClick = bbtnCodeURLClick Glyph.Data = { 42010000424D4201000000000000760000002800000012000000110000000100 040000000000CC00000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777070000007777777777777770000000000000000000007700070000000FFF FFFFFFF07000770000000FFFFFFF00008007770000000FFFFFF0877808777700 00000FFFFF0877E88077770000000FFFFF0777787077770000000FFFFF07E778 7077770000000FFFFF08EE788077770000000FFFFFF087780777770000000FFF FFFF00007777770000000FFFFFFFFFF07777770000000FFFFFFF000077777700 00000FFFFFFF07077777770000000FFFFFFF0077777777000000000000000777 777777000000} end object txtType: TEdit Left = 72 Top = 72 Width = 121 Height = 21 Hint = 'The Internet Media Type of the object'#39's data' ParentShowHint = False ShowHint = True TabOrder = 4 end object txtStyle: TEdit Left = 240 Top = 72 Width = 127 Height = 21 Hint = 'Rendering information' ParentShowHint = False ShowHint = True TabOrder = 5 end object Ok: TBitBtn Left = 214 Top = 197 Width = 77 Height = 25 Hint = 'Insert standard tag' Caption = 'Ok' Default = True ModalResult = 1 TabOrder = 14 NumGlyphs = 2 Spacing = -1 IsControl = True end object Cancel: TBitBtn Left = 298 Top = 197 Width = 77 Height = 25 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 15 NumGlyphs = 2 Spacing = -1 IsControl = True end object Help: TBitBtn Left = 382 Top = 197 Width = 77 Height = 25 Caption = 'Help' TabOrder = 16 OnClick = HelpClick NumGlyphs = 2 Spacing = -1 IsControl = True end object chkDeclare: TCheckBox Left = 312 Top = 160 Width = 97 Height = 17 Hint = 'Specifies an object without inserting it into the document' Caption = 'Decla&re' ParentShowHint = False ShowHint = True TabOrder = 17 end end