home *** CD-ROM | disk | FTP | other *** search
- object FrmNewDoc: TFrmNewDoc
- Left = 248
- Top = 206
- BorderStyle = bsDialog
- Caption = 'New document'
- ClientHeight = 183
- ClientWidth = 281
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'System'
- Font.Style = []
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 16
- object Image1: TImage
- Left = 8
- Top = 8
- Width = 32
- Height = 32
- AutoSize = True
- Picture.Data = {<image000.bmp>}
- end
- object Label1: TLabel
- Left = 49
- Top = 7
- Width = 99
- Height = 26
- Caption = 'Enter the title for this HTML document'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- WordWrap = True
- end
- object lblAuthor: TLabel
- Left = 8
- Top = 128
- Width = 31
- Height = 13
- Caption = '&Author'
- FocusControl = EditAuthor
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object EditTitle: TEdit
- Left = 8
- Top = 78
- Width = 265
- Height = 21
- Hint = 'enter the title here'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- Text = 'Untitled'
- end
- object btnOK: TButton
- Left = 192
- Top = 8
- Width = 81
- Height = 25
- Caption = 'OK'
- Default = True
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ModalResult = 1
- ParentFont = False
- TabOrder = 4
- end
- object btnCancel: TButton
- Left = 192
- Top = 40
- Width = 81
- Height = 25
- Caption = 'Cancel'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ModalResult = 2
- ParentFont = False
- TabOrder = 5
- end
- object cbAuthor: TCheckBox
- Left = 8
- Top = 109
- Width = 145
- Height = 17
- Caption = ' Include author information'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- State = cbChecked
- TabOrder = 1
- OnClick = cbAuthorClick
- end
- object EditAuthor: TEdit
- Left = 48
- Top = 128
- Width = 225
- Height = 21
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- end
- object cbDocType: TCheckBox
- Left = 8
- Top = 160
- Width = 265
- Height = 17
- Caption = 'include DocType HTML 3.2 tag'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- State = cbChecked
- TabOrder = 3
- end
- end
-