home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip: Shareware for Win 95
/
Chip-Shareware-Win95.bin
/
komunik
/
webedit
/
data.z
/
WebEdit.exe
/
0
/
RCDATA
/
TFRMOBJECT
/
TFRMOBJECT.txt
Wrap
Text File
|
1996-10-14
|
10KB
|
465 lines
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 <IMG> 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