1program JCFGui; 2 3{(*} 4(*------------------------------------------------------------------------------ 5 Delphi Code formatter source code 6 7The Original Code is JCFGui, 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 fMain in '..\fMain.pas' {frmMain}, 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 FileConverter in '..\..\ReadWrite\FileConverter.pas', 133 fRegistrySettings in '..\..\Ui\fRegistrySettings.pas' {fmRegistrySettings}, 134 Tokens in '..\..\Parse\Tokens.pas', 135 SettingsTypes in '..\..\Settings\SettingsTypes.pas', 136 SetWordList in '..\..\Settings\SetWordList.pas', 137 frUnitCaps in '..\..\Ui\Settings\frUnitCaps.pas' {frUnitNameCaps: TFrame}, 138 frPreProcessor in '..\..\Ui\Settings\frPreProcessor.pas' {fPreProcessor: TFrame}, 139 PreProcessorExpressionTokens in '..\..\Parse\PreProcessor\PreProcessorExpressionTokens.pas', 140 PreProcessorExpressionParser in '..\..\Parse\PreProcessor\PreProcessorExpressionParser.pas', 141 PreProcessorExpressionTokenise in '..\..\Parse\PreProcessor\PreProcessorExpressionTokenise.pas', 142 SetPreprocessor in '..\..\Settings\SetPreprocessor.pas', 143 UnitNameCaps in '..\..\Process\Capitalisation\UnitNameCaps.pas', 144 RemoveSpaceAtLineEnd in '..\..\Process\Spacing\RemoveSpaceAtLineEnd.pas', 145 FindReplace in '..\..\Process\Transform\FindReplace.pas', 146 fJcfErrorDisplay in '..\..\Ui\fJcfErrorDisplay.pas' {ExceptionDialog}, 147 ReturnsAfterFinalEnd in '..\..\Process\Returns\ReturnsAfterFinalEnd.pas', 148 PreProcessorParseTree in '..\..\Parse\PreProcessor\PreProcessorParseTree.pas', 149 RemoveEmptyComment in '..\..\Process\RemoveEmptyComment.pas', 150 frWarnings in '..\..\Ui\Settings\frWarnings.pas' {fWarnings}, 151 SetComments in '..\..\Settings\SetComments.pas', 152 frBlankLines in '..\..\Ui\Settings\frBlankLines.pas' {fBlankLines}, 153 RemoveConsecutiveReturns in '..\..\Process\Returns\RemoveConsecutiveReturns.pas', 154 UsesClauseInsert in '..\..\Process\Transform\UsesClauseInsert.pas', 155 UsesClauseRemove in '..\..\Process\Transform\UsesClauseRemove.pas', 156 UsesClauseFindReplace in '..\..\Process\Transform\UsesClauseFindReplace.pas', 157 MaxSpaces in '..\..\Process\Spacing\MaxSpaces.pas', 158 TreeWalker in '..\..\Process\TreeWalker.pas', 159 AddBlockEndSemicolon in '..\..\Process\Transform\AddBlockEndSemicolon.pas', 160 AddBeginEnd in '..\..\Process\Transform\AddBeginEnd.pas', 161 SetTransform in '..\..\Settings\SetTransform.pas', 162 frTransform in '..\..\Ui\Settings\frTransform.pas' {fTransform: TFrame}, 163 AlignField in '..\..\Process\Align\AlignField.pas', 164 SortUses in '..\..\Process\Transform\SortUses.pas', 165 frClarifyBlocks in '..\..\Ui\Settings\frClarifyBlocks.pas' {fClarifyBlocks: TFrame}, 166 SortUsesData in '..\..\Process\Transform\SortUsesData.pas', 167 frCompilerDirectReturns in '..\..\Ui\Settings\frCompilerDirectReturns.pas' {fCompilerDirectReturns: TFrame}, 168 IdentifierCaps in '..\..\Process\Capitalisation\IdentifierCaps.pas', 169 WarnUnusedParam in '..\..\Process\Warnings\WarnUnusedParam.pas', 170 frAnyCapsSettings in '..\..\Ui\Settings\frAnyCapsSettings.pas', 171 frIdentifierCapsSettings in '..\..\Ui\Settings\frIdentifierCapsSettings.pas' {fIdentifierCapsSettings: TFrame}, 172 frComments in '..\..\Ui\Settings\frComments.pas' {fComments: TFrame}, 173 JcfFontSetFunctions in '..\..\Utils\JcfFontSetFunctions.pas', 174 SetAsm in '..\..\Settings\SetAsm.pas', 175 frAsm in '..\..\Ui\Settings\frAsm.pas' {fAsm: TFrame}, 176 RemoveReturnsAfter in '..\..\Process\Returns\RemoveReturnsAfter.pas', 177 IndentAsmParam in '..\..\Process\Indent\IndentAsmParam.pas', 178 AsmKeywords in '..\..\Parse\AsmKeywords.pas', 179 JcfUnicode in '..\..\Utils\JcfUnicode.pas', 180 JcfUnicodeFiles in '..\..\Utils\JcfUnicodeFiles.pas', 181 JcfStringUtils in '..\..\Utils\JcfStringUtils.pas', 182 MoveSpaceToBeforeColon in '..\..\Process\Spacing\MoveSpaceToBeforeColon.pas', 183 JcfSystemUtils in '..\..\Utils\JcfSystemUtils.pas'; 184 185{$R *.res} 186 187begin 188 Application.Initialize; 189 Application.Title := 'JEDI Code Format'; 190 Application.HelpFile := 'CodeFormat.chm'; 191 Application.CreateForm(TfrmMain, frmMain); 192 Application.Run; 193end. 194