home *** CD-ROM | disk | FTP | other *** search
- object frmAlias: TfrmAlias
- Left = 312
- Top = 206
- HelpContext = 177
- BorderStyle = bsDialog
- Caption = 'Alias'
- ClientHeight = 189
- ClientWidth = 383
- 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 = 375
- Height = 151
- Shape = bsFrame
- IsControl = True
- end
- object lblClassID: TLabel
- Left = 10
- Top = 127
- Width = 39
- Height = 13
- Caption = 'C&lass ID'
- FocusControl = txtClassID
- end
- object lblCode: TLabel
- Left = 10
- Top = 42
- Width = 25
- Height = 13
- Caption = '&Code'
- FocusControl = cmbCode
- end
- object lblData: TLabel
- Left = 10
- Top = 70
- Width = 23
- Height = 13
- Caption = '&Data'
- FocusControl = cmbData
- end
- object lblType: TLabel
- Left = 10
- Top = 98
- Width = 24
- Height = 13
- Caption = '&Type'
- FocusControl = txtType
- end
- object lblID: TLabel
- Left = 10
- Top = 16
- Width = 11
- Height = 13
- Caption = '&ID'
- FocusControl = txtID
- end
- object txtClassID: TEdit
- Left = 54
- Top = 125
- Width = 235
- Height = 21
- Hint = 'The class identifier of the object'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 6
- end
- object cmbCode: TComboBox
- Left = 54
- Top = 40
- Width = 235
- 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 = 1
- end
- object cmbData: TComboBox
- Left = 54
- Top = 68
- Width = 235
- 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 = 3
- end
- object bbtnDataURL: TBitBtn
- Left = 293
- Top = 64
- Width = 77
- Height = 27
- Hint = 'Open the URL Builder'
- Caption = 'URL'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 4
- OnClick = bbtnDataURLClick
- Glyph.Data = {
- 42010000424D4201000000000000760000002800000012000000110000000100
- 040000000000CC00000000000000000000000000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 7777070000007777777777777770000000000000000000007700070000000FFF
- FFFFFFF07000770000000FFFFFFF00008007770000000FFFFFF0877808777700
- 00000FFFFF0877E88077770000000FFFFF0777787077770000000FFFFF07E778
- 7077770000000FFFFF08EE788077770000000FFFFFF087780777770000000FFF
- FFFF00007777770000000FFFFFFFFFF07777770000000FFFFFFF000077777700
- 00000FFFFFFF07077777770000000FFFFFFF0077777777000000000000000777
- 777777000000}
- end
- object bbtnCodeURL: TBitBtn
- Left = 293
- Top = 36
- Width = 77
- Height = 27
- Hint = 'Open the URL Builder'
- Caption = 'URL'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- OnClick = bbtnCodeURLClick
- Glyph.Data = {
- 42010000424D4201000000000000760000002800000012000000110000000100
- 040000000000CC00000000000000000000000000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 7777070000007777777777777770000000000000000000007700070000000FFF
- FFFFFFF07000770000000FFFFFFF00008007770000000FFFFFF0877808777700
- 00000FFFFF0877E88077770000000FFFFF0777787077770000000FFFFF07E778
- 7077770000000FFFFF08EE788077770000000FFFFFF087780777770000000FFF
- FFFF00007777770000000FFFFFFFFFF07777770000000FFFFFFF000077777700
- 00000FFFFFFF07077777770000000FFFFFFF0077777777000000000000000777
- 777777000000}
- end
- object Ok: TBitBtn
- Left = 133
- Top = 160
- Width = 77
- Height = 25
- Hint = 'Insert standard <IMG> tag'
- Caption = 'Ok'
- Default = True
- ModalResult = 1
- TabOrder = 7
- NumGlyphs = 2
- Spacing = -1
- IsControl = True
- end
- object Cancel: TBitBtn
- Left = 217
- Top = 160
- Width = 77
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 8
- NumGlyphs = 2
- Spacing = -1
- IsControl = True
- end
- object Help: TBitBtn
- Left = 301
- Top = 160
- Width = 77
- Height = 25
- HelpContext = 1
- Caption = 'Help'
- TabOrder = 9
- OnClick = HelpClick
- NumGlyphs = 2
- Spacing = -1
- IsControl = True
- end
- object txtType: TEdit
- Left = 54
- Top = 96
- Width = 235
- Height = 21
- Hint = 'The Internet Media Type of the object'#39's data'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 5
- end
- object txtID: TEdit
- Left = 54
- Top = 12
- Width = 235
- Height = 21
- Hint = 'A document-wide identifier'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- end
- end
-