home *** CD-ROM | disk | FTP | other *** search
- object FrmOptimizer: TFrmOptimizer
- Left = 218
- Top = 140
- ClientHeight = 441
- ClientWidth = 632
- Color = clBtnFace
- Constraints.MinWidth = 632
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Panel: TPanel
- Left = 0
- Top = 190
- Width = 632
- Height = 251
- Align = alBottom
- BevelOuter = bvNone
- TabOrder = 0
- DesignSize = (
- 632
- 251)
- object pcOptimization: TcxPageControl
- Left = 5
- Top = 5
- Width = 519
- Height = 221
- ActivePage = tsCompression
- Anchors = [akLeft, akTop, akRight, akBottom]
- LookAndFeel.NativeStyle = True
- TabOrder = 0
- TabPosition = tpBottom
- OnChange = pcOptimizationChange
- ClientRectBottom = 197
- ClientRectLeft = 2
- ClientRectRight = 515
- ClientRectTop = 2
- object tsCompression: TcxTabSheet
- Caption = 'Compression'
- object lblStartWith: TLabel
- Left = 275
- Top = 52
- Width = 47
- Height = 13
- Caption = 'Start with:'
- end
- object lblEndWith: TLabel
- Left = 275
- Top = 77
- Width = 44
- Height = 13
- Caption = 'End with:'
- end
- object cbxStripCR: TCheckBox
- Left = 8
- Top = 6
- Width = 257
- Height = 17
- Caption = 'Strip Carriage Returns (#10 and #13)'
- TabOrder = 0
- OnClick = cbxStripCRClick
- end
- object rbAllCR: TRadioButton
- Left = 24
- Top = 24
- Width = 233
- Height = 17
- Caption = 'All Carriage Returns'
- Checked = True
- TabOrder = 1
- TabStop = True
- end
- object rbExtraCR: TRadioButton
- Left = 24
- Top = 42
- Width = 233
- Height = 17
- Caption = 'Extra Carriage Returns (more than 1)'
- TabOrder = 2
- end
- object cbxStripTabs: TCheckBox
- Left = 8
- Top = 60
- Width = 228
- Height = 17
- Caption = 'Strip Tabs'
- TabOrder = 3
- end
- object cbxStripHTMLComments: TCheckBox
- Left = 8
- Top = 137
- Width = 240
- Height = 17
- Caption = 'Strip HTML Comments'
- Checked = True
- State = cbChecked
- TabOrder = 5
- end
- object cbxCustomRemove: TCheckBox
- Left = 275
- Top = 6
- Width = 240
- Height = 17
- Caption = 'Custom Remove'
- TabOrder = 8
- OnClick = cbxCustomRemoveClick
- end
- object cmbStartWith: TComboBox
- Left = 360
- Top = 49
- Width = 143
- Height = 21
- ItemHeight = 13
- TabOrder = 9
- end
- object cmbEndWith: TComboBox
- Left = 360
- Top = 75
- Width = 143
- Height = 21
- ItemHeight = 13
- TabOrder = 10
- end
- object cbxStripExtraSpaces: TCheckBox
- Left = 8
- Top = 80
- Width = 233
- Height = 17
- Caption = 'Strip Extra Spaces'
- Checked = True
- State = cbChecked
- TabOrder = 4
- end
- object cbxStripScriptComments: TCheckBox
- Left = 8
- Top = 158
- Width = 240
- Height = 17
- Caption = 'Strip Script Comments'
- Enabled = False
- TabOrder = 6
- end
- object cbxSkipTagCompress: TCheckBox
- Left = 275
- Top = 158
- Width = 233
- Height = 17
- Caption = 'cbxSkipTagCompress'
- Checked = True
- State = cbChecked
- TabOrder = 13
- OnClick = cbxSkipTagCompressClick
- end
- object cbxStripHTMLTags: TCheckBox
- Left = 8
- Top = 178
- Width = 241
- Height = 17
- Caption = 'cbxStripHTMLTags'
- TabOrder = 7
- end
- object cbxSkipHTMLTagsCompress: TCheckBox
- Left = 275
- Top = 116
- Width = 241
- Height = 17
- Caption = 'cbxSkipHTMLTags'
- TabOrder = 11
- end
- object cbxSkipScriptCompress: TCheckBox
- Left = 275
- Top = 137
- Width = 229
- Height = 17
- Caption = 'cbxSkipScriptCompress'
- Checked = True
- State = cbChecked
- TabOrder = 12
- OnClick = cbxSkipTagCompressClick
- end
- object cbxSkipStringsCompress: TCheckBox
- Left = 290
- Top = 178
- Width = 216
- Height = 17
- Caption = 'cbxSkipStringsCompress'
- Checked = True
- Enabled = False
- State = cbChecked
- TabOrder = 14
- end
- object cbxStripAllExtraSpaces: TCheckBox
- Left = 8
- Top = 100
- Width = 238
- Height = 17
- Caption = 'cbxStripAllExtraSpaces'
- TabOrder = 15
- OnClick = cbxStripAllExtraSpacesClick
- end
- object cbxCaseSensitive: TCheckBox
- Left = 275
- Top = 26
- Width = 226
- Height = 17
- Caption = 'cbxCaseSensitive'
- TabOrder = 16
- end
- end
- object tsBeautify: TcxTabSheet
- Caption = 'Beautify'
- ImageIndex = 1
- object lblTabs: TLabel
- Left = 24
- Top = 136
- Width = 51
- Height = 13
- Caption = '&Tab value:'
- FocusControl = edTabs
- end
- object cbxWrapScripts: TCheckBox
- Left = 292
- Top = 40
- Width = 213
- Height = 17
- Caption = 'Wrap Scripts'
- TabOrder = 12
- end
- object cbxConvertToXHTML: TCheckBox
- Left = 273
- Top = 16
- Width = 232
- Height = 17
- Caption = 'Convert HTML to XTML'
- TabOrder = 11
- OnClick = cbxConvertToXHTMLClick
- end
- object cbxUseSpaces: TCheckBox
- Left = 24
- Top = 112
- Width = 145
- Height = 17
- Caption = 'Use Spaces'
- Checked = True
- State = cbChecked
- TabOrder = 8
- OnClick = cbxUseSpacesClick
- end
- object edTabs: TEdit
- Left = 197
- Top = 132
- Width = 26
- Height = 21
- TabOrder = 9
- Text = '4'
- OnChange = edTabsChange
- OnKeyPress = FilterDigits
- end
- object udTabs: TUpDown
- Left = 223
- Top = 132
- Width = 15
- Height = 21
- Associate = edTabs
- Min = 1
- Position = 4
- TabOrder = 10
- end
- object cbxAlignWithTabs: TCheckBox
- Left = 8
- Top = 88
- Width = 201
- Height = 17
- Caption = 'Align Code with Tabs'
- TabOrder = 7
- OnClick = cbxAlignWithTabsClick
- end
- object cbxStripSpacesAfterEOL: TCheckBox
- Left = 8
- Top = 64
- Width = 233
- Height = 17
- Caption = 'Strip Spaces after EOL'
- Checked = True
- State = cbChecked
- TabOrder = 6
- end
- object cbxStripMoreSpaces: TCheckBox
- Left = 8
- Top = 40
- Width = 177
- Height = 17
- Caption = 'Strip Spaces more than:'
- Checked = True
- State = cbChecked
- TabOrder = 3
- OnClick = cbxStripMoreSpacesClick
- OnKeyPress = FilterDigits
- end
- object cbxStripMoreCR: TCheckBox
- Left = 8
- Top = 16
- Width = 177
- Height = 17
- Caption = 'Strip Carriage Returns more than:'
- Checked = True
- State = cbChecked
- TabOrder = 0
- OnClick = cbxStripMoreCRClick
- OnKeyPress = FilterDigits
- end
- object edMoreCR: TEdit
- Left = 198
- Top = 14
- Width = 24
- Height = 21
- TabOrder = 1
- Text = '1'
- OnChange = edMoreCRChange
- end
- object edMoreSpaces: TEdit
- Left = 197
- Top = 39
- Width = 26
- Height = 21
- TabOrder = 4
- Text = '1'
- OnChange = edMoreSpacesChange
- end
- object udSpaces: TUpDown
- Left = 223
- Top = 39
- Width = 15
- Height = 21
- Associate = edMoreSpaces
- Min = 1
- Max = 1000
- Position = 1
- TabOrder = 5
- end
- object udCR: TUpDown
- Left = 222
- Top = 14
- Width = 15
- Height = 21
- Associate = edMoreCR
- Min = 1
- Max = 1000
- Position = 1
- TabOrder = 2
- end
- object cbxSkipTagBeauty: TCheckBox
- Left = 292
- Top = 64
- Width = 200
- Height = 17
- Caption = 'cbxSkipTagBeauty'
- Checked = True
- State = cbChecked
- TabOrder = 13
- Visible = False
- OnClick = cbxConvertToXHTMLClick
- end
- object cbxLowerCaseTags: TCheckBox
- Left = 273
- Top = 88
- Width = 232
- Height = 17
- Caption = 'cbxLowerCaseTags'
- TabOrder = 14
- end
- object cbxLowerCaseAttributes: TCheckBox
- Left = 273
- Top = 112
- Width = 232
- Height = 17
- Caption = 'cbxLowerCaseAttributes'
- TabOrder = 15
- end
- object cbxQuotedValues: TCheckBox
- Left = 273
- Top = 136
- Width = 232
- Height = 17
- Caption = 'cbxQuotedValues'
- TabOrder = 16
- end
- end
- object tsConversion: TcxTabSheet
- Caption = 'tsConversion'
- ImageIndex = 2
- object RadioConvert: TRadioGroup
- Left = 8
- Top = 16
- Width = 234
- Height = 65
- HelpContext = 1225
- Items.Strings = (
- '1'
- '2')
- TabOrder = 0
- OnClick = RadioConvertClick
- end
- object cbunicode: TCheckBox
- Left = 8
- Top = 84
- Width = 233
- Height = 17
- HelpContext = 698
- Caption = 'cbunicode'
- TabOrder = 1
- end
- object cbxDontConvertAlphabet: TCheckBox
- Left = 8
- Top = 105
- Width = 236
- Height = 17
- Caption = 'cbxDontConvertAlphabet'
- Checked = True
- State = cbChecked
- TabOrder = 2
- end
- object cbxSkipHTMLTagsConv: TCheckBox
- Left = 272
- Top = 101
- Width = 241
- Height = 17
- Caption = 'cbxSkipHTMLTagsConv'
- TabOrder = 3
- end
- object cbxSkipScriptConv: TCheckBox
- Left = 272
- Top = 122
- Width = 229
- Height = 17
- Caption = 'cbxSkipScriptConv'
- Checked = True
- State = cbChecked
- TabOrder = 4
- OnClick = cbxSkipTagCompressClick
- end
- object cbxSkipTagConv: TCheckBox
- Left = 272
- Top = 143
- Width = 233
- Height = 17
- Caption = 'cbxSkipTagConv'
- Checked = True
- State = cbChecked
- TabOrder = 5
- OnClick = cbxSkipTagConvClick
- end
- object cbxSkipStringsConv: TCheckBox
- Left = 290
- Top = 163
- Width = 216
- Height = 17
- Caption = 'cbxSkipStringsConv'
- Checked = True
- Enabled = False
- State = cbChecked
- TabOrder = 6
- end
- end
- object tsFileConversion: TcxTabSheet
- Caption = 'tsFileConversion'
- ImageIndex = 3
- object lblAttr: TLabel
- Left = 303
- Top = 58
- Width = 92
- Height = 13
- Caption = 'Attributes to check:'
- FocusControl = lbxAttr
- end
- object lbxAttr: TListBox
- Left = 303
- Top = 72
- Width = 113
- Height = 80
- ItemHeight = 13
- Items.Strings = (
- 'href'
- 'src')
- TabOrder = 1
- OnClick = lbxAttrClick
- end
- object BtnAddAttribute: TButton
- Left = 424
- Top = 72
- Width = 67
- Height = 22
- Caption = 'Add'
- TabOrder = 2
- OnClick = BtnAddAttributeClick
- end
- object btnRemove: TButton
- Left = 424
- Top = 100
- Width = 67
- Height = 22
- Caption = 'Remove'
- TabOrder = 3
- OnClick = btnRemoveClick
- end
- object btnRestore: TButton
- Left = 424
- Top = 128
- Width = 67
- Height = 22
- Caption = 'Restore'
- TabOrder = 4
- OnClick = btnRestoreClick
- end
- object rgConversionSlash: TRadioGroup
- Left = 8
- Top = 97
- Width = 257
- Height = 82
- Items.Strings = (
- '1'
- '2'
- '3')
- TabOrder = 0
- end
- object cbxApplyToFile: TCheckBox
- Left = 303
- Top = 154
- Width = 186
- Height = 17
- Caption = 'cbxApplyToFile'
- TabOrder = 5
- end
- object RBFileNameCaseConvert: TRadioGroup
- Left = 8
- Top = 8
- Width = 257
- Height = 82
- Caption = 'RBFileNameCaseConvert'
- TabOrder = 6
- OnClick = RBFileNameCaseConvertClick
- end
- end
- end
- object Panel1: TPanel
- Left = 525
- Top = 0
- Width = 107
- Height = 231
- Align = alRight
- BevelOuter = bvNone
- TabOrder = 1
- object BtnStart: TButton
- Left = 8
- Top = 9
- Width = 92
- Height = 25
- Caption = 'Optimize'
- TabOrder = 0
- OnClick = BtnStartClick
- end
- object BtnOk: TButton
- Left = 8
- Top = 143
- Width = 92
- Height = 25
- Cancel = True
- Default = True
- TabOrder = 2
- OnClick = BtnOkClick
- end
- object BtnHelp: TButton
- Left = 8
- Top = 171
- Width = 92
- Height = 25
- TabOrder = 3
- OnClick = BtnHelpClick
- end
- object BtnStop: TButton
- Left = 8
- Top = 37
- Width = 92
- Height = 25
- TabOrder = 1
- OnClick = BtnStopClick
- end
- end
- object statusBar: TdxStatusBar
- Left = 0
- Top = 231
- Width = 632
- Height = 20
- Panels = <
- item
- PanelStyleClassName = 'TdxStatusBarTextPanelStyle'
- Width = 200
- end
- item
- PanelStyleClassName = 'TdxStatusBarContainerPanelStyle'
- PanelStyle.Container = dxStatusBar1Container1
- Width = 300
- end>
- PaintStyle = stpsUseLookAndFeel
- LookAndFeel.Kind = lfStandard
- LookAndFeel.NativeStyle = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Shell Dlg 2'
- Font.Style = []
- object dxStatusBar1Container1: TdxStatusBarContainerControl
- Left = 205
- Top = 2
- Width = 411
- Height = 18
- object PgsBar: TcxProgressBar
- Left = 0
- Top = 0
- Align = alClient
- AutoSize = False
- ParentFont = False
- Properties.BarStyle = cxbsLEDs
- Properties.ShowText = False
- Properties.ShowTextStyle = cxtsPosition
- Style.LookAndFeel.Kind = lfStandard
- Style.LookAndFeel.NativeStyle = True
- StyleDisabled.LookAndFeel.Kind = lfStandard
- StyleDisabled.LookAndFeel.NativeStyle = True
- StyleFocused.LookAndFeel.Kind = lfStandard
- StyleFocused.LookAndFeel.NativeStyle = True
- StyleHot.LookAndFeel.Kind = lfStandard
- StyleHot.LookAndFeel.NativeStyle = True
- TabOrder = 0
- Visible = False
- ExplicitWidth = 427
- Height = 18
- Width = 411
- end
- end
- end
- end
- object pcType: TcxPageControl
- Left = 0
- Top = 0
- Width = 632
- Height = 190
- ActivePage = tsDocument
- Align = alClient
- Style = 3
- TabOrder = 1
- ClientRectBottom = 190
- ClientRectRight = 632
- ClientRectTop = 23
- object tsDocument: TcxTabSheet
- Caption = 'tsDocument'
- object SynMemo: TSyntaxMemo
- Left = 5
- Top = 0
- Width = 518
- Height = 167
- ClipCopyFormats = [smTEXT, smRTF]
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Courier New'
- Font.Style = []
- GutterFont.Charset = DEFAULT_CHARSET
- GutterFont.Color = clWindowText
- GutterFont.Height = -11
- GutterFont.Name = 'MS Sans Serif'
- GutterFont.Style = []
- HyperCursor = crDefault
- IndentStep = 1
- Margin = 2
- Modified = False
- MonoPrint = True
- Options = [smoSyntaxHighlight, smoPrintWrap, smoPrintLineNos, smoPrintFilename, smoPrintDate, smoPrintPageNos, smoAutoIndent, smoTabToColumn, smoWordSelect, smoShowRMargin, smoShowGutter, smoShowWrapColumn, smoTitleAsFilename, smoProcessDroppedFiles, smoBlockOverwriteCursor, smoShowWrapGlyph, smoColumnTrack, smoUseTAB, smoSmartFill, smoOLEDragSource]
- PopupMenu = PopupMenu
- ReadOnly = False
- RightMargin = 80
- SaveFormat = sfTEXT
- ScrollBars = ssBoth
- SelLineStyle = lsCRLF
- SelStart = 0
- SelLength = 0
- SelTextColor = clWhite
- SelTextBack = clNavy
- TabDefault = 4
- TabOrder = 0
- Version = '3.00.39'
- VisiblePropEdPages = [ppOPTIONS, ppHIGHLIGHTING, ppKEYS, ppAUTOCORRECT, ppTEMPLATES]
- WrapAtColumn = 2048
- CanMoveGutter = False
- OnEnter = SynMemoEnter
- OnExit = SynMemoExit
- ActiveParser = 1
- end
- object Panel2: TPanel
- Left = 523
- Top = 0
- Width = 109
- Height = 167
- Align = alRight
- BevelOuter = bvNone
- TabOrder = 1
- object lblCurrentDoc: TLabel
- Left = 26
- Top = 106
- Width = 79
- Height = 54
- AutoSize = False
- Caption = 'Appliquer au Document courant ouvert'
- FocusControl = cbCurrentDoc
- WordWrap = True
- OnClick = lblCurrentDocClick
- end
- object btnOpen: TButton
- Left = 8
- Top = 1
- Width = 92
- Height = 25
- Caption = 'Open'
- TabOrder = 0
- OnClick = btnOpenClick
- end
- object btnSave: TButton
- Left = 8
- Top = 33
- Width = 92
- Height = 25
- Caption = 'Save'
- TabOrder = 1
- OnClick = btnSaveClick
- end
- object cbCurrentDoc: TCheckBox
- Left = 8
- Top = 104
- Width = 17
- Height = 17
- TabOrder = 2
- OnClick = cbCurrentDocClick
- end
- end
- end
- object tsOptions: TcxTabSheet
- Caption = 'tsOptions'
- ImageIndex = 1
- object GroupFiles: TGroupBox
- Left = 273
- Top = 10
- Width = 246
- Height = 148
- TabOrder = 0
- Visible = False
- object lblListeFichiers: TLabel
- Left = 8
- Top = 21
- Width = 3
- Height = 13
- end
- object ListFiles: TListBox
- Left = 8
- Top = 18
- Width = 230
- Height = 99
- HelpContext = 1191
- ItemHeight = 13
- TabOrder = 0
- end
- object BtnAdd: TButton
- Left = 15
- Top = 122
- Width = 68
- Height = 20
- HelpContext = 1070
- TabOrder = 1
- OnClick = BtnAddClick
- end
- object BtnDelete: TButton
- Left = 89
- Top = 122
- Width = 68
- Height = 20
- HelpContext = 1071
- Enabled = False
- TabOrder = 2
- OnClick = BtnDeleteClick
- end
- object BtnClear: TButton
- Left = 163
- Top = 122
- Width = 68
- Height = 20
- HelpContext = 1072
- Enabled = False
- TabOrder = 3
- OnClick = BtnClearClick
- end
- end
- object grpboxDirOptions: TGroupBox
- Left = 273
- Top = 10
- Width = 247
- Height = 148
- TabOrder = 1
- object lblFileMasks: TLabel
- Left = 8
- Top = 85
- Width = 3
- Height = 13
- end
- object lblSearchDir: TLabel
- Left = 8
- Top = 20
- Width = 3
- Height = 13
- end
- object comboFileMasks: TComboBox
- Left = 8
- Top = 99
- Width = 201
- Height = 21
- HelpContext = 911
- ItemHeight = 13
- TabOrder = 3
- Items.Strings = (
- '1'
- '2'
- '3'
- '4'
- '5'
- '6')
- end
- object chkboxSubDir: TCheckBox
- Left = 16
- Top = 59
- Width = 207
- Height = 17
- HelpContext = 912
- TabOrder = 2
- end
- object comboDir: TComboBox
- Left = 8
- Top = 35
- Width = 201
- Height = 21
- HelpContext = 910
- ItemHeight = 13
- TabOrder = 0
- end
- object btnBrowse: TBitBtn
- Left = 217
- Top = 35
- Width = 23
- Height = 21
- HelpContext = 910
- TabOrder = 1
- OnClick = btnBrowseClick
- end
- end
- object GroupBoxWhere: TGroupBox
- Left = 8
- Top = 69
- Width = 255
- Height = 89
- TabOrder = 2
- object RadioProject: TRadioButton
- Left = 8
- Top = 29
- Width = 220
- Height = 17
- HelpContext = 908
- Enabled = False
- TabOrder = 1
- OnClick = RadioFilesClick
- end
- object RadioSpecified: TRadioButton
- Left = 8
- Top = 44
- Width = 220
- Height = 17
- HelpContext = 909
- Checked = True
- TabOrder = 2
- TabStop = True
- OnClick = RadioFilesClick
- end
- object RadioFiles: TRadioButton
- Left = 8
- Top = 14
- Width = 220
- Height = 17
- HelpContext = 907
- TabOrder = 0
- OnClick = RadioFilesClick
- end
- object RadioAllOpen: TRadioButton
- Left = 8
- Top = 59
- Width = 220
- Height = 17
- TabOrder = 3
- OnClick = RadioFilesClick
- end
- end
- object gbOptions: TGroupBox
- Left = 8
- Top = 10
- Width = 255
- Height = 54
- TabOrder = 3
- object chkboxBackup: TCheckBox
- Left = 8
- Top = 14
- Width = 220
- Height = 17
- HelpContext = 1210
- TabOrder = 0
- end
- object cbApplyOpenFiles: TCheckBox
- Left = 8
- Top = 31
- Width = 220
- Height = 17
- Checked = True
- State = cbChecked
- TabOrder = 1
- end
- end
- end
- end
- object PopupMenu: TPopupMenu
- Images = frmTop.ilmenu
- Left = 548
- Top = 92
- object mnuUndo: TMenuItem
- ImageIndex = 5
- ShortCut = 16474
- OnClick = mnuUndoClick
- end
- object mnuRedo: TMenuItem
- ImageIndex = 6
- ShortCut = 24666
- OnClick = mnuRedoClick
- end
- object N1: TMenuItem
- Caption = '-'
- end
- object mnuCut: TMenuItem
- ImageIndex = 7
- ShortCut = 16472
- OnClick = mnuCutClick
- end
- object mnuCopy: TMenuItem
- ImageIndex = 8
- ShortCut = 16451
- OnClick = mnuCopyClick
- end
- object mnuPaste: TMenuItem
- ImageIndex = 9
- ShortCut = 16470
- OnClick = mnuPasteClick
- end
- object mnuDelete: TMenuItem
- ShortCut = 16430
- OnClick = mnuDeleteClick
- end
- object N2: TMenuItem
- Caption = '-'
- end
- object mnuSelectAll: TMenuItem
- ShortCut = 16449
- OnClick = mnuSelectAllClick
- end
- end
- end
-