home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip: Shareware for Win 95
/
Chip-Shareware-Win95.bin
/
komunik
/
webedit
/
data.z
/
WebEdit.exe
/
0
/
RCDATA
/
TFRMIMAGE
/
TFRMIMAGE.txt
Wrap
Text File
|
1996-10-14
|
19KB
|
777 lines
object frmImage: TfrmImage
Left = 335
Top = 183
HelpContext = 107
ActiveControl = cmbURL
BorderStyle = bsDialog
Caption = 'Image'
ClientHeight = 412
ClientWidth = 479
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
KeyPreview = True
Position = poScreenCenter
ShowHint = True
OnActivate = FormActivate
OnCreate = FormCreate
OnDeactivate = FormDeactivate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Bevel1: TBevel
Left = 4
Top = 4
Width = 469
Height = 213
Shape = bsFrame
IsControl = True
end
object lblAltText: TLabel
Left = 11
Top = 134
Width = 32
Height = 13
Caption = '&Alt text'
FocusControl = txtAltText
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object lblSrc: TLabel
Left = 11
Top = 20
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 lblAlignment: TLabel
Left = 11
Top = 160
Width = 46
Height = 13
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 = 11
Top = 188
Width = 28
Height = 13
Caption = '&Width'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
WordWrap = True
end
object lblHeight: TLabel
Left = 146
Top = 188
Width = 31
Height = 13
Alignment = taRightJustify
Caption = '&Height'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
WordWrap = True
end
object lblBorder: TLabel
Left = 256
Top = 188
Width = 31
Height = 13
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 = 248
Top = 160
Width = 39
Height = 13
Alignment = taRightJustify
Caption = 'HSpa&ce'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
WordWrap = True
end
object lblVSpace: TLabel
Left = 363
Top = 160
Width = 38
Height = 13
Alignment = taRightJustify
Caption = '&VSpace'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
WordWrap = True
end
object lblClear: TLabel
Left = 153
Top = 160
Width = 24
Height = 13
Alignment = taRightJustify
Caption = 'Cl&ear'
FocusControl = cmbClear
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
WordWrap = True
end
object lblMessage: TLabel
Left = 406
Top = 130
Width = 46
Height = 26
Caption = '&Message Digest'
FocusControl = txtMD
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Visible = False
WordWrap = True
end
object lblUnits: TLabel
Left = 377
Top = 188
Width = 24
Height = 13
Alignment = taRightJustify
Caption = '&Units'
FocusControl = cmbUnits
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
WordWrap = True
end
object lblLowSrc: TLabel
Left = 11
Top = 76
Width = 36
Height = 13
Caption = '&LowSrc'
FocusControl = cmbLowSrc
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object lblLinkTo: TLabel
Left = 11
Top = 48
Width = 36
Height = 13
Caption = 'Lin&k To'
FocusControl = cmbLinkTo
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object lblXAltSrc: TLabel
Left = 11
Top = 104
Width = 38
Height = 13
Caption = '&X-AltSrc'
FocusControl = cmbXAltSrc
end
object bbtnImage: TBitBtn
Left = 227
Top = 383
Width = 77
Height = 25
Hint = 'Insert standard <IMG> tag'
Caption = 'OK'
Default = True
ModalResult = 1
TabOrder = 19
NumGlyphs = 2
Spacing = -1
IsControl = True
end
object CancelBtn: TBitBtn
Left = 311
Top = 383
Width = 77
Height = 25
Cancel = True
Caption = 'Cancel'
ModalResult = 2
TabOrder = 20
NumGlyphs = 2
Spacing = -1
IsControl = True
end
object HelpBtn: TBitBtn
Left = 395
Top = 383
Width = 77
Height = 25
Caption = 'Help'
TabOrder = 21
OnClick = HelpBtnClick
NumGlyphs = 2
Spacing = -1
IsControl = True
end
object txtAltText: TEdit
Left = 68
Top = 128
Width = 313
Height = 21
Hint = 'Alternate text for non-graphical browsers'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 8
end
object cmbURL: TComboBox
Left = 68
Top = 16
Width = 313
Height = 21
Hint = 'URL of image/figure; usually a .JPG or .GIF file'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
ParentFont = False
Sorted = True
TabOrder = 0
OnChange = cmbURLChange
end
object cmbAlign: TComboBox
Left = 68
Top = 156
Width = 61
Height = 21
Hint = 'Alignment of image/figure'
Style = csDropDownList
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
Items.Strings = (
'default'
'absbottom'
'absmiddle'
'baseline'
'bleedleft'
'bleedright'
'bottom'
'left'
'middle'
'right'
'text'
'top')
ParentFont = False
TabOrder = 9
end
object txtBorder: TMaskEdit
Left = 291
Top = 185
Width = 61
Height = 21
Hint = 'Border thickness in units'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
MaxLength = 0
ParentFont = False
TabOrder = 15
OnKeyPress = NumericKeyPress
end
object bbtnURL: TBitBtn
Left = 388
Top = 12
Width = 77
Height = 27
Hint = 'Open the URL Builder'
Caption = 'URL'
TabOrder = 1
OnClick = bbtnURLClick
Glyph.Data = {
42010000424D4201000000000000760000002800000012000000110000000100
040000000000CC00000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777070000007777777777777770000000000000000000007700070000000FFF
FFFFFFF07000770000000FFFFFFF00008007770000000FFFFFF0877808777700
00000FFFFF0877E88077770000000FFFFF0777787077770000000FFFFF07E778
7077770000000FFFFF08EE788077770000000FFFFFF087780777770000000FFF
FFFF00007777770000000FFFFFFFFFF07777770000000FFFFFFF000077777700
00000FFFFFFF07077777770000000FFFFFFF0077777777000000000000000777
777777000000}
end
object cmbClear: TComboBox
Left = 180
Top = 156
Width = 61
Height = 21
Hint = 'Forces the image to display below other images'
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 = 10
end
object txtMD: TEdit
Left = 416
Top = 134
Width = 41
Height = 21
Hint =
'Checksum for the associated graphic specified by the SRC attribu' +
'te'
TabStop = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 22
Visible = False
end
object cmbUnits: TComboBox
Left = 403
Top = 185
Width = 61
Height = 21
Hint = 'Units of measure for width, etc.'
Style = csDropDownList
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
Items.Strings = (
'default'
'en'
'pixels')
ParentFont = False
TabOrder = 16
end
object cmbLowSrc: TComboBox
Left = 68
Top = 72
Width = 313
Height = 21
Hint = 'NetScape-only quick-load small .GIF for image tags'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
ParentFont = False
Sorted = True
TabOrder = 4
end
object bbtnLowURL: TBitBtn
Left = 388
Top = 68
Width = 77
Height = 27
Hint = 'Open the URL Builder'
Caption = 'URL'
TabOrder = 5
OnClick = bbtnLowURLClick
Glyph.Data = {
42010000424D4201000000000000760000002800000012000000110000000100
040000000000CC00000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777070000007777777777777770000000000000000000007700070000000FFF
FFFFFFF07000770000000FFFFFFF00008007770000000FFFFFF0877808777700
00000FFFFF0877E88077770000000FFFFF0777787077770000000FFFFF07E778
7077770000000FFFFF08EE788077770000000FFFFFF087780777770000000FFF
FFFF00007777770000000FFFFFFFFFF07777770000000FFFFFFF000077777700
00000FFFFFFF07077777770000000FFFFFFF0077777777000000000000000777
777777000000}
end
object cmbLinkTo: TComboBox
Left = 68
Top = 44
Width = 313
Height = 21
Hint =
'Fill out this URL if you also want the image to be a link to ano' +
'ther resource'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
ParentFont = False
Sorted = True
TabOrder = 2
end
object bbtnLinkToURL: TBitBtn
Left = 388
Top = 40
Width = 77
Height = 27
Hint = 'Open the URL Builder'
Caption = 'URL'
TabOrder = 3
OnClick = bbtnLinkToURLClick
Glyph.Data = {
42010000424D4201000000000000760000002800000012000000110000000100
040000000000CC00000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777070000007777777777777770000000000000000000007700070000000FFF
FFFFFFF07000770000000FFFFFFF00008007770000000FFFFFF0877808777700
00000FFFFF0877E88077770000000FFFFF0777787077770000000FFFFF07E778
7077770000000FFFFF08EE788077770000000FFFFFF087780777770000000FFF
FFFF00007777770000000FFFFFFFFFF07777770000000FFFFFFF000077777700
00000FFFFFFF07077777770000000FFFFFFF0077777777000000000000000777
777777000000}
end
object gbAVI: TGroupBox
Left = 5
Top = 272
Width = 469
Height = 105
Caption = 'AVI Video'
TabOrder = 18
object lblDynSrc: TLabel
Left = 8
Top = 20
Width = 35
Height = 13
Caption = 'DynSrc'
FocusControl = cmbAVI
end
object lblStart: TLabel
Left = 8
Top = 49
Width = 22
Height = 13
Caption = 'Start'
FocusControl = cmbStart
end
object lblLoop: TLabel
Left = 8
Top = 78
Width = 24
Height = 13
Caption = 'Loop'
FocusControl = txtLoop
end
object lblLoopDelay: TLabel
Left = 269
Top = 77
Width = 62
Height = 13
Alignment = taRightJustify
Caption = 'Loop Delay'
end
object cmbAVI: TComboBox
Left = 64
Top = 16
Width = 313
Height = 21
Hint = 'URL of AVI video'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
ParentFont = False
Sorted = True
TabOrder = 0
end
object cmbStart: TComboBox
Left = 64
Top = 45
Width = 145
Height = 21
Hint = 'On what event does the video start?'
ItemHeight = 13
Items.Strings = (
'FileOpen'
'MouseOver'
'FileOpen,MouseOver')
TabOrder = 2
end
object chkControls: TCheckBox
Left = 277
Top = 46
Width = 97
Height = 17
Hint = 'Show a control panel for the AVI?'
Alignment = taLeftJustify
Caption = 'Show Controls'
TabOrder = 3
end
object txtLoop: TEdit
Left = 64
Top = 74
Width = 58
Height = 21
Hint = 'Number of times the video repeats'
TabOrder = 4
Text = '0'
end
object chkInfinite: TCheckBox
Left = 152
Top = 76
Width = 89
Height = 17
Hint = 'Should the video repeat forever?'
Caption = 'Infinite Loop'
TabOrder = 5
OnClick = chkInfiniteClick
end
object txtDelay: TEdit
Left = 336
Top = 74
Width = 28
Height = 21
Hint = 'Delay in milliseconds before replaying AVI'
TabOrder = 6
Text = '0'
end
object bbtnAVIURL: TBitBtn
Left = 384
Top = 12
Width = 77
Height = 27
Hint = 'Open the URL Builder'
Caption = 'URL'
TabOrder = 1
OnClick = bbtnAVIURLClick
Glyph.Data = {
42010000424D4201000000000000760000002800000012000000110000000100
040000000000CC00000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777070000007777777777777770000000000000000000007700070000000FFF
FFFFFFF07000770000000FFFFFFF00008007770000000FFFFFF0877808777700
00000FFFFF0877E88077770000000FFFFF0777787077770000000FFFFF07E778
7077770000000FFFFF08EE788077770000000FFFFFF087780777770000000FFF
FFFF00007777770000000FFFFFFFFFF07777770000000FFFFFFF000077777700
00000FFFFFFF07077777770000000FFFFFFF0077777777000000000000000777
777777000000}
end
object udLoopDelay: TUpDown
Left = 364
Top = 74
Width = 11
Height = 21
Associate = txtDelay
Min = 0
Max = 10000
Position = 0
TabOrder = 7
Wrap = False
end
object udLoop: TUpDown
Left = 122
Top = 74
Width = 11
Height = 21
Associate = txtLoop
Min = 0
Max = 10000
Position = 0
TabOrder = 8
Wrap = False
end
end
object gbMapping: TGroupBox
Left = 5
Top = 219
Width = 469
Height = 51
Caption = 'Client Side Mapping'
TabOrder = 17
object lblMapLocation: TLabel
Left = 144
Top = 21
Width = 68
Height = 13
Alignment = taRightJustify
Caption = 'Map Location:'
Enabled = False
FocusControl = txtMapLocation
end
object memMap: TRichEdit
Left = 264
Top = 20
Width = 49
Height = 17
TabOrder = 3
Visible = False
WordWrap = False
end
object chkUseMap: TCheckBox
Left = 10
Top = 19
Width = 87
Height = 17
Hint = 'Identify this image as a client side mapped image'
Caption = 'Use Mapping'
TabOrder = 0
OnClick = chkUseMapClick
end
object bbtnMap: TBitBtn
Left = 360
Top = 14
Width = 100
Height = 27
Hint = 'Set areas of an image as hotspots'
Caption = 'Map &Picture'
Enabled = False
TabOrder = 2
OnClick = bbtnMapClick
end
object txtMapLocation: TEdit
Left = 216
Top = 18
Width = 137
Height = 21
Hint = 'Location of the map file in the format: path-and-file#map-name'
Enabled = False
TabOrder = 1
end
end
object cmbXAltSrc: TComboBox
Left = 68
Top = 100
Width = 313
Height = 21
Hint = 'An image adhering to the ART standard'
ItemHeight = 13
TabOrder = 6
end
object bbtnXAltSrc: TBitBtn
Left = 388
Top = 96
Width = 77
Height = 27
Hint = 'Open the URL Builder'
Caption = 'URL'
TabOrder = 7
OnClick = bbtnXAltSrcClick
Glyph.Data = {
42010000424D4201000000000000760000002800000012000000110000000100
040000000000CC00000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777070000007777777777777770000000000000000000007700070000000FFF
FFFFFFF07000770000000FFFFFFF00008007770000000FFFFFF0877808777700
00000FFFFF0877E88077770000000FFFFF0777787077770000000FFFFF07E778
7077770000000FFFFF08EE788077770000000FFFFFF087780777770000000FFF
FFFF00007777770000000FFFFFFFFFF07777770000000FFFFFFF000077777700
00000FFFFFFF07077777770000000FFFFFFF0077777777000000000000000777
777777000000}
end
object txtWidth: TEdit
Left = 68
Top = 184
Width = 61
Height = 21
Hint = 'Width of image/figure in units'
TabOrder = 13
end
object txtHeight: TEdit
Left = 180
Top = 184
Width = 61
Height = 21
Hint = 'Height of image/figure in units'
TabOrder = 14
end
object txtHSpace: TEdit
Left = 291
Top = 156
Width = 61
Height = 21
Hint = 'Extra horizontal space'
TabOrder = 11
end
object txtVSpace: TEdit
Left = 403
Top = 156
Width = 61
Height = 21
Hint = 'Extra vertical space'
TabOrder = 12
end
object imgHeightWidth: TPMultiImage
Left = 56
Top = 384
Width = 25
Height = 25
Color = clBtnFace
ImageName = 'file not found'
ImageDither = True
ImageReadRes = lAutoMatic
ImageWriteRes = sAutoMatic
TifSaveCompress = sNONE
JPegSaveQuality = 25
JPegSaveSmooth = 0
TextLeft = 0
TextTop = 0
TextRotate = 0
TabOrder = 23
TabStop = False
Visible = False
end
end