object frmNote: TfrmNote Left = 289 Top = 210 HelpContext = 24 ActiveControl = OKBtn BorderStyle = bsDialog Caption = 'Admonishment' ClientHeight = 146 ClientWidth = 481 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter ShowHint = True OnActivate = FormActivate OnCreate = FormCreate OnDeactivate = FormDeactivate OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Bevel1: TBevel Left = 8 Top = 8 Width = 465 Height = 101 Shape = bsFrame IsControl = True end object lblSrc: TLabel Left = 12 Top = 24 Width = 16 Height = 13 Caption = '&Src' FocusControl = cmbURL Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object lblRole: TLabel Left = 12 Top = 80 Width = 22 Height = 13 Caption = '&Role' FocusControl = cmbURL Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object lblClear: TLabel Left = 216 Top = 80 Width = 49 Height = 13 Caption = 'Cl&ear' FocusControl = cmbClear Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object lblMessage: TLabel Left = 12 Top = 43 Width = 46 Height = 26 Caption = '&Message Digest' FocusControl = txtMD Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object OKBtn: TBitBtn Left = 228 Top = 116 Width = 77 Height = 25 Caption = 'OK' Default = True ModalResult = 1 TabOrder = 4 NumGlyphs = 2 Spacing = -1 IsControl = True end object CancelBtn: TBitBtn Left = 312 Top = 116 Width = 77 Height = 25 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 5 NumGlyphs = 2 Spacing = -1 IsControl = True end object HelpBtn: TBitBtn Left = 396 Top = 116 Width = 77 Height = 25 Caption = '&Help' TabOrder = 6 OnClick = HelpBtnClick NumGlyphs = 2 Spacing = -1 IsControl = True end object cmbRole: TComboBox Left = 72 Top = 76 Width = 141 Height = 21 Hint = 'The role of the note' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 Items.Strings = ( 'caution' 'note' 'simple' 'warning') ParentFont = False TabOrder = 2 end object cmbURL: TComboBox Left = 72 Top = 20 Width = 309 Height = 21 Hint = 'Specifies an image to appear preceding the note' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 ParentFont = False Sorted = True TabOrder = 0 end object bbtnURL: TBitBtn Left = 388 Top = 16 Width = 77 Height = 27 Hint = 'Open the URL Builder' Caption = '&URL' TabOrder = 7 OnClick = bbtnURLClick Glyph.Data = { 42010000424D4201000000000000760000002800000012000000110000000100 040000000000CC00000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777070000007777777777777770000000000000000000007700070000000FFF FFFFFFF07000770000000FFFFFFF00008007770000000FFFFFF0877808777700 00000FFFFF0877E88077770000000FFFFF0777787077770000000FFFFF07E778 7077770000000FFFFF08EE788077770000000FFFFFF087780777770000000FFF FFFF00007777770000000FFFFFFFFFF07777770000000FFFFFFF000077777700 00000FFFFFFF07077777770000000FFFFFFF0077777777000000000000000777 777777000000} end object cmbClear: TComboBox Left = 272 Top = 76 Width = 109 Height = 21 Hint = 'Forces the text to display below any figures, images, tables, et' + 'c.' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 Items.Strings = ( 'all' 'left' 'right') ParentFont = False Sorted = True TabOrder = 3 end object txtMD: TEdit Left = 72 Top = 49 Width = 309 Height = 21 Hint = 'Checksum for the associated graphic specified by the SRC attribu' + 'te' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 end end