home *** CD-ROM | disk | FTP | other *** search
- object ImageDialog: TImageDialog
- Left = 234
- Top = 176
- HelpContext = 1038
- ActiveControl = SrcE
- BorderStyle = bsDialog
- Caption = 'Image Selector'
- ClientHeight = 159
- ClientWidth = 423
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Position = poScreenCenter
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- PixelsPerInch = 96
- TextHeight = 13
- object ImageLabel: TLabel
- Left = 8
- Top = 0
- Width = 16
- Height = 13
- Caption = '&Src'
- FocusControl = SrcE
- end
- object Label1: TLabel
- Left = 216
- Top = 0
- Width = 12
- Height = 13
- Caption = '&Alt'
- FocusControl = AltE
- end
- object Label2: TLabel
- Left = 8
- Top = 40
- Width = 23
- Height = 13
- Caption = 'A&lign'
- end
- object Label3: TLabel
- Left = 104
- Top = 40
- Width = 28
- Height = 13
- Caption = '&Width'
- end
- object Label4: TLabel
- Left = 168
- Top = 40
- Width = 31
- Height = 13
- Caption = '&Height'
- end
- object Label5: TLabel
- Left = 232
- Top = 40
- Width = 31
- Height = 13
- Caption = '&Border'
- end
- object Label6: TLabel
- Left = 296
- Top = 40
- Width = 38
- Height = 13
- Caption = '&VSpace'
- end
- object Label7: TLabel
- Left = 360
- Top = 40
- Width = 39
- Height = 13
- Caption = '&HSpace'
- end
- object Label8: TLabel
- Left = 8
- Top = 80
- Width = 36
- Height = 13
- Caption = '&LowSrc'
- end
- object ImageBtn: TSpeedButton
- Tag = 1
- Left = 189
- Top = 15
- Width = 21
- Height = 22
- Hint = '|Select File'
- Glyph.Data = {
- 10010000424D1001000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000000000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 777777777777777777777000000000007777700333333333077770B033333333
- 307770FB03333333330770BFB0333333333070FBFB000000000070BFBFBFBFB0
- 777770FBFBFBFBF0777770BFB000000077777700077777777000777777777777
- 7700777777777077707077777777770007777777777777777777000000000000
- 0000000000000000000000000000000000000000}
- ParentShowHint = False
- ShowHint = True
- OnClick = UseMapBtnClick
- end
- object SpeedButton2: TSpeedButton
- Tag = 2
- Left = 189
- Top = 95
- Width = 21
- Height = 22
- Hint = 'Select File'
- Glyph.Data = {
- 10010000424D1001000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000000000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 777777777777777777777000000000007777700333333333077770B033333333
- 307770FB03333333330770BFB0333333333070FBFB000000000070BFBFBFBFB0
- 777770FBFBFBFBF0777770BFB000000077777700077777777000777777777777
- 7700777777777077707077777777770007777777777777777777000000000000
- 0000000000000000000000000000000000000000}
- ParentShowHint = False
- ShowHint = True
- OnClick = UseMapBtnClick
- end
- object Label9: TLabel
- Left = 216
- Top = 80
- Width = 40
- Height = 13
- Caption = '&UseMap'
- end
- object SpeedButton3: TSpeedButton
- Tag = 3
- Left = 397
- Top = 95
- Width = 21
- Height = 22
- Hint = 'Select File'
- Glyph.Data = {
- 10010000424D1001000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000000000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 777777777777777777777000000000007777700333333333077770B033333333
- 307770FB03333333330770BFB0333333333070FBFB000000000070BFBFBFBFB0
- 777770FBFBFBFBF0777770BFB000000077777700077777777000777777777777
- 7700777777777077707077777777770007777777777777777777000000000000
- 0000000000000000000000000000000000000000}
- ParentShowHint = False
- ShowHint = True
- OnClick = SpeedButton3Click
- end
- object SrcE: TEdit
- Left = 8
- Top = 16
- Width = 177
- Height = 21
- Hint =
- 'The value of the SRC attribute is '#13'the URL of the document to be' +
- ' '#13'embedded only images can be '#13'embedded, not HTML text|URL Src'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- end
- object OKButton: TButton
- Left = 312
- Top = 128
- Width = 41
- Height = 25
- Caption = '&Ok'
- Default = True
- TabOrder = 2
- OnClick = OKButtonClick
- end
- object CancelButton: TButton
- Left = 360
- Top = 128
- Width = 57
- Height = 25
- Cancel = True
- Caption = '&Cancel'
- TabOrder = 3
- OnClick = CancelButtonClick
- end
- object AltE: TEdit
- Left = 216
- Top = 16
- Width = 201
- Height = 21
- Hint =
- 'Optional text as an alternative to the graphic '#13'for rendering in' +
- ' non-graphical environments. '#13'Alternate text should be provided ' +
- 'whenever '#13'the graphic is not rendered|Alt-ernative Text'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- end
- object AlignLB: TComboBox
- Left = 8
- Top = 56
- Width = 89
- Height = 21
- Hint =
- 'The ALIGN attribute accepts the values '#13'TOP or MIDDLE or BOTTOM,' +
- ' which '#13'specifies if the following line of text is '#13'aligned with' +
- ' the top, middle, or bottom '#13'of the graphic - See help for other' +
- ' align'#13'attributes.|Align'
- Style = csDropDownList
- ItemHeight = 13
- Items.Strings = (
- '(None)'
- 'left'
- 'right'
- 'top'
- 'texttop'
- 'middle'
- 'absmiddle'
- 'baseline'
- 'bottom'
- 'absbottom')
- ParentShowHint = False
- ShowHint = True
- TabOrder = 4
- end
- object IsMapCB: TCheckBox
- Left = 8
- Top = 128
- Width = 57
- Height = 17
- Hint =
- 'The ISMAP (is map) attribute '#13'identifies an image as an image '#13'm' +
- 'ap. Image maps are graphics '#13'in which certain regions are '#13'mappe' +
- 'd to URLs|Is Map'
- Caption = 'Is &Map'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 5
- end
- object WidthSE: TSpinEdit
- Left = 104
- Top = 56
- Width = 57
- Height = 22
- Hint =
- 'The WIDTH and HEIGHT attributes '#13'were added to <IMG ...> mainly ' +
- 'to '#13'speed up display of the document|Width'
- MaxValue = 0
- MinValue = 0
- ParentShowHint = False
- ShowHint = True
- TabOrder = 6
- Value = 0
- end
- object HeightSE: TSpinEdit
- Left = 168
- Top = 56
- Width = 57
- Height = 22
- Hint =
- 'The WIDTH and HEIGHT attributes '#13'were added to <IMG ...> mainly ' +
- 'to '#13'speed up display of the document|Height'
- MaxValue = 0
- MinValue = 0
- ParentShowHint = False
- ShowHint = True
- TabOrder = 7
- Value = 0
- end
- object BorderSE: TSpinEdit
- Left = 232
- Top = 56
- Width = 57
- Height = 22
- Hint =
- 'This lets the document author '#13'control the thickness of the bord' +
- 'er '#13'around an image displayed|Border'
- MaxValue = 99
- MinValue = -1
- ParentShowHint = False
- ShowHint = True
- TabOrder = 8
- Value = -1
- end
- object VSpaceSE: TSpinEdit
- Left = 296
- Top = 56
- Width = 57
- Height = 22
- Hint =
- 'VSPACE controls the '#13'vertical space above '#13'and below the image|V' +
- ' Space'
- MaxValue = 0
- MinValue = 0
- ParentShowHint = False
- ShowHint = True
- TabOrder = 9
- Value = 0
- end
- object HSpaceSE: TSpinEdit
- Left = 360
- Top = 56
- Width = 57
- Height = 22
- Hint =
- 'HSPACE controls the '#13'horizontal space to the '#13'left and right of ' +
- 'the image|HSpace'
- MaxValue = 0
- MinValue = 0
- ParentShowHint = False
- ShowHint = True
- TabOrder = 10
- Value = 0
- end
- object LowSrcE: TEdit
- Left = 8
- Top = 96
- Width = 177
- Height = 21
- Hint =
- 'Using the LOWSRC attribute, it is possible'#13'to use two images in ' +
- 'the same space. On'#13'the first pass LOWSRC will be loaded then'#13'SRC' +
- '.|Low Src'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 11
- end
- object UseMapE: TEdit
- Left = 216
- Top = 96
- Width = 153
- Height = 21
- Hint =
- 'The USEMAP attribute can be used '#13'with the ISMAP attribute to in' +
- 'dicate '#13'that the image can be processed '#13'as either a client-side' +
- ' or server-side '#13'image map|UseMap'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 12
- end
- object Button1: TButton
- Left = 373
- Top = 95
- Width = 21
- Height = 22
- Caption = '...'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 13
- OnClick = Button1Click
- end
- object OpenDialog2: TOpenDialog
- FileEditStyle = fsEdit
- Filter = 'HTML Files (*.htm)|*.htm|All Files (*.*)|*.*'
- Options = [ofNoChangeDir]
- Left = 144
- Top = 128
- end
- end
-