PageRenderTime 24ms CodeModel.GetById 14ms app.highlight 4ms RepoModel.GetById 1ms app.codeStats 1ms

/components/jcf2/Notepad/D12/JCFNotepad.dpr

http://github.com/graemeg/lazarus
Pascal | 192 lines | 163 code | 4 blank | 25 comment | 0 complexity | 8bc2ec8e0cc6b56e8b8987df2fdb6f20 MD5 | raw file
  1program JCFNotepad;
  2
  3{(*}
  4(*------------------------------------------------------------------------------
  5 Delphi Code formatter source code 
  6
  7The Original Code is JCFNotepad, released May 2003.
  8The Initial Developer of the Original Code is Anthony Steele. 
  9Portions created by Anthony Steele are Copyright (C) 1999-2008 Anthony Steele.
 10All Rights Reserved. 
 11Contributor(s): Anthony Steele. 
 12
 13The contents of this file are subject to the Mozilla Public License Version 1.1
 14(the "License"). you may not use this file except in compliance with the License.
 15You may obtain a copy of the License at http://www.mozilla.org/NPL/
 16
 17Software distributed under the License is distributed on an "AS IS" basis,
 18WITHOUT WARRANTY OF ANY KIND, either express or implied.
 19See the License for the specific language governing rights and limitations 
 20under the License.
 21
 22Alternatively, the contents of this file may be used under the terms of
 23the GNU General Public License Version 2 or later (the "GPL") 
 24See http://www.gnu.org/licenses/gpl.html
 25------------------------------------------------------------------------------*)
 26{*)}
 27
 28uses
 29  Forms,
 30  frmJcfNotepad in '..\frmJcfNotepad.pas' {fmJCFNotepad},
 31  Converter in '..\..\ReadWrite\Converter.pas',
 32  ConvertTypes in '..\..\ReadWrite\ConvertTypes.pas',
 33  BuildParseTree in '..\..\Parse\BuildParseTree.pas',
 34  BuildTokenList in '..\..\Parse\BuildTokenList.pas',
 35  ParseError in '..\..\Parse\ParseError.pas',
 36  ParseTreeNode in '..\..\Parse\ParseTreeNode.pas',
 37  ParseTreeNodeType in '..\..\Parse\ParseTreeNodeType.pas',
 38  SourceToken in '..\..\Parse\SourceToken.pas',
 39  SourceTokenList in '..\..\Parse\SourceTokenList.pas',
 40  VisitSetXY in '..\..\Process\VisitSetXY.pas',
 41  BaseVisitor in '..\..\Process\BaseVisitor.pas',
 42  JcfMiscFunctions in '..\..\Utils\JcfMiscFunctions.pas',
 43  JcfLog in '..\..\Utils\JcfLog.pas',
 44  fShowParseTree in '..\..\Parse\UI\fShowParseTree.pas' {frmShowParseTree},
 45  SetUses in '..\..\Settings\SetUses.pas',
 46  JCFSetBase in '..\..\Settings\JCFSetBase.pas',
 47  JCFSettings in '..\..\Settings\JCFSettings.pas',
 48  SetAlign in '..\..\Settings\SetAlign.pas',
 49  SetCaps in '..\..\Settings\SetCaps.pas',
 50  SetClarify in '..\..\Settings\SetClarify.pas',
 51  SetFile in '..\..\Settings\SetFile.pas',
 52  SetIndent in '..\..\Settings\SetIndent.pas',
 53  SetObfuscate in '..\..\Settings\SetObfuscate.pas',
 54  SetReplace in '..\..\Settings\SetReplace.pas',
 55  SetReturns in '..\..\Settings\SetReturns.pas',
 56  SetSpaces in '..\..\Settings\SetSpaces.pas',
 57  SettingsStream in '..\..\Settings\Streams\SettingsStream.pas',
 58  RegistrySettings in '..\..\Settings\Streams\RegistrySettings.pas',
 59  RemoveUnneededWhiteSpace in '..\..\Process\Obfuscate\RemoveUnneededWhiteSpace.pas',
 60  FixCase in '..\..\Process\Obfuscate\FixCase.pas',
 61  RebreakLines in '..\..\Process\Obfuscate\RebreakLines.pas',
 62  ReduceWhiteSpace in '..\..\Process\Obfuscate\ReduceWhiteSpace.pas',
 63  RemoveComment in '..\..\Process\Obfuscate\RemoveComment.pas',
 64  RemoveConsecutiveWhiteSpace in '..\..\Process\Obfuscate\RemoveConsecutiveWhiteSpace.pas',
 65  RemoveReturn in '..\..\Process\Obfuscate\RemoveReturn.pas',
 66  WarnRealType in '..\..\Process\Warnings\WarnRealType.pas',
 67  WarnAssignToFunctionName in '..\..\Process\Warnings\WarnAssignToFunctionName.pas',
 68  WarnCaseNoElse in '..\..\Process\Warnings\WarnCaseNoElse.pas',
 69  WarnDestroy in '..\..\Process\Warnings\WarnDestroy.pas',
 70  WarnEmptyBlock in '..\..\Process\Warnings\WarnEmptyBlock.pas',
 71  Warning in '..\..\Process\Warnings\Warning.pas',
 72  JcfVersionConsts in '..\..\JcfVersionConsts.pas',
 73  JcfRegistrySettings in '..\..\Settings\JcfRegistrySettings.pas',
 74  TokenUtils in '..\..\Parse\TokenUtils.pas',
 75  NoSpaceBefore in '..\..\Process\Spacing\NoSpaceBefore.pas',
 76  NoSpaceAfter in '..\..\Process\Spacing\NoSpaceAfter.pas',
 77  SingleSpaceAfter in '..\..\Process\Spacing\SingleSpaceAfter.pas',
 78  SingleSpaceBefore in '..\..\Process\Spacing\SingleSpaceBefore.pas',
 79  ReturnAfter in '..\..\Process\Returns\ReturnAfter.pas',
 80  Nesting in '..\..\Process\Nesting.pas',
 81  VisitSetNesting in '..\..\Process\VisitSetNesting.pas',
 82  ReturnBefore in '..\..\Process\Returns\ReturnBefore.pas',
 83  NoReturnAfter in '..\..\Process\Returns\NoReturnAfter.pas',
 84  NoReturnBefore in '..\..\Process\Returns\NoReturnBefore.pas',
 85  AllProcesses in '..\..\Process\AllProcesses.pas',
 86  RemoveBlankLine in '..\..\Process\Obfuscate\RemoveBlankLine.pas',
 87  BlockStyles in '..\..\Process\Returns\BlockStyles.pas',
 88  SwitchableVisitor in '..\..\Process\SwitchableVisitor.pas',
 89  FormatFlags in '..\..\Process\FormatFlags.pas',
 90  TabToSpace in '..\..\Process\Spacing\TabToSpace.pas',
 91  SpaceToTab in '..\..\Process\Spacing\SpaceToTab.pas',
 92  SpecificWordCaps in '..\..\Process\Capitalisation\SpecificWordCaps.pas',
 93  Capitalisation in '..\..\Process\Capitalisation\Capitalisation.pas',
 94  Indenter in '..\..\Process\Indent\Indenter.pas',
 95  PropertyOnOneLine in '..\..\Process\Returns\PropertyOnOneLine.pas',
 96  SpaceBeforeColon in '..\..\Process\Spacing\SpaceBeforeColon.pas',
 97  VisitStripEmptySpace in '..\..\Process\VisitStripEmptySpace.pas',
 98  RemoveBlankLinesAfterProcHeader in '..\..\Process\Returns\RemoveBlankLinesAfterProcHeader.pas',
 99  RemoveBlankLinesInVars in '..\..\Process\Returns\RemoveBlankLinesInVars.pas',
100  ReturnChars in '..\..\Process\Returns\ReturnChars.pas',
101  RemoveReturnsBeforeEnd in '..\..\Process\Returns\RemoveReturnsBeforeEnd.pas',
102  RemoveReturnsAfterBegin in '..\..\Process\Returns\RemoveReturnsAfterBegin.pas',
103  LongLineBreaker in '..\..\Process\Returns\LongLineBreaker.pas',
104  IntList in '..\..\Utils\IntList.pas',
105  BasicStats in '..\..\Process\Info\BasicStats.pas',
106  AlignConst in '..\..\Process\Align\AlignConst.pas',
107  AlignBase in '..\..\Process\Align\AlignBase.pas',
108  AlignAssign in '..\..\Process\Align\AlignAssign.pas',
109  AlignVars in '..\..\Process\Align\AlignVars.pas',
110  AlignTypedef in '..\..\Process\Align\AlignTypedef.pas',
111  AlignComment in '..\..\Process\Align\AlignComment.pas',
112  JCFDropTarget in '..\..\Utils\DragDrop\JCFDropTarget.pas',
113  frDrop in '..\..\Utils\DragDrop\frDrop.pas' {FrameDrop: TFrame},
114  JCFHelp in '..\..\Utils\JCFHelp.pas',
115  fAbout in '..\..\Ui\fAbout.pas' {frmAboutBox},
116  frmBaseSettingsFrame in '..\..\Ui\Settings\frmBaseSettingsFrame.pas' {frSettingsFrame: TFrame},
117  fAllSettings in '..\..\Ui\fAllSettings.pas' {FormAllSettings},
118  frFiles in '..\..\Ui\Settings\frFiles.pas' {fFiles: TFrame},
119  frObfuscateSettings in '..\..\Ui\Settings\frObfuscateSettings.pas' {fObfuscateSettings: TFrame},
120  frUses in '..\..\Ui\Settings\frUses.pas' {fUses: TFrame},
121  frNotIdentifierCapsSettings in '..\..\Ui\Settings\frNotIdentifierCapsSettings.pas' {fNotIdentifierCapsSettings: TFrame},
122  frBasicSettings in '..\..\Ui\Settings\frBasicSettings.pas' {frBasic: TFrame},
123  frClarify in '..\..\Ui\Settings\frClarify.pas' {fClarify: TFrame},
124  frClarifyAlign in '..\..\Ui\Settings\frClarifyAlign.pas' {fClarifyAlign: TFrame},
125  frClarifyCaseBlocks in '..\..\Ui\Settings\frClarifyCaseBlocks.pas' {fClarifyCaseBlocks: TFrame},
126  frClarifyIndent in '..\..\Ui\Settings\frClarifyIndent.pas' {fClarifyIndent: TFrame},
127  frClarifyReturns in '..\..\Ui\Settings\frClarifyReturns.pas' {fClarifyReturns: TFrame},
128  frClarifySpaces in '..\..\Ui\Settings\frClarifySpaces.pas' {fClarifySpaces: TFrame},
129  frReplace in '..\..\Ui\Settings\frReplace.pas' {fReplace: TFrame},
130  frReservedCapsSettings in '..\..\Ui\Settings\frReservedCapsSettings.pas' {frReservedCapsSettings: TFrame},
131  frClarifyLongLineBreaker in '..\..\Ui\Settings\frClarifyLongLineBreaker.pas' {fClarifyLongLineBreaker: TFrame},
132  fRegistrySettings in '..\..\Ui\fRegistrySettings.pas' {fmRegistrySettings},
133  Tokens in '..\..\Parse\Tokens.pas',
134  SettingsTypes in '..\..\Settings\SettingsTypes.pas',
135  SetWordList in '..\..\Settings\SetWordList.pas',
136  UnitNameCaps in '..\..\Process\Capitalisation\UnitNameCaps.pas',
137  PreProcessorExpressionTokens in '..\..\Parse\PreProcessor\PreProcessorExpressionTokens.pas',
138  PreProcessorExpressionParser in '..\..\Parse\PreProcessor\PreProcessorExpressionParser.pas',
139  PreProcessorExpressionTokenise in '..\..\Parse\PreProcessor\PreProcessorExpressionTokenise.pas',
140  frPreProcessor in '..\..\Ui\Settings\frPreProcessor.pas' {fPreProcessor: TFrame},
141  SetPreProcessor in '..\..\Settings\SetPreProcessor.pas',
142  RemoveSpaceAtLineEnd in '..\..\Process\Spacing\RemoveSpaceAtLineEnd.pas',
143  frUnitCaps in '..\..\Ui\Settings\frUnitCaps.pas' {frUnitNameCaps: TFrame},
144  FindReplace in '..\..\Process\Transform\FindReplace.pas',
145  fJcfErrorDisplay in '..\..\Ui\fJcfErrorDisplay.pas' {ExceptionDialog},
146  ReturnsAfterFinalEnd in '..\..\Process\Returns\ReturnsAfterFinalEnd.pas',
147  UsesClauseInsert in '..\..\Process\Transform\UsesClauseInsert.pas',
148  UsesClauseRemove in '..\..\Process\Transform\UsesClauseRemove.pas',
149  UsesClauseFindReplace in '..\..\Process\Transform\UsesClauseFindReplace.pas',
150  PreProcessorParseTree in '..\..\Parse\PreProcessor\PreProcessorParseTree.pas',
151  RemoveEmptyComment in '..\..\Process\RemoveEmptyComment.pas',
152  SetComments in '..\..\Settings\SetComments.pas',
153  frWarnings in '..\..\Ui\Settings\frWarnings.pas' {fWarnings: TFrame},
154  RemoveConsecutiveReturns in '..\..\Process\Returns\RemoveConsecutiveReturns.pas',
155  frBlankLines in '..\..\Ui\Settings\frBlankLines.pas' {fBlankLines: TFrame},
156  MaxSpaces in '..\..\Process\Spacing\MaxSpaces.pas',
157  TreeWalker in '..\..\Process\TreeWalker.pas',
158  AddBlockEndSemicolon in '..\..\Process\Transform\AddBlockEndSemicolon.pas',
159  AddBeginEnd in '..\..\Process\Transform\AddBeginEnd.pas',
160  SetTransform in '..\..\Settings\SetTransform.pas',
161  frTransform in '..\..\Ui\Settings\frTransform.pas' {fTransform: TFrame},
162  AlignField in '..\..\Process\Align\AlignField.pas',
163  frClarifyBlocks in '..\..\Ui\Settings\frClarifyBlocks.pas' {fClarifyBlocks: TFrame},
164  SortUses in '..\..\Process\Transform\SortUses.pas',
165  SortUsesData in '..\..\Process\Transform\SortUsesData.pas',
166  frCompilerDirectReturns in '..\..\Ui\Settings\frCompilerDirectReturns.pas' {fCompilerDirectReturns: TFrame},
167  WarnUnusedParam in '..\..\Process\Warnings\WarnUnusedParam.pas',
168  IdentifierCaps in '..\..\Process\Capitalisation\IdentifierCaps.pas',
169  frIdentifierCapsSettings in '..\..\Ui\Settings\frIdentifierCapsSettings.pas' {fIdentifierCapsSettings: TFrame},
170  frAnyCapsSettings in '..\..\Ui\Settings\frAnyCapsSettings.pas',
171  frComments in '..\..\Ui\Settings\frComments.pas' {fComments: TFrame},
172  JcfFontSetFunctions in '..\..\Utils\JcfFontSetFunctions.pas',
173  SetAsm in '..\..\Settings\SetAsm.pas',
174  frAsm in '..\..\Ui\Settings\frAsm.pas' {fAsm: TFrame},
175  RemoveReturnsAfter in '..\..\Process\Returns\RemoveReturnsAfter.pas',
176  IndentAsmParam in '..\..\Process\Indent\IndentAsmParam.pas',
177  AsmKeywords in '..\..\Parse\AsmKeywords.pas',
178  JcfUnicode in '..\..\Utils\JcfUnicode.pas',
179  JcfUnicodeFiles in '..\..\Utils\JcfUnicodeFiles.pas',
180  JcfStringUtils in '..\..\Utils\JcfStringUtils.pas',
181  MoveSpaceToBeforeColon in '..\..\Process\Spacing\MoveSpaceToBeforeColon.pas',
182  JcfSystemUtils in '..\..\Utils\JcfSystemUtils.pas';
183
184{$R *.res}
185
186begin
187  Application.Initialize;
188  Application.Title := 'JCF Notepad';
189  Application.HelpFile := 'CodeFormat.chm';
190  Application.CreateForm(TfmJCFNotepad, fmJCFNotepad);
191  Application.Run;
192end.