├── .gitignore ├── Components ├── BlobManager.pas ├── Cache.pas ├── CalcUtils.pas ├── Calculator.pas ├── Cipher.pas ├── Connector.pas ├── ConsoleUtils.pas ├── Decomposer.pas ├── DirectDraw.pas ├── DirectX.inc ├── Directives.inc ├── EventUtils.pas ├── ExactTimer.pas ├── FastList.pas ├── FileTime.pas ├── FileUtils.pas ├── FlagCache.pas ├── FlexibleList.pas ├── GDIPAPI.pas ├── GDIPOBJ.pas ├── GDIPUTIL.pas ├── Graph.pas ├── GraphicTypes.pas ├── GraphicUtils.pas ├── Integer.inc ├── IpIfConst.pas ├── IpInformation.pas ├── ItemCache.pas ├── Jedi.inc ├── License.pas ├── Log.pas ├── MemoryUtils.pas ├── NetUtils.pas ├── Notifier.pas ├── NumberConsts.pas ├── NumberUtils.pas ├── Numeration.pas ├── ParameterUtils.pas ├── ParseCache.pas ├── ParseCommon.pas ├── ParseConsts.pas ├── ParseErrors.pas ├── ParseField.pas ├── ParseManager.pas ├── ParseMessages.pas ├── ParseMethod.pas ├── ParseTypes.pas ├── ParseUtils.pas ├── ParseValidator.pas ├── ParseValueList.pas ├── Parser.pas ├── ProcessInformation.pas ├── SearchUtils.pas ├── SyncThread.pas ├── SystemConsts.pas ├── SystemInformation.pas ├── SystemTypes.pas ├── TextBuilder.pas ├── TextConsts.pas ├── TextList.pas ├── TextTypes.pas ├── TextUtils.pas ├── Thread.pas ├── ThreadUtils.pas ├── Transformer.pas ├── ValueConsts.pas ├── ValueErrors.pas ├── ValueTypes.pas ├── ValueUtils.pas ├── VariableUtils.pas ├── ZUtils.pas └── superobject.pas ├── LICENSE.md ├── README.md ├── Samples ├── Delphi 10 Seattle │ ├── Building graph in rectangular and polar coordinate systems │ │ ├── GraphBuilder.dpr │ │ ├── GraphBuilder.dproj │ │ ├── MainForm.dfm │ │ └── MainForm.pas │ ├── Decompiling demo │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ ├── Sample.dproj │ │ ├── Sample64.dpr │ │ └── Sample64.dproj │ ├── Function priority │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── High-performance TFastList (TStrings inheritor) test │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ ├── Sample.dproj │ │ ├── Sample64.dpr │ │ └── Sample64.dproj │ ├── List of variables │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a constant of simple type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function managing by its Handle in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which require parameter after itself in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which require parameter before itsel in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires both parameters - before and after itself in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires no parameters in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires parameter array in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ ├── Sample.dproj │ │ ├── Sample64.dpr │ │ └── Sample64.dproj │ ├── Making a variable in TCalculator │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable of TValue type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable of simple type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Multithreading in TCalculator │ │ ├── Using internal automatic thread │ │ │ ├── MainForm.dfm │ │ │ ├── MainForm.pas │ │ │ ├── Sample.dpr │ │ │ ├── Sample.dproj │ │ │ ├── Sample64.dpr │ │ │ └── Sample64.dproj │ │ └── Using user-defined thread │ │ │ ├── MainForm.dfm │ │ │ ├── MainForm.pas │ │ │ ├── Sample.dpr │ │ │ ├── Sample.dproj │ │ │ ├── Sample64.dpr │ │ │ └── Sample64.dproj │ ├── Sample for the first time │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ ├── Sample.dproj │ │ ├── Sample64.dpr │ │ └── Sample64.dproj │ └── Speed test of a compiled script execution and optimization mechanizm demo │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ ├── Sample.dproj │ │ ├── Sample64.dpr │ │ └── Sample64.dproj ├── Delphi 10.1 Berlin │ ├── Building graph in rectangular and polar coordinate systems │ │ ├── GraphBuilder.dpr │ │ ├── GraphBuilder.dproj │ │ ├── MainForm.dfm │ │ └── MainForm.pas │ ├── Decompiling demo │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Function priority │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── High-performance TFastList (TStrings inheritor) test │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── List of variables │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a constant of simple type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function managing by its Handle in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which require parameter after itself in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which require parameter before itsel in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires both parameters - before and after itself in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires no parameters in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires parameter array in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable in TCalculator │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable of TValue type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable of simple type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Multithreading in TCalculator │ │ ├── Using internal automatic thread │ │ │ ├── MainForm.dfm │ │ │ ├── MainForm.pas │ │ │ ├── Sample.dpr │ │ │ └── Sample.dproj │ │ └── Using user-defined thread │ │ │ ├── MainForm.dfm │ │ │ ├── MainForm.pas │ │ │ ├── Sample.dpr │ │ │ └── Sample.dproj │ ├── Sample for the first time │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ └── Speed test of a compiled script execution and optimization mechanizm demo │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj ├── Delphi 2005 │ ├── Building graph in rectangular and polar coordinate systems │ │ ├── GraphBuilder.bdsproj │ │ ├── GraphBuilder.dpr │ │ ├── MainForm.dfm │ │ └── MainForm.pas │ ├── Decompiling demo │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.bdsproj │ │ └── Sample.dpr │ ├── Extending TField class │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.bdsproj │ │ └── Sample.dpr │ ├── Function priority │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.bdsproj │ │ └── Sample.dpr │ ├── High-performance TFastList (TStrings inheritor) test │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.bdsproj │ │ └── Sample.dpr │ ├── List of variables │ │ ├── Sample.bdsproj │ │ └── Sample.dpr │ ├── Making a constant of simple type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.bdsproj │ │ └── Sample.dpr │ ├── Making a function managing by its Handle in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.bdsproj │ │ └── Sample.dpr │ ├── Making a function which require parameter after itself in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.bdsproj │ │ └── Sample.dpr │ ├── Making a function which require parameter before itsel in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.bdsproj │ │ └── Sample.dpr │ ├── Making a function which requires both parameters - before and after itself in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.bdsproj │ │ └── Sample.dpr │ ├── Making a function which requires no parameters in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.bdsproj │ │ └── Sample.dpr │ ├── Making a function which requires parameter array in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.bdsproj │ │ └── Sample.dpr │ ├── Making a variable in TCalculator │ │ ├── Sample.bdsproj │ │ └── Sample.dpr │ ├── Making a variable of TValue type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.bdsproj │ │ └── Sample.dpr │ ├── Making a variable of simple type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.bdsproj │ │ └── Sample.dpr │ ├── Multithreading in TCalculator │ │ ├── Using internal automatic thread │ │ │ ├── MainForm.dfm │ │ │ ├── MainForm.pas │ │ │ ├── Sample.bdsproj │ │ │ └── Sample.dpr │ │ └── Using user-defined thread │ │ │ ├── MainForm.dfm │ │ │ ├── MainForm.pas │ │ │ ├── Sample.bdsproj │ │ │ └── Sample.dpr │ ├── Sample for the first time │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.bdsproj │ │ └── Sample.dpr │ └── Speed test of a compiled script execution and optimization mechanizm demo │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.bdsproj │ │ └── Sample.dpr ├── Delphi 2006 │ ├── Building graph in rectangular and polar coordinate systems │ │ ├── GraphBuilder.bdsproj │ │ ├── GraphBuilder.dpr │ │ ├── MainForm.dfm │ │ └── MainForm.pas │ ├── Decompiling demo │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.bdsproj │ │ └── Sample.dpr │ ├── Extending TField class │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.bdsproj │ │ └── Sample.dpr │ ├── Function priority │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.bdsproj │ │ └── Sample.dpr │ ├── High-performance TFastList (TStrings inheritor) test │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.bdsproj │ │ └── Sample.dpr │ ├── List of variables │ │ ├── Sample.bdsproj │ │ └── Sample.dpr │ ├── Making a constant of simple type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.bdsproj │ │ └── Sample.dpr │ ├── Making a function managing by its Handle in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.bdsproj │ │ └── Sample.dpr │ ├── Making a function which require parameter after itself in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.bdsproj │ │ └── Sample.dpr │ ├── Making a function which require parameter before itsel in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.bdsproj │ │ └── Sample.dpr │ ├── Making a function which requires both parameters - before and after itself in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.bdsproj │ │ └── Sample.dpr │ ├── Making a function which requires no parameters in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.bdsproj │ │ └── Sample.dpr │ ├── Making a function which requires parameter array in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.bdsproj │ │ └── Sample.dpr │ ├── Making a variable in TCalculator │ │ ├── Sample.bdsproj │ │ └── Sample.dpr │ ├── Making a variable of TValue type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.bdsproj │ │ └── Sample.dpr │ ├── Making a variable of simple type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.bdsproj │ │ └── Sample.dpr │ ├── Multithreading in TCalculator │ │ ├── Using internal automatic thread │ │ │ ├── MainForm.dfm │ │ │ ├── MainForm.pas │ │ │ ├── Sample.bdsproj │ │ │ └── Sample.dpr │ │ └── Using user-defined thread │ │ │ ├── MainForm.dfm │ │ │ ├── MainForm.pas │ │ │ ├── Sample.bdsproj │ │ │ └── Sample.dpr │ ├── Sample for the first time │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.bdsproj │ │ └── Sample.dpr │ └── Speed test of a compiled script execution and optimization mechanizm demo │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.bdsproj │ │ └── Sample.dpr ├── Delphi 2007 │ ├── Building graph in rectangular and polar coordinate systems │ │ ├── GraphBuilder.dpr │ │ ├── GraphBuilder.dproj │ │ ├── MainForm.dfm │ │ └── MainForm.pas │ ├── Decompiling demo │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Extending TField class │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Function priority │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── High-performance TFastList (TStrings inheritor) test │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── List of variables │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a constant of simple type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function managing by its Handle in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which require parameter after itself in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which require parameter before itsel in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires both parameters - before and after itself in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires no parameters in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires parameter array in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable in TCalculator │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable of TValue type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable of simple type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Multithreading in TCalculator │ │ ├── Using internal automatic thread │ │ │ ├── MainForm.dfm │ │ │ ├── MainForm.pas │ │ │ ├── Sample.dpr │ │ │ └── Sample.dproj │ │ └── Using user-defined thread │ │ │ ├── MainForm.dfm │ │ │ ├── MainForm.pas │ │ │ ├── Sample.dpr │ │ │ └── Sample.dproj │ ├── Sample for the first time │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ └── Speed test of a compiled script execution and optimization mechanizm demo │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj ├── Delphi 2009 │ ├── Building graph in rectangular and polar coordinate systems │ │ ├── GraphBuilder.dpr │ │ ├── GraphBuilder.dproj │ │ ├── MainForm.dfm │ │ └── MainForm.pas │ ├── Decompiling demo │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Extending TField class │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Function priority │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── High-performance TFastList (TStrings inheritor) test │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── List of variables │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a constant of simple type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function managing by its Handle in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which require parameter after itself in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which require parameter before itsel in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires both parameters - before and after itself in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires no parameters in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires parameter array in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable in TCalculator │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable of TValue type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable of simple type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Multithreading in TCalculator │ │ ├── Using internal automatic thread │ │ │ ├── MainForm.dfm │ │ │ ├── MainForm.pas │ │ │ ├── Sample.dpr │ │ │ └── Sample.dproj │ │ └── Using user-defined thread │ │ │ ├── MainForm.dfm │ │ │ ├── MainForm.pas │ │ │ ├── Sample.dpr │ │ │ └── Sample.dproj │ ├── Sample for the first time │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ └── Speed test of a compiled script execution and optimization mechanizm demo │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj ├── Delphi 2010 │ ├── Building graph in rectangular and polar coordinate systems │ │ ├── GraphBuilder.dpr │ │ ├── GraphBuilder.dproj │ │ ├── MainForm.dfm │ │ └── MainForm.pas │ ├── Decompiling demo │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Extending TField class │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Function priority │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── High-performance TFastList (TStrings inheritor) test │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── List of variables │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a constant of simple type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function managing by its Handle in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which require parameter after itself in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which require parameter before itsel in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires both parameters - before and after itself in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires no parameters in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires parameter array in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable in TCalculator │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable of TValue type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable of simple type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Multithreading in TCalculator │ │ ├── Using internal automatic thread │ │ │ ├── MainForm.dfm │ │ │ ├── MainForm.pas │ │ │ ├── Sample.dpr │ │ │ └── Sample.dproj │ │ └── Using user-defined thread │ │ │ ├── MainForm.dfm │ │ │ ├── MainForm.pas │ │ │ ├── Sample.dpr │ │ │ └── Sample.dproj │ ├── Sample for the first time │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ └── Speed test of a compiled script execution and optimization mechanizm demo │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj ├── Delphi 6 │ ├── Building graph in rectangular and polar coordinate systems │ │ ├── GraphBuilder.dof │ │ ├── GraphBuilder.dpr │ │ ├── MainForm.dfm │ │ └── MainForm.pas │ ├── Decompiling demo │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dof │ │ └── Sample.dpr │ ├── Extending TField class │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dof │ │ └── Sample.dpr │ ├── Function priority │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dof │ │ └── Sample.dpr │ ├── High-performance TFastList (TStrings inheritor) test │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dof │ │ └── Sample.dpr │ ├── List of variables │ │ ├── Sample.dof │ │ └── Sample.dpr │ ├── Making a constant of simple type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dof │ │ └── Sample.dpr │ ├── Making a function managing by its Handle in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dof │ │ └── Sample.dpr │ ├── Making a function which require parameter after itself in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dof │ │ └── Sample.dpr │ ├── Making a function which require parameter before itsel in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dof │ │ └── Sample.dpr │ ├── Making a function which requires both parameters - before and after itself in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dof │ │ └── Sample.dpr │ ├── Making a function which requires no parameters in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dof │ │ └── Sample.dpr │ ├── Making a function which requires parameter array in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dof │ │ └── Sample.dpr │ ├── Making a variable in TCalculator │ │ ├── Sample.dof │ │ └── Sample.dpr │ ├── Making a variable of TValue type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dof │ │ └── Sample.dpr │ ├── Making a variable of simple type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dof │ │ └── Sample.dpr │ ├── Multithreading in TCalculator │ │ ├── Using internal automatic thread │ │ │ ├── MainForm.dfm │ │ │ ├── MainForm.pas │ │ │ ├── Sample.dof │ │ │ └── Sample.dpr │ │ └── Using user-defined thread │ │ │ ├── MainForm.dfm │ │ │ ├── MainForm.pas │ │ │ ├── Sample.dof │ │ │ └── Sample.dpr │ ├── Sample for the first time │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dof │ │ └── Sample.dpr │ └── Speed test of a compiled script execution and optimization mechanizm demo │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dof │ │ └── Sample.dpr ├── Delphi 7 │ ├── Building graph in rectangular and polar coordinate systems │ │ ├── GraphBuilder.dof │ │ ├── GraphBuilder.dpr │ │ ├── MainForm.dfm │ │ └── MainForm.pas │ ├── Decompiling demo │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dof │ │ └── Sample.dpr │ ├── Extending TField class │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dof │ │ └── Sample.dpr │ ├── Function priority │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dof │ │ └── Sample.dpr │ ├── High-performance TFastList (TStrings inheritor) test │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dof │ │ └── Sample.dpr │ ├── List of variables │ │ ├── Sample.dof │ │ └── Sample.dpr │ ├── Making a constant of simple type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dof │ │ └── Sample.dpr │ ├── Making a function managing by its Handle in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dof │ │ └── Sample.dpr │ ├── Making a function which require parameter after itself in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dof │ │ └── Sample.dpr │ ├── Making a function which require parameter before itsel in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dof │ │ └── Sample.dpr │ ├── Making a function which requires both parameters - before and after itself in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dof │ │ └── Sample.dpr │ ├── Making a function which requires no parameters in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dof │ │ └── Sample.dpr │ ├── Making a function which requires parameter array in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dof │ │ └── Sample.dpr │ ├── Making a variable in TCalculator │ │ ├── Sample.dof │ │ └── Sample.dpr │ ├── Making a variable of TValue type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dof │ │ └── Sample.dpr │ ├── Making a variable of simple type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dof │ │ └── Sample.dpr │ ├── Multithreading in TCalculator │ │ ├── Using internal automatic thread │ │ │ ├── MainForm.dfm │ │ │ ├── MainForm.pas │ │ │ ├── Sample.dof │ │ │ └── Sample.dpr │ │ └── Using user-defined thread │ │ │ ├── MainForm.dfm │ │ │ ├── MainForm.pas │ │ │ ├── Sample.dof │ │ │ └── Sample.dpr │ ├── Sample for the first time │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dof │ │ └── Sample.dpr │ └── Speed test of a compiled script execution and optimization mechanizm demo │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dof │ │ └── Sample.dpr ├── Delphi XE │ ├── Building graph in rectangular and polar coordinate systems │ │ ├── GraphBuilder.dpr │ │ ├── GraphBuilder.dproj │ │ ├── MainForm.dfm │ │ └── MainForm.pas │ ├── Decompiling demo │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Extending TField class │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Function priority │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── High-performance TFastList (TStrings inheritor) test │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── List of variables │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a constant of simple type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function managing by its Handle in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which require parameter after itself in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which require parameter before itsel in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires both parameters - before and after itself in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires no parameters in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires parameter array in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable in TCalculator │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable of TValue type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable of simple type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Multithreading in TCalculator │ │ ├── Using internal automatic thread │ │ │ ├── MainForm.dfm │ │ │ ├── MainForm.pas │ │ │ ├── Sample.dpr │ │ │ └── Sample.dproj │ │ └── Using user-defined thread │ │ │ ├── MainForm.dfm │ │ │ ├── MainForm.pas │ │ │ ├── Sample.dpr │ │ │ └── Sample.dproj │ ├── Sample for the first time │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ └── Speed test of a compiled script execution and optimization mechanizm demo │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj ├── Delphi XE2 │ ├── Building graph in rectangular and polar coordinate systems │ │ ├── GraphBuilder.dpr │ │ ├── GraphBuilder.dproj │ │ ├── MainForm.dfm │ │ └── MainForm.pas │ ├── Decompiling demo │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Extending TField class │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Function priority │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── High-performance TFastList (TStrings inheritor) test │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── List of variables │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a constant of simple type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function managing by its Handle in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which require parameter after itself in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which require parameter before itsel in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires both parameters - before and after itself in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires no parameters in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires parameter array in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable in TCalculator │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable of TValue type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable of simple type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Multithreading in TCalculator │ │ ├── Using internal automatic thread │ │ │ ├── MainForm.dfm │ │ │ ├── MainForm.pas │ │ │ ├── Sample.dpr │ │ │ └── Sample.dproj │ │ └── Using user-defined thread │ │ │ ├── MainForm.dfm │ │ │ ├── MainForm.pas │ │ │ ├── Sample.dpr │ │ │ └── Sample.dproj │ ├── Sample for the first time │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ └── Speed test of a compiled script execution and optimization mechanizm demo │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj ├── Delphi XE3 │ ├── Building graph in rectangular and polar coordinate systems │ │ ├── GraphBuilder.dpr │ │ ├── GraphBuilder.dproj │ │ ├── MainForm.dfm │ │ └── MainForm.pas │ ├── Decompiling demo │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Extending TField class │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Function priority │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── High-performance TFastList (TStrings inheritor) test │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── List of variables │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a constant of simple type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function managing by its Handle in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which require parameter after itself in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which require parameter before itsel in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires both parameters - before and after itself in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires no parameters in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires parameter array in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable in TCalculator │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable of TValue type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable of simple type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Multithreading in TCalculator │ │ ├── Using internal automatic thread │ │ │ ├── MainForm.dfm │ │ │ ├── MainForm.pas │ │ │ ├── Sample.dpr │ │ │ └── Sample.dproj │ │ └── Using user-defined thread │ │ │ ├── MainForm.dfm │ │ │ ├── MainForm.pas │ │ │ ├── Sample.dpr │ │ │ └── Sample.dproj │ ├── Sample for the first time │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ └── Speed test of a compiled script execution and optimization mechanizm demo │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj ├── Delphi XE4 │ ├── Building graph in rectangular and polar coordinate systems │ │ ├── GraphBuilder.dpr │ │ ├── GraphBuilder.dproj │ │ ├── MainForm.dfm │ │ └── MainForm.pas │ ├── Decompiling demo │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Function priority │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── High-performance TFastList (TStrings inheritor) test │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── List of variables │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a constant of simple type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function managing by its Handle in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which require parameter after itself in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which require parameter before itsel in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires both parameters - before and after itself in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires no parameters in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires parameter array in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable in TCalculator │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable of TValue type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable of simple type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Multithreading in TCalculator │ │ ├── Using internal automatic thread │ │ │ ├── MainForm.dfm │ │ │ ├── MainForm.pas │ │ │ ├── Sample.dpr │ │ │ └── Sample.dproj │ │ └── Using user-defined thread │ │ │ ├── MainForm.dfm │ │ │ ├── MainForm.pas │ │ │ ├── Sample.dpr │ │ │ └── Sample.dproj │ ├── Sample for the first time │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ └── Speed test of a compiled script execution and optimization mechanizm demo │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj ├── Delphi XE5 │ ├── Building graph in rectangular and polar coordinate systems │ │ ├── GraphBuilder.dpr │ │ ├── GraphBuilder.dproj │ │ ├── MainForm.dfm │ │ └── MainForm.pas │ ├── Decompiling demo │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Function priority │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── High-performance TFastList (TStrings inheritor) test │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── List of variables │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a constant of simple type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function managing by its Handle in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which require parameter after itself in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which require parameter before itsel in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires both parameters - before and after itself in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires no parameters in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires parameter array in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable in TCalculator │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable of TValue type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable of simple type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Multithreading in TCalculator │ │ ├── Using internal automatic thread │ │ │ ├── MainForm.dfm │ │ │ ├── MainForm.pas │ │ │ ├── Sample.dpr │ │ │ └── Sample.dproj │ │ └── Using user-defined thread │ │ │ ├── MainForm.dfm │ │ │ ├── MainForm.pas │ │ │ ├── Sample.dpr │ │ │ └── Sample.dproj │ ├── Sample for the first time │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ └── Speed test of a compiled script execution and optimization mechanizm demo │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj ├── Delphi XE6 │ ├── Building graph in rectangular and polar coordinate systems │ │ ├── GraphBuilder.dpr │ │ ├── GraphBuilder.dproj │ │ ├── MainForm.dfm │ │ └── MainForm.pas │ ├── Decompiling demo │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Function priority │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── High-performance TFastList (TStrings inheritor) test │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── List of variables │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a constant of simple type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function managing by its Handle in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which require parameter after itself in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which require parameter before itsel in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires both parameters - before and after itself in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires no parameters in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires parameter array in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable in TCalculator │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable of TValue type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable of simple type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Multithreading in TCalculator │ │ ├── Using internal automatic thread │ │ │ ├── MainForm.dfm │ │ │ ├── MainForm.pas │ │ │ ├── Sample.dpr │ │ │ └── Sample.dproj │ │ └── Using user-defined thread │ │ │ ├── MainForm.dfm │ │ │ ├── MainForm.pas │ │ │ ├── Sample.dpr │ │ │ └── Sample.dproj │ ├── Sample for the first time │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ └── Speed test of a compiled script execution and optimization mechanizm demo │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj ├── Delphi XE7 │ ├── Building graph in rectangular and polar coordinate systems │ │ ├── GraphBuilder.dpr │ │ ├── GraphBuilder.dproj │ │ ├── MainForm.dfm │ │ └── MainForm.pas │ ├── Decompiling demo │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Function priority │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── High-performance TFastList (TStrings inheritor) test │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── List of variables │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a constant of simple type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function managing by its Handle in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which require parameter after itself in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which require parameter before itsel in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires both parameters - before and after itself in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires no parameters in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a function which requires parameter array in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable in TCalculator │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable of TValue type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Making a variable of simple type in TParser │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Multithreading in TCalculator │ │ ├── Using internal automatic thread │ │ │ ├── MainForm.dfm │ │ │ ├── MainForm.pas │ │ │ ├── Sample.dpr │ │ │ └── Sample.dproj │ │ └── Using user-defined thread │ │ │ ├── MainForm.dfm │ │ │ ├── MainForm.pas │ │ │ ├── Sample.dpr │ │ │ └── Sample.dproj │ ├── Sample for the first time │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ └── Speed test of a compiled script execution and optimization mechanizm demo │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj └── Delphi XE8 │ ├── Building graph in rectangular and polar coordinate systems │ ├── GraphBuilder.dpr │ ├── GraphBuilder.dproj │ ├── MainForm.dfm │ └── MainForm.pas │ ├── Decompiling demo │ ├── MainForm.dfm │ ├── MainForm.pas │ ├── Sample.dpr │ └── Sample.dproj │ ├── Function priority │ ├── MainForm.dfm │ ├── MainForm.pas │ ├── Sample.dpr │ └── Sample.dproj │ ├── High-performance TFastList (TStrings inheritor) test │ ├── MainForm.dfm │ ├── MainForm.pas │ ├── Sample.dpr │ └── Sample.dproj │ ├── List of variables │ ├── Sample.dpr │ └── Sample.dproj │ ├── Making a constant of simple type in TParser │ ├── MainForm.dfm │ ├── MainForm.pas │ ├── Sample.dpr │ └── Sample.dproj │ ├── Making a function managing by its Handle in TParser │ ├── MainForm.dfm │ ├── MainForm.pas │ ├── Sample.dpr │ └── Sample.dproj │ ├── Making a function which require parameter after itself in TParser │ ├── MainForm.dfm │ ├── MainForm.pas │ ├── Sample.dpr │ └── Sample.dproj │ ├── Making a function which require parameter before itsel in TParser │ ├── MainForm.dfm │ ├── MainForm.pas │ ├── Sample.dpr │ └── Sample.dproj │ ├── Making a function which requires both parameters - before and after itself in TParser │ ├── MainForm.dfm │ ├── MainForm.pas │ ├── Sample.dpr │ └── Sample.dproj │ ├── Making a function which requires no parameters in TParser │ ├── MainForm.dfm │ ├── MainForm.pas │ ├── Sample.dpr │ └── Sample.dproj │ ├── Making a function which requires parameter array in TParser │ ├── MainForm.dfm │ ├── MainForm.pas │ ├── Sample.dpr │ └── Sample.dproj │ ├── Making a variable in TCalculator │ ├── Sample.dpr │ └── Sample.dproj │ ├── Making a variable of TValue type in TParser │ ├── MainForm.dfm │ ├── MainForm.pas │ ├── Sample.dpr │ └── Sample.dproj │ ├── Making a variable of simple type in TParser │ ├── MainForm.dfm │ ├── MainForm.pas │ ├── Sample.dpr │ └── Sample.dproj │ ├── Multithreading in TCalculator │ ├── Using internal automatic thread │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ └── Using user-defined thread │ │ ├── MainForm.dfm │ │ ├── MainForm.pas │ │ ├── Sample.dpr │ │ └── Sample.dproj │ ├── Sample for the first time │ ├── MainForm.dfm │ ├── MainForm.pas │ ├── Sample.dpr │ └── Sample.dproj │ └── Speed test of a compiled script execution and optimization mechanizm demo │ ├── MainForm.dfm │ ├── MainForm.pas │ ├── Sample.dpr │ └── Sample.dproj ├── image ├── image001.png ├── image002.png ├── image003.png ├── image004.png ├── image005.png ├── image006.gif ├── image007.gif ├── image008.gif └── image009.gif └── readme.html /.gitignore: -------------------------------------------------------------------------------- 1 | # Delphi compiler-generated binaries (safe to delete) 2 | *.exe 3 | *.dll 4 | *.bpl 5 | *.bpi 6 | *.dcp 7 | *.so 8 | *.apk 9 | *.drc 10 | *.map 11 | *.dres 12 | *.rsm 13 | *.tds 14 | *.dcu 15 | *.lib 16 | *.a 17 | *.o 18 | *.ocx 19 | *.res 20 | 21 | # Delphi autogenerated files (duplicated info) 22 | *.cfg 23 | *.hpp 24 | *Resource.rc 25 | 26 | # Delphi local files (user-specific info) 27 | *.local 28 | *.identcache 29 | *.projdata 30 | *.tvsconfig 31 | *.dsk 32 | 33 | # Delphi history and backups 34 | __history/ 35 | __recovery/ 36 | *.~* 37 | 38 | # Castalia statistics file (since XE7 Castalia is distributed with Delphi) 39 | *.stat 40 | -------------------------------------------------------------------------------- /Components/GDIPOBJ.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Components/GDIPOBJ.pas -------------------------------------------------------------------------------- /Components/Graph.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Components/Graph.pas -------------------------------------------------------------------------------- /Components/GraphicUtils.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Components/GraphicUtils.pas -------------------------------------------------------------------------------- /Components/Integer.inc: -------------------------------------------------------------------------------- 1 | {$B-} 2 | {$I Directives.inc} 3 | {$IFDEF VER150} 4 | type 5 | NativeInt = Integer; 6 | {$ELSE} 7 | {$IFDEF CompilerVersion<=18.5} 8 | type 9 | NativeInt = Integer; 10 | {$ENDIF} 11 | {$ENDIF} 12 | -------------------------------------------------------------------------------- /Components/NetUtils.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Components/NetUtils.pas -------------------------------------------------------------------------------- /Components/Notifier.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Components/Notifier.pas -------------------------------------------------------------------------------- /Components/ParameterUtils.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Components/ParameterUtils.pas -------------------------------------------------------------------------------- /Components/ParseTypes.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Components/ParseTypes.pas -------------------------------------------------------------------------------- /Components/ProcessInformation.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Components/ProcessInformation.pas -------------------------------------------------------------------------------- /Components/SystemConsts.pas: -------------------------------------------------------------------------------- 1 | { *********************************************************************** } 2 | { } 3 | { SystemConsts } 4 | { } 5 | { Copyright (c) 2013 Pisarev Yuriy (post@pisarev.net) } 6 | { } 7 | { *********************************************************************** } 8 | 9 | unit SystemConsts; 10 | 11 | {$B-} 12 | 13 | interface 14 | 15 | const 16 | SE_DEBUG_NAME = 'SeDebugPrivilege'; 17 | SE_SHUTDOWN_NAME = 'SeShutdownPrivilege'; 18 | 19 | implementation 20 | 21 | end. 22 | -------------------------------------------------------------------------------- /Components/TextTypes.pas: -------------------------------------------------------------------------------- 1 | { *********************************************************************** } 2 | { } 3 | { TextTypes } 4 | { } 5 | { Copyright (c) 2008 Pisarev Yuriy (post@pisarev.net) } 6 | { } 7 | { *********************************************************************** } 8 | 9 | unit TextTypes; 10 | 11 | {$B-} 12 | 13 | interface 14 | 15 | type 16 | TTextAlign = (taLeft, taCenter, taRight); 17 | 18 | implementation 19 | 20 | end. 21 | -------------------------------------------------------------------------------- /README.md: -------------------------------------------------------------------------------- 1 | # mathparser 2 | 3 | This is a fork of [mathparser](https://sourceforge.net/projects/parse-components) by 4 | **Pisarev Yuriy** which adds 64bit capabilities. 5 | 6 | ## Limitations 7 | 8 | Currently, the graph module does not work when compiling to 64bit. 9 | 10 | 11 | ## License 12 | 13 | Apache License 2.0 14 | -------------------------------------------------------------------------------- /Samples/Delphi 10 Seattle/Decompiling demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 10 Seattle/Decompiling demo/Sample64.dpr: -------------------------------------------------------------------------------- 1 | program Sample64; 2 | 3 | uses 4 | Vcl.Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | {$R *.res} 8 | 9 | begin 10 | Application.Initialize; 11 | Application.MainFormOnTaskbar := True; 12 | Application.CreateForm(TMain, Main); 13 | Application.Run; 14 | end. 15 | -------------------------------------------------------------------------------- /Samples/Delphi 10 Seattle/Function priority/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 10 Seattle/High-performance TFastList (TStrings inheritor) test/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 10 Seattle/High-performance TFastList (TStrings inheritor) test/Sample64.dpr: -------------------------------------------------------------------------------- 1 | program Sample64; 2 | 3 | uses 4 | Vcl.Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | {$R *.res} 8 | 9 | begin 10 | Application.Initialize; 11 | Application.MainFormOnTaskbar := True; 12 | Application.CreateForm(TMain, Main); 13 | Application.Run; 14 | end. 15 | -------------------------------------------------------------------------------- /Samples/Delphi 10 Seattle/List of variables/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | {$B-} 4 | 5 | uses 6 | Calculator, Classes, Dialogs; 7 | 8 | var 9 | Calc: TCalculator; 10 | List: TStrings; 11 | begin 12 | Calc := TCalculator.Create(nil); 13 | try 14 | List := TStringList.Create; 15 | try 16 | List.Add('A = 1 + 2'); 17 | List.Add('B = 3 + 4'); 18 | List.Add('C = A + B'); 19 | Calc.AddVariableList(List); 20 | finally 21 | List.Free; 22 | end; 23 | ShowMessage(Calc.AsString('A + B + C')); 24 | finally 25 | Calc.Free; 26 | end; 27 | end. 28 | -------------------------------------------------------------------------------- /Samples/Delphi 10 Seattle/Making a constant of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 10 Seattle/Making a function managing by its Handle in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 10 Seattle/Making a function managing by its Handle in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 10 Seattle/Making a function managing by its Handle in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 10 Seattle/Making a function which require parameter after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 10 Seattle/Making a function which require parameter after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 10 Seattle/Making a function which require parameter after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 10 Seattle/Making a function which require parameter before itsel in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 10 Seattle/Making a function which require parameter before itsel in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 10 Seattle/Making a function which require parameter before itsel in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 10 Seattle/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 10 Seattle/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 10 Seattle/Making a function which requires both parameters - before and after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 10 Seattle/Making a function which requires no parameters in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 10 Seattle/Making a function which requires no parameters in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 10 Seattle/Making a function which requires no parameters in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 10 Seattle/Making a function which requires parameter array in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 10 Seattle/Making a function which requires parameter array in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 10 Seattle/Making a function which requires parameter array in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 10 Seattle/Making a function which requires parameter array in TParser/Sample64.dpr: -------------------------------------------------------------------------------- 1 | program Sample64; 2 | 3 | uses 4 | Vcl.Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | {$R *.res} 8 | 9 | begin 10 | Application.Initialize; 11 | Application.MainFormOnTaskbar := True; 12 | Application.CreateForm(TMain, Main); 13 | Application.Run; 14 | end. 15 | -------------------------------------------------------------------------------- /Samples/Delphi 10 Seattle/Making a variable of TValue type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 10 Seattle/Making a variable of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 10 Seattle/Multithreading in TCalculator/Using internal automatic thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 10 Seattle/Multithreading in TCalculator/Using internal automatic thread/Sample64.dpr: -------------------------------------------------------------------------------- 1 | program Sample64; 2 | 3 | uses 4 | Vcl.Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | {$R *.res} 8 | 9 | begin 10 | Application.Initialize; 11 | Application.MainFormOnTaskbar := True; 12 | Application.CreateForm(TMain, Main); 13 | Application.Run; 14 | end. 15 | -------------------------------------------------------------------------------- /Samples/Delphi 10 Seattle/Multithreading in TCalculator/Using user-defined thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 10 Seattle/Multithreading in TCalculator/Using user-defined thread/Sample64.dpr: -------------------------------------------------------------------------------- 1 | program Sample64; 2 | 3 | uses 4 | Vcl.Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | {$R *.res} 8 | 9 | begin 10 | Application.Initialize; 11 | Application.MainFormOnTaskbar := True; 12 | Application.CreateForm(TMain, Main); 13 | Application.Run; 14 | end. 15 | -------------------------------------------------------------------------------- /Samples/Delphi 10 Seattle/Sample for the first time/MainForm.pas: -------------------------------------------------------------------------------- 1 | unit MainForm; 2 | 3 | interface 4 | 5 | {$B-} 6 | {$I Directives.inc} 7 | 8 | uses 9 | {$IFDEF DELPHI_XE7}WinApi.Windows, WinApi.Messages, {$ELSE}Windows, Messages, 10 | {$ENDIF}SysUtils, Classes, Controls, Forms, StdCtrls, ExtCtrls; 11 | 12 | type 13 | TMain = class(TForm) 14 | bCalculate: TButton; 15 | leInput: TLabeledEdit; 16 | leOutput: TLabeledEdit; 17 | procedure bCalculateClick(Sender: TObject); 18 | end; 19 | 20 | var 21 | Main: TMain; 22 | 23 | implementation 24 | 25 | uses 26 | CalcUtils; 27 | 28 | {$R *.dfm} 29 | 30 | procedure TMain.bCalculateClick(Sender: TObject); 31 | begin 32 | leOutput.Text := AsString(leInput.Text); 33 | end; 34 | 35 | end. 36 | -------------------------------------------------------------------------------- /Samples/Delphi 10 Seattle/Sample for the first time/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 10 Seattle/Sample for the first time/Sample64.dpr: -------------------------------------------------------------------------------- 1 | program Sample64; 2 | 3 | uses 4 | Vcl.Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | {$R *.res} 8 | 9 | begin 10 | Application.Initialize; 11 | Application.MainFormOnTaskbar := True; 12 | Application.CreateForm(TMain, Main); 13 | Application.Run; 14 | end. 15 | -------------------------------------------------------------------------------- /Samples/Delphi 10 Seattle/Speed test of a compiled script execution and optimization mechanizm demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 10 Seattle/Speed test of a compiled script execution and optimization mechanizm demo/Sample64.dpr: -------------------------------------------------------------------------------- 1 | program Sample64; 2 | 3 | uses 4 | Vcl.Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | {$R *.res} 8 | 9 | begin 10 | Application.Initialize; 11 | Application.MainFormOnTaskbar := True; 12 | Application.CreateForm(TMain, Main); 13 | Application.Run; 14 | end. 15 | -------------------------------------------------------------------------------- /Samples/Delphi 10.1 Berlin/Decompiling demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 10.1 Berlin/Function priority/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 10.1 Berlin/High-performance TFastList (TStrings inheritor) test/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 10.1 Berlin/List of variables/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | {$B-} 4 | 5 | uses 6 | Calculator, Classes, Dialogs; 7 | 8 | var 9 | Calc: TCalculator; 10 | List: TStrings; 11 | begin 12 | Calc := TCalculator.Create(nil); 13 | try 14 | List := TStringList.Create; 15 | try 16 | List.Add('A = 1 + 2'); 17 | List.Add('B = 3 + 4'); 18 | List.Add('C = A + B'); 19 | Calc.AddVariableList(List); 20 | finally 21 | List.Free; 22 | end; 23 | ShowMessage(Calc.AsString('A + B + C')); 24 | finally 25 | Calc.Free; 26 | end; 27 | end. 28 | -------------------------------------------------------------------------------- /Samples/Delphi 10.1 Berlin/Making a constant of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 10.1 Berlin/Making a function managing by its Handle in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 10.1 Berlin/Making a function managing by its Handle in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 10.1 Berlin/Making a function managing by its Handle in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 10.1 Berlin/Making a function which require parameter after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 10.1 Berlin/Making a function which require parameter after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 10.1 Berlin/Making a function which require parameter after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 10.1 Berlin/Making a function which require parameter before itsel in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 10.1 Berlin/Making a function which require parameter before itsel in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 10.1 Berlin/Making a function which require parameter before itsel in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 10.1 Berlin/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 10.1 Berlin/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 10.1 Berlin/Making a function which requires both parameters - before and after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 10.1 Berlin/Making a function which requires no parameters in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 10.1 Berlin/Making a function which requires no parameters in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 10.1 Berlin/Making a function which requires no parameters in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 10.1 Berlin/Making a function which requires parameter array in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 10.1 Berlin/Making a function which requires parameter array in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 10.1 Berlin/Making a function which requires parameter array in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 10.1 Berlin/Making a variable of TValue type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 10.1 Berlin/Making a variable of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 10.1 Berlin/Multithreading in TCalculator/Using internal automatic thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 10.1 Berlin/Multithreading in TCalculator/Using user-defined thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 10.1 Berlin/Sample for the first time/MainForm.pas: -------------------------------------------------------------------------------- 1 | unit MainForm; 2 | 3 | interface 4 | 5 | {$B-} 6 | {$I Directives.inc} 7 | 8 | uses 9 | {$IFDEF DELPHI_XE7}WinApi.Windows, WinApi.Messages, {$ELSE}Windows, Messages, 10 | {$ENDIF}SysUtils, Classes, Controls, Forms, StdCtrls, ExtCtrls; 11 | 12 | type 13 | TMain = class(TForm) 14 | bCalculate: TButton; 15 | leInput: TLabeledEdit; 16 | leOutput: TLabeledEdit; 17 | procedure bCalculateClick(Sender: TObject); 18 | end; 19 | 20 | var 21 | Main: TMain; 22 | 23 | implementation 24 | 25 | uses 26 | CalcUtils; 27 | 28 | {$R *.dfm} 29 | 30 | procedure TMain.bCalculateClick(Sender: TObject); 31 | begin 32 | leOutput.Text := AsString(leInput.Text); 33 | end; 34 | 35 | end. 36 | -------------------------------------------------------------------------------- /Samples/Delphi 10.1 Berlin/Sample for the first time/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 10.1 Berlin/Speed test of a compiled script execution and optimization mechanizm demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2005/Building graph in rectangular and polar coordinate systems/GraphBuilder.dpr: -------------------------------------------------------------------------------- 1 | { *********************************************************************** } 2 | { } 3 | { Graph builder } 4 | { } 5 | { Copyright (c) 2016 Pisarev Yuriy (post@pisarev.net) } 6 | { } 7 | { *********************************************************************** } 8 | 9 | program GraphBuilder; 10 | 11 | uses 12 | Forms, 13 | MainForm in 'MainForm.pas' {Main}; 14 | 15 | begin 16 | Application.Initialize; 17 | Application.CreateForm(TMain, Main); 18 | Application.Run; 19 | end. 20 | -------------------------------------------------------------------------------- /Samples/Delphi 2005/Decompiling demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2005/Extending TField class/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Parse; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2005/Function priority/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2005/High-performance TFastList (TStrings inheritor) test/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2005/List of variables/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | {$B-} 4 | 5 | uses 6 | Calculator, Classes, Dialogs; 7 | 8 | var 9 | Calc: TCalculator; 10 | List: TStrings; 11 | begin 12 | Calc := TCalculator.Create(nil); 13 | try 14 | List := TStringList.Create; 15 | try 16 | List.Add('A = 1 + 2'); 17 | List.Add('B = 3 + 4'); 18 | List.Add('C = A + B'); 19 | Calc.AddVariableList(List); 20 | finally 21 | List.Free; 22 | end; 23 | ShowMessage(Calc.AsString('A + B + C')); 24 | finally 25 | Calc.Free; 26 | end; 27 | end. 28 | -------------------------------------------------------------------------------- /Samples/Delphi 2005/Making a constant of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2005/Making a function managing by its Handle in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 2005/Making a function managing by its Handle in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 2005/Making a function managing by its Handle in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2005/Making a function which require parameter after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 2005/Making a function which require parameter after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 2005/Making a function which require parameter after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2005/Making a function which require parameter before itsel in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 2005/Making a function which require parameter before itsel in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 2005/Making a function which require parameter before itsel in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2005/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 2005/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 2005/Making a function which requires both parameters - before and after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2005/Making a function which requires no parameters in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 2005/Making a function which requires no parameters in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 2005/Making a function which requires no parameters in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2005/Making a function which requires parameter array in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 2005/Making a function which requires parameter array in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 2005/Making a function which requires parameter array in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2005/Making a variable of TValue type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2005/Making a variable of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2005/Multithreading in TCalculator/Using internal automatic thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2005/Multithreading in TCalculator/Using user-defined thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2005/Sample for the first time/MainForm.pas: -------------------------------------------------------------------------------- 1 | unit MainForm; 2 | 3 | interface 4 | 5 | {$B-} 6 | {$I Directives.inc} 7 | 8 | uses 9 | {$IFDEF DELPHI_XE7}WinApi.Windows, WinApi.Messages, {$ELSE}Windows, Messages, 10 | {$ENDIF}SysUtils, Classes, Controls, Forms, StdCtrls, ExtCtrls; 11 | 12 | type 13 | TMain = class(TForm) 14 | bCalculate: TButton; 15 | leInput: TLabeledEdit; 16 | leOutput: TLabeledEdit; 17 | procedure bCalculateClick(Sender: TObject); 18 | end; 19 | 20 | var 21 | Main: TMain; 22 | 23 | implementation 24 | 25 | uses 26 | CalcUtils; 27 | 28 | {$R *.dfm} 29 | 30 | procedure TMain.bCalculateClick(Sender: TObject); 31 | begin 32 | leOutput.Text := AsString(leInput.Text); 33 | end; 34 | 35 | end. 36 | -------------------------------------------------------------------------------- /Samples/Delphi 2005/Sample for the first time/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2005/Speed test of a compiled script execution and optimization mechanizm demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2006/Building graph in rectangular and polar coordinate systems/GraphBuilder.dpr: -------------------------------------------------------------------------------- 1 | { *********************************************************************** } 2 | { } 3 | { Graph builder } 4 | { } 5 | { Copyright (c) 2016 Pisarev Yuriy (post@pisarev.net) } 6 | { } 7 | { *********************************************************************** } 8 | 9 | program GraphBuilder; 10 | 11 | uses 12 | Forms, 13 | MainForm in 'MainForm.pas' {Main}; 14 | 15 | begin 16 | Application.Initialize; 17 | Application.CreateForm(TMain, Main); 18 | Application.Run; 19 | end. 20 | -------------------------------------------------------------------------------- /Samples/Delphi 2006/Decompiling demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2006/Extending TField class/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Parse; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2006/Function priority/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2006/High-performance TFastList (TStrings inheritor) test/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2006/List of variables/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | {$B-} 4 | 5 | uses 6 | Calculator, Classes, Dialogs; 7 | 8 | var 9 | Calc: TCalculator; 10 | List: TStrings; 11 | begin 12 | Calc := TCalculator.Create(nil); 13 | try 14 | List := TStringList.Create; 15 | try 16 | List.Add('A = 1 + 2'); 17 | List.Add('B = 3 + 4'); 18 | List.Add('C = A + B'); 19 | Calc.AddVariableList(List); 20 | finally 21 | List.Free; 22 | end; 23 | ShowMessage(Calc.AsString('A + B + C')); 24 | finally 25 | Calc.Free; 26 | end; 27 | end. 28 | -------------------------------------------------------------------------------- /Samples/Delphi 2006/Making a constant of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2006/Making a function managing by its Handle in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 2006/Making a function managing by its Handle in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 2006/Making a function managing by its Handle in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2006/Making a function which require parameter after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 2006/Making a function which require parameter after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 2006/Making a function which require parameter after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2006/Making a function which require parameter before itsel in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 2006/Making a function which require parameter before itsel in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 2006/Making a function which require parameter before itsel in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2006/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 2006/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 2006/Making a function which requires both parameters - before and after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2006/Making a function which requires no parameters in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 2006/Making a function which requires no parameters in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 2006/Making a function which requires no parameters in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2006/Making a function which requires parameter array in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 2006/Making a function which requires parameter array in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 2006/Making a function which requires parameter array in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2006/Making a variable of TValue type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2006/Making a variable of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2006/Multithreading in TCalculator/Using internal automatic thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2006/Multithreading in TCalculator/Using user-defined thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2006/Sample for the first time/MainForm.pas: -------------------------------------------------------------------------------- 1 | unit MainForm; 2 | 3 | interface 4 | 5 | {$B-} 6 | {$I Directives.inc} 7 | 8 | uses 9 | {$IFDEF DELPHI_XE7}WinApi.Windows, WinApi.Messages, {$ELSE}Windows, Messages, 10 | {$ENDIF}SysUtils, Classes, Controls, Forms, StdCtrls, ExtCtrls; 11 | 12 | type 13 | TMain = class(TForm) 14 | bCalculate: TButton; 15 | leInput: TLabeledEdit; 16 | leOutput: TLabeledEdit; 17 | procedure bCalculateClick(Sender: TObject); 18 | end; 19 | 20 | var 21 | Main: TMain; 22 | 23 | implementation 24 | 25 | uses 26 | CalcUtils; 27 | 28 | {$R *.dfm} 29 | 30 | procedure TMain.bCalculateClick(Sender: TObject); 31 | begin 32 | leOutput.Text := AsString(leInput.Text); 33 | end; 34 | 35 | end. 36 | -------------------------------------------------------------------------------- /Samples/Delphi 2006/Sample for the first time/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2006/Speed test of a compiled script execution and optimization mechanizm demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2007/Building graph in rectangular and polar coordinate systems/GraphBuilder.dpr: -------------------------------------------------------------------------------- 1 | { *********************************************************************** } 2 | { } 3 | { Graph builder } 4 | { } 5 | { Copyright (c) 2016 Pisarev Yuriy (post@pisarev.net) } 6 | { } 7 | { *********************************************************************** } 8 | 9 | program GraphBuilder; 10 | 11 | uses 12 | Forms, 13 | MainForm in 'MainForm.pas' {Main}; 14 | 15 | begin 16 | Application.Initialize; 17 | Application.CreateForm(TMain, Main); 18 | Application.Run; 19 | end. 20 | -------------------------------------------------------------------------------- /Samples/Delphi 2007/Decompiling demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2007/Extending TField class/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Parse; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2007/Function priority/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2007/High-performance TFastList (TStrings inheritor) test/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2007/List of variables/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | {$B-} 4 | 5 | uses 6 | Calculator, Classes, Dialogs; 7 | 8 | var 9 | Calc: TCalculator; 10 | List: TStrings; 11 | begin 12 | Calc := TCalculator.Create(nil); 13 | try 14 | List := TStringList.Create; 15 | try 16 | List.Add('A = 1 + 2'); 17 | List.Add('B = 3 + 4'); 18 | List.Add('C = A + B'); 19 | Calc.AddVariableList(List); 20 | finally 21 | List.Free; 22 | end; 23 | ShowMessage(Calc.AsString('A + B + C')); 24 | finally 25 | Calc.Free; 26 | end; 27 | end. 28 | -------------------------------------------------------------------------------- /Samples/Delphi 2007/Making a constant of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2007/Making a function managing by its Handle in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 2007/Making a function managing by its Handle in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 2007/Making a function managing by its Handle in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2007/Making a function which require parameter after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 2007/Making a function which require parameter after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 2007/Making a function which require parameter after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2007/Making a function which require parameter before itsel in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 2007/Making a function which require parameter before itsel in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 2007/Making a function which require parameter before itsel in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2007/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 2007/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 2007/Making a function which requires both parameters - before and after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2007/Making a function which requires no parameters in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 2007/Making a function which requires no parameters in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 2007/Making a function which requires no parameters in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2007/Making a function which requires parameter array in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 2007/Making a function which requires parameter array in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 2007/Making a function which requires parameter array in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2007/Making a variable of TValue type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2007/Making a variable of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2007/Multithreading in TCalculator/Using internal automatic thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2007/Multithreading in TCalculator/Using user-defined thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2007/Sample for the first time/MainForm.pas: -------------------------------------------------------------------------------- 1 | unit MainForm; 2 | 3 | interface 4 | 5 | {$B-} 6 | {$I Directives.inc} 7 | 8 | uses 9 | {$IFDEF DELPHI_XE7}WinApi.Windows, WinApi.Messages, {$ELSE}Windows, Messages, 10 | {$ENDIF}SysUtils, Classes, Controls, Forms, StdCtrls, ExtCtrls; 11 | 12 | type 13 | TMain = class(TForm) 14 | bCalculate: TButton; 15 | leInput: TLabeledEdit; 16 | leOutput: TLabeledEdit; 17 | procedure bCalculateClick(Sender: TObject); 18 | end; 19 | 20 | var 21 | Main: TMain; 22 | 23 | implementation 24 | 25 | uses 26 | CalcUtils; 27 | 28 | {$R *.dfm} 29 | 30 | procedure TMain.bCalculateClick(Sender: TObject); 31 | begin 32 | leOutput.Text := AsString(leInput.Text); 33 | end; 34 | 35 | end. 36 | -------------------------------------------------------------------------------- /Samples/Delphi 2007/Sample for the first time/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2007/Speed test of a compiled script execution and optimization mechanizm demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2009/Decompiling demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2009/Extending TField class/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Parse; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2009/Function priority/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2009/High-performance TFastList (TStrings inheritor) test/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2009/List of variables/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | {$B-} 4 | 5 | uses 6 | Calculator, Classes, Dialogs; 7 | 8 | var 9 | Calc: TCalculator; 10 | List: TStrings; 11 | begin 12 | Calc := TCalculator.Create(nil); 13 | try 14 | List := TStringList.Create; 15 | try 16 | List.Add('A = 1 + 2'); 17 | List.Add('B = 3 + 4'); 18 | List.Add('C = A + B'); 19 | Calc.AddVariableList(List); 20 | finally 21 | List.Free; 22 | end; 23 | ShowMessage(Calc.AsString('A + B + C')); 24 | finally 25 | Calc.Free; 26 | end; 27 | end. 28 | -------------------------------------------------------------------------------- /Samples/Delphi 2009/Making a constant of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2009/Making a function managing by its Handle in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 2009/Making a function managing by its Handle in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 2009/Making a function managing by its Handle in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2009/Making a function which require parameter after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 2009/Making a function which require parameter after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 2009/Making a function which require parameter after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2009/Making a function which require parameter before itsel in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 2009/Making a function which require parameter before itsel in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 2009/Making a function which require parameter before itsel in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2009/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 2009/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 2009/Making a function which requires both parameters - before and after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2009/Making a function which requires no parameters in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 2009/Making a function which requires no parameters in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 2009/Making a function which requires no parameters in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2009/Making a function which requires parameter array in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 2009/Making a function which requires parameter array in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 2009/Making a function which requires parameter array in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2009/Making a variable of TValue type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2009/Making a variable of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2009/Multithreading in TCalculator/Using internal automatic thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2009/Multithreading in TCalculator/Using user-defined thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2009/Sample for the first time/MainForm.pas: -------------------------------------------------------------------------------- 1 | unit MainForm; 2 | 3 | interface 4 | 5 | {$B-} 6 | {$I Directives.inc} 7 | 8 | uses 9 | {$IFDEF DELPHI_XE7}WinApi.Windows, WinApi.Messages, {$ELSE}Windows, Messages, 10 | {$ENDIF}SysUtils, Classes, Controls, Forms, StdCtrls, ExtCtrls; 11 | 12 | type 13 | TMain = class(TForm) 14 | bCalculate: TButton; 15 | leInput: TLabeledEdit; 16 | leOutput: TLabeledEdit; 17 | procedure bCalculateClick(Sender: TObject); 18 | end; 19 | 20 | var 21 | Main: TMain; 22 | 23 | implementation 24 | 25 | uses 26 | CalcUtils; 27 | 28 | {$R *.dfm} 29 | 30 | procedure TMain.bCalculateClick(Sender: TObject); 31 | begin 32 | leOutput.Text := AsString(leInput.Text); 33 | end; 34 | 35 | end. 36 | -------------------------------------------------------------------------------- /Samples/Delphi 2009/Sample for the first time/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2009/Speed test of a compiled script execution and optimization mechanizm demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2010/Decompiling demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2010/Extending TField class/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Parse; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2010/Function priority/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2010/High-performance TFastList (TStrings inheritor) test/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2010/List of variables/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | {$B-} 4 | 5 | uses 6 | Calculator, Classes, Dialogs; 7 | 8 | var 9 | Calc: TCalculator; 10 | List: TStrings; 11 | begin 12 | Calc := TCalculator.Create(nil); 13 | try 14 | List := TStringList.Create; 15 | try 16 | List.Add('A = 1 + 2'); 17 | List.Add('B = 3 + 4'); 18 | List.Add('C = A + B'); 19 | Calc.AddVariableList(List); 20 | finally 21 | List.Free; 22 | end; 23 | ShowMessage(Calc.AsString('A + B + C')); 24 | finally 25 | Calc.Free; 26 | end; 27 | end. 28 | -------------------------------------------------------------------------------- /Samples/Delphi 2010/Making a constant of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2010/Making a function managing by its Handle in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 2010/Making a function managing by its Handle in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 2010/Making a function managing by its Handle in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2010/Making a function which require parameter after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 2010/Making a function which require parameter after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 2010/Making a function which require parameter after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2010/Making a function which require parameter before itsel in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 2010/Making a function which require parameter before itsel in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 2010/Making a function which require parameter before itsel in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2010/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 2010/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 2010/Making a function which requires both parameters - before and after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2010/Making a function which requires no parameters in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 2010/Making a function which requires no parameters in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 2010/Making a function which requires no parameters in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2010/Making a function which requires parameter array in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 2010/Making a function which requires parameter array in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 2010/Making a function which requires parameter array in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2010/Making a variable of TValue type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2010/Making a variable of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2010/Multithreading in TCalculator/Using internal automatic thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2010/Multithreading in TCalculator/Using user-defined thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2010/Sample for the first time/MainForm.pas: -------------------------------------------------------------------------------- 1 | unit MainForm; 2 | 3 | interface 4 | 5 | {$B-} 6 | {$I Directives.inc} 7 | 8 | uses 9 | {$IFDEF DELPHI_XE7}WinApi.Windows, WinApi.Messages, {$ELSE}Windows, Messages, 10 | {$ENDIF}SysUtils, Classes, Controls, Forms, StdCtrls, ExtCtrls; 11 | 12 | type 13 | TMain = class(TForm) 14 | bCalculate: TButton; 15 | leInput: TLabeledEdit; 16 | leOutput: TLabeledEdit; 17 | procedure bCalculateClick(Sender: TObject); 18 | end; 19 | 20 | var 21 | Main: TMain; 22 | 23 | implementation 24 | 25 | uses 26 | CalcUtils; 27 | 28 | {$R *.dfm} 29 | 30 | procedure TMain.bCalculateClick(Sender: TObject); 31 | begin 32 | leOutput.Text := AsString(leInput.Text); 33 | end; 34 | 35 | end. 36 | -------------------------------------------------------------------------------- /Samples/Delphi 2010/Sample for the first time/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 2010/Speed test of a compiled script execution and optimization mechanizm demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 6/Building graph in rectangular and polar coordinate systems/GraphBuilder.dof: -------------------------------------------------------------------------------- 1 | [Compiler] 2 | SymbolDeprecated=0 3 | SymbolLibrary=0 4 | SymbolPlatform=0 5 | UnitLibrary=0 6 | UnitPlatform=0 7 | UnitDeprecated=0 8 | UnsafeType=0 9 | UnsafeCode=0 10 | UnsafeCast=0 11 | [Directories] 12 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 6/Building graph in rectangular and polar coordinate systems/GraphBuilder.dpr: -------------------------------------------------------------------------------- 1 | { *********************************************************************** } 2 | { } 3 | { Graph builder } 4 | { } 5 | { Copyright (c) 2016 Pisarev Yuriy (post@pisarev.net) } 6 | { } 7 | { *********************************************************************** } 8 | 9 | program GraphBuilder; 10 | 11 | uses 12 | Forms, 13 | MainForm in 'MainForm.pas' {Main}; 14 | 15 | begin 16 | Application.Initialize; 17 | Application.CreateForm(TMain, Main); 18 | Application.Run; 19 | end. 20 | -------------------------------------------------------------------------------- /Samples/Delphi 6/Decompiling demo/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 6/Decompiling demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 6/Extending TField class/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 6/Extending TField class/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Parse; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 6/Function priority/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 6/Function priority/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 6/High-performance TFastList (TStrings inheritor) test/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 6/High-performance TFastList (TStrings inheritor) test/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 6/List of variables/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 6/List of variables/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | {$B-} 4 | 5 | uses 6 | Calculator, Classes, Dialogs; 7 | 8 | var 9 | Calc: TCalculator; 10 | List: TStrings; 11 | begin 12 | Calc := TCalculator.Create(nil); 13 | try 14 | List := TStringList.Create; 15 | try 16 | List.Add('A = 1 + 2'); 17 | List.Add('B = 3 + 4'); 18 | List.Add('C = A + B'); 19 | Calc.AddVariableList(List); 20 | finally 21 | List.Free; 22 | end; 23 | ShowMessage(Calc.AsString('A + B + C')); 24 | finally 25 | Calc.Free; 26 | end; 27 | end. 28 | -------------------------------------------------------------------------------- /Samples/Delphi 6/Making a constant of simple type in TParser/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 6/Making a constant of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 6/Making a function managing by its Handle in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 6/Making a function managing by its Handle in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 6/Making a function managing by its Handle in TParser/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 6/Making a function managing by its Handle in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 6/Making a function which require parameter after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 6/Making a function which require parameter after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 6/Making a function which require parameter after itself in TParser/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 6/Making a function which require parameter after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 6/Making a function which require parameter before itsel in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 6/Making a function which require parameter before itsel in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 6/Making a function which require parameter before itsel in TParser/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 6/Making a function which require parameter before itsel in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 6/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 6/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 6/Making a function which requires both parameters - before and after itself in TParser/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 6/Making a function which requires both parameters - before and after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 6/Making a function which requires no parameters in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 6/Making a function which requires no parameters in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 6/Making a function which requires no parameters in TParser/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 6/Making a function which requires no parameters in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 6/Making a function which requires parameter array in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 6/Making a function which requires parameter array in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 6/Making a function which requires parameter array in TParser/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 6/Making a function which requires parameter array in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 6/Making a variable in TCalculator/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 6/Making a variable of TValue type in TParser/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 6/Making a variable of TValue type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 6/Making a variable of simple type in TParser/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 6/Making a variable of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 6/Multithreading in TCalculator/Using internal automatic thread/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 6/Multithreading in TCalculator/Using internal automatic thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 6/Multithreading in TCalculator/Using user-defined thread/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 6/Multithreading in TCalculator/Using user-defined thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 6/Sample for the first time/MainForm.pas: -------------------------------------------------------------------------------- 1 | unit MainForm; 2 | 3 | interface 4 | 5 | {$B-} 6 | {$I Directives.inc} 7 | 8 | uses 9 | {$IFDEF DELPHI_XE7}WinApi.Windows, WinApi.Messages, {$ELSE}Windows, Messages, 10 | {$ENDIF}SysUtils, Classes, Controls, Forms, StdCtrls, ExtCtrls; 11 | 12 | type 13 | TMain = class(TForm) 14 | bCalculate: TButton; 15 | leInput: TLabeledEdit; 16 | leOutput: TLabeledEdit; 17 | procedure bCalculateClick(Sender: TObject); 18 | end; 19 | 20 | var 21 | Main: TMain; 22 | 23 | implementation 24 | 25 | uses 26 | CalcUtils; 27 | 28 | {$R *.dfm} 29 | 30 | procedure TMain.bCalculateClick(Sender: TObject); 31 | begin 32 | leOutput.Text := AsString(leInput.Text); 33 | end; 34 | 35 | end. 36 | -------------------------------------------------------------------------------- /Samples/Delphi 6/Sample for the first time/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 6/Sample for the first time/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 6/Speed test of a compiled script execution and optimization mechanizm demo/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 6/Speed test of a compiled script execution and optimization mechanizm demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 7/Building graph in rectangular and polar coordinate systems/GraphBuilder.dof: -------------------------------------------------------------------------------- 1 | [Compiler] 2 | SymbolDeprecated=0 3 | SymbolLibrary=0 4 | SymbolPlatform=0 5 | UnitLibrary=0 6 | UnitPlatform=0 7 | UnitDeprecated=0 8 | UnsafeType=0 9 | UnsafeCode=0 10 | UnsafeCast=0 11 | [Directories] 12 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 7/Building graph in rectangular and polar coordinate systems/GraphBuilder.dpr: -------------------------------------------------------------------------------- 1 | { *********************************************************************** } 2 | { } 3 | { Graph builder } 4 | { } 5 | { Copyright (c) 2016 Pisarev Yuriy (post@pisarev.net) } 6 | { } 7 | { *********************************************************************** } 8 | 9 | program GraphBuilder; 10 | 11 | uses 12 | Forms, 13 | MainForm in 'MainForm.pas' {Main}; 14 | 15 | begin 16 | Application.Initialize; 17 | Application.CreateForm(TMain, Main); 18 | Application.Run; 19 | end. 20 | -------------------------------------------------------------------------------- /Samples/Delphi 7/Decompiling demo/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 7/Decompiling demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 7/Extending TField class/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 7/Extending TField class/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Parse; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 7/Function priority/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 7/Function priority/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 7/High-performance TFastList (TStrings inheritor) test/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 7/High-performance TFastList (TStrings inheritor) test/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 7/List of variables/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 7/List of variables/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | {$B-} 4 | 5 | uses 6 | Calculator, Classes, Dialogs; 7 | 8 | var 9 | Calc: TCalculator; 10 | List: TStrings; 11 | begin 12 | Calc := TCalculator.Create(nil); 13 | try 14 | List := TStringList.Create; 15 | try 16 | List.Add('A = 1 + 2'); 17 | List.Add('B = 3 + 4'); 18 | List.Add('C = A + B'); 19 | Calc.AddVariableList(List); 20 | finally 21 | List.Free; 22 | end; 23 | ShowMessage(Calc.AsString('A + B + C')); 24 | finally 25 | Calc.Free; 26 | end; 27 | end. 28 | -------------------------------------------------------------------------------- /Samples/Delphi 7/Making a constant of simple type in TParser/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 7/Making a constant of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 7/Making a function managing by its Handle in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 7/Making a function managing by its Handle in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 7/Making a function managing by its Handle in TParser/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 7/Making a function managing by its Handle in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 7/Making a function which require parameter after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 7/Making a function which require parameter after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 7/Making a function which require parameter after itself in TParser/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 7/Making a function which require parameter after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 7/Making a function which require parameter before itsel in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 7/Making a function which require parameter before itsel in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 7/Making a function which require parameter before itsel in TParser/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 7/Making a function which require parameter before itsel in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 7/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 7/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 7/Making a function which requires both parameters - before and after itself in TParser/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 7/Making a function which requires both parameters - before and after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 7/Making a function which requires no parameters in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 7/Making a function which requires no parameters in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 7/Making a function which requires no parameters in TParser/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 7/Making a function which requires no parameters in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 7/Making a function which requires parameter array in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi 7/Making a function which requires parameter array in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi 7/Making a function which requires parameter array in TParser/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 7/Making a function which requires parameter array in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 7/Making a variable in TCalculator/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 7/Making a variable of TValue type in TParser/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 7/Making a variable of TValue type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 7/Making a variable of simple type in TParser/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 7/Making a variable of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 7/Multithreading in TCalculator/Using internal automatic thread/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 7/Multithreading in TCalculator/Using internal automatic thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 7/Multithreading in TCalculator/Using user-defined thread/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 7/Multithreading in TCalculator/Using user-defined thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 7/Sample for the first time/MainForm.pas: -------------------------------------------------------------------------------- 1 | unit MainForm; 2 | 3 | interface 4 | 5 | {$B-} 6 | {$I Directives.inc} 7 | 8 | uses 9 | {$IFDEF DELPHI_XE7}WinApi.Windows, WinApi.Messages, {$ELSE}Windows, Messages, 10 | {$ENDIF}SysUtils, Classes, Controls, Forms, StdCtrls, ExtCtrls; 11 | 12 | type 13 | TMain = class(TForm) 14 | bCalculate: TButton; 15 | leInput: TLabeledEdit; 16 | leOutput: TLabeledEdit; 17 | procedure bCalculateClick(Sender: TObject); 18 | end; 19 | 20 | var 21 | Main: TMain; 22 | 23 | implementation 24 | 25 | uses 26 | CalcUtils; 27 | 28 | {$R *.dfm} 29 | 30 | procedure TMain.bCalculateClick(Sender: TObject); 31 | begin 32 | leOutput.Text := AsString(leInput.Text); 33 | end; 34 | 35 | end. 36 | -------------------------------------------------------------------------------- /Samples/Delphi 7/Sample for the first time/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 7/Sample for the first time/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi 7/Speed test of a compiled script execution and optimization mechanizm demo/Sample.dof: -------------------------------------------------------------------------------- 1 | [Directories] 2 | SearchPath=..\..\..\Components -------------------------------------------------------------------------------- /Samples/Delphi 7/Speed test of a compiled script execution and optimization mechanizm demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE/Building graph in rectangular and polar coordinate systems/GraphBuilder.dpr: -------------------------------------------------------------------------------- 1 | { *********************************************************************** } 2 | { } 3 | { Graph builder } 4 | { } 5 | { Copyright (c) 2016 Pisarev Yuriy (post@pisarev.net) } 6 | { } 7 | { *********************************************************************** } 8 | 9 | program GraphBuilder; 10 | 11 | uses 12 | Forms, 13 | MainForm in 'MainForm.pas' {Main}; 14 | 15 | begin 16 | Application.Initialize; 17 | Application.CreateForm(TMain, Main); 18 | Application.Run; 19 | end. 20 | -------------------------------------------------------------------------------- /Samples/Delphi XE/Decompiling demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE/Extending TField class/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Parse; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE/Function priority/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE/High-performance TFastList (TStrings inheritor) test/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE/List of variables/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | {$B-} 4 | 5 | uses 6 | Calculator, Classes, Dialogs; 7 | 8 | var 9 | Calc: TCalculator; 10 | List: TStrings; 11 | begin 12 | Calc := TCalculator.Create(nil); 13 | try 14 | List := TStringList.Create; 15 | try 16 | List.Add('A = 1 + 2'); 17 | List.Add('B = 3 + 4'); 18 | List.Add('C = A + B'); 19 | Calc.AddVariableList(List); 20 | finally 21 | List.Free; 22 | end; 23 | ShowMessage(Calc.AsString('A + B + C')); 24 | finally 25 | Calc.Free; 26 | end; 27 | end. 28 | -------------------------------------------------------------------------------- /Samples/Delphi XE/Making a constant of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE/Making a function managing by its Handle in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE/Making a function managing by its Handle in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE/Making a function managing by its Handle in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE/Making a function which require parameter after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE/Making a function which require parameter after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE/Making a function which require parameter after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE/Making a function which require parameter before itsel in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE/Making a function which require parameter before itsel in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE/Making a function which require parameter before itsel in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE/Making a function which requires both parameters - before and after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE/Making a function which requires no parameters in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE/Making a function which requires no parameters in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE/Making a function which requires no parameters in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE/Making a function which requires parameter array in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE/Making a function which requires parameter array in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE/Making a function which requires parameter array in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE/Making a variable of TValue type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE/Making a variable of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE/Multithreading in TCalculator/Using internal automatic thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE/Multithreading in TCalculator/Using user-defined thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE/Sample for the first time/MainForm.pas: -------------------------------------------------------------------------------- 1 | unit MainForm; 2 | 3 | interface 4 | 5 | {$B-} 6 | {$I Directives.inc} 7 | 8 | uses 9 | {$IFDEF DELPHI_XE7}WinApi.Windows, WinApi.Messages, {$ELSE}Windows, Messages, 10 | {$ENDIF}SysUtils, Classes, Controls, Forms, StdCtrls, ExtCtrls; 11 | 12 | type 13 | TMain = class(TForm) 14 | bCalculate: TButton; 15 | leInput: TLabeledEdit; 16 | leOutput: TLabeledEdit; 17 | procedure bCalculateClick(Sender: TObject); 18 | end; 19 | 20 | var 21 | Main: TMain; 22 | 23 | implementation 24 | 25 | uses 26 | CalcUtils; 27 | 28 | {$R *.dfm} 29 | 30 | procedure TMain.bCalculateClick(Sender: TObject); 31 | begin 32 | leOutput.Text := AsString(leInput.Text); 33 | end; 34 | 35 | end. 36 | -------------------------------------------------------------------------------- /Samples/Delphi XE/Sample for the first time/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE/Speed test of a compiled script execution and optimization mechanizm demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE2/Building graph in rectangular and polar coordinate systems/GraphBuilder.dpr: -------------------------------------------------------------------------------- 1 | { *********************************************************************** } 2 | { } 3 | { Graph builder } 4 | { } 5 | { Copyright (c) 2016 Pisarev Yuriy (post@pisarev.net) } 6 | { } 7 | { *********************************************************************** } 8 | 9 | program GraphBuilder; 10 | 11 | uses 12 | Forms, 13 | MainForm in 'MainForm.pas' {Main}; 14 | 15 | begin 16 | Application.Initialize; 17 | Application.CreateForm(TMain, Main); 18 | Application.Run; 19 | end. 20 | -------------------------------------------------------------------------------- /Samples/Delphi XE2/Decompiling demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE2/Extending TField class/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Parse; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE2/Function priority/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE2/High-performance TFastList (TStrings inheritor) test/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE2/List of variables/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | {$B-} 4 | 5 | uses 6 | Calculator, Classes, Dialogs; 7 | 8 | var 9 | Calc: TCalculator; 10 | List: TStrings; 11 | begin 12 | Calc := TCalculator.Create(nil); 13 | try 14 | List := TStringList.Create; 15 | try 16 | List.Add('A = 1 + 2'); 17 | List.Add('B = 3 + 4'); 18 | List.Add('C = A + B'); 19 | Calc.AddVariableList(List); 20 | finally 21 | List.Free; 22 | end; 23 | ShowMessage(Calc.AsString('A + B + C')); 24 | finally 25 | Calc.Free; 26 | end; 27 | end. 28 | -------------------------------------------------------------------------------- /Samples/Delphi XE2/Making a constant of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE2/Making a function managing by its Handle in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE2/Making a function managing by its Handle in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE2/Making a function managing by its Handle in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE2/Making a function which require parameter after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE2/Making a function which require parameter after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE2/Making a function which require parameter after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE2/Making a function which require parameter before itsel in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE2/Making a function which require parameter before itsel in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE2/Making a function which require parameter before itsel in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE2/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE2/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE2/Making a function which requires both parameters - before and after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE2/Making a function which requires no parameters in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE2/Making a function which requires no parameters in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE2/Making a function which requires no parameters in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE2/Making a function which requires parameter array in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE2/Making a function which requires parameter array in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE2/Making a function which requires parameter array in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE2/Making a variable of TValue type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE2/Making a variable of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE2/Multithreading in TCalculator/Using internal automatic thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE2/Multithreading in TCalculator/Using user-defined thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE2/Sample for the first time/MainForm.pas: -------------------------------------------------------------------------------- 1 | unit MainForm; 2 | 3 | interface 4 | 5 | {$B-} 6 | {$I Directives.inc} 7 | 8 | uses 9 | {$IFDEF DELPHI_XE7}WinApi.Windows, WinApi.Messages, {$ELSE}Windows, Messages, 10 | {$ENDIF}SysUtils, Classes, Controls, Forms, StdCtrls, ExtCtrls; 11 | 12 | type 13 | TMain = class(TForm) 14 | bCalculate: TButton; 15 | leInput: TLabeledEdit; 16 | leOutput: TLabeledEdit; 17 | procedure bCalculateClick(Sender: TObject); 18 | end; 19 | 20 | var 21 | Main: TMain; 22 | 23 | implementation 24 | 25 | uses 26 | CalcUtils; 27 | 28 | {$R *.dfm} 29 | 30 | procedure TMain.bCalculateClick(Sender: TObject); 31 | begin 32 | leOutput.Text := AsString(leInput.Text); 33 | end; 34 | 35 | end. 36 | -------------------------------------------------------------------------------- /Samples/Delphi XE2/Sample for the first time/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE2/Speed test of a compiled script execution and optimization mechanizm demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE3/Building graph in rectangular and polar coordinate systems/GraphBuilder.dpr: -------------------------------------------------------------------------------- 1 | { *********************************************************************** } 2 | { } 3 | { Graph builder } 4 | { } 5 | { Copyright (c) 2016 Pisarev Yuriy (post@pisarev.net) } 6 | { } 7 | { *********************************************************************** } 8 | 9 | program GraphBuilder; 10 | 11 | uses 12 | Forms, 13 | MainForm in 'MainForm.pas' {Main}; 14 | 15 | begin 16 | Application.Initialize; 17 | Application.CreateForm(TMain, Main); 18 | Application.Run; 19 | end. 20 | -------------------------------------------------------------------------------- /Samples/Delphi XE3/Decompiling demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE3/Extending TField class/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Parse; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE3/Function priority/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE3/High-performance TFastList (TStrings inheritor) test/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE3/List of variables/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | {$B-} 4 | 5 | uses 6 | Calculator, Classes, Dialogs; 7 | 8 | var 9 | Calc: TCalculator; 10 | List: TStrings; 11 | begin 12 | Calc := TCalculator.Create(nil); 13 | try 14 | List := TStringList.Create; 15 | try 16 | List.Add('A = 1 + 2'); 17 | List.Add('B = 3 + 4'); 18 | List.Add('C = A + B'); 19 | Calc.AddVariableList(List); 20 | finally 21 | List.Free; 22 | end; 23 | ShowMessage(Calc.AsString('A + B + C')); 24 | finally 25 | Calc.Free; 26 | end; 27 | end. 28 | -------------------------------------------------------------------------------- /Samples/Delphi XE3/Making a constant of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE3/Making a function managing by its Handle in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE3/Making a function managing by its Handle in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE3/Making a function managing by its Handle in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE3/Making a function which require parameter after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE3/Making a function which require parameter after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE3/Making a function which require parameter after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE3/Making a function which require parameter before itsel in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE3/Making a function which require parameter before itsel in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE3/Making a function which require parameter before itsel in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE3/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE3/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE3/Making a function which requires both parameters - before and after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE3/Making a function which requires no parameters in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE3/Making a function which requires no parameters in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE3/Making a function which requires no parameters in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE3/Making a function which requires parameter array in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE3/Making a function which requires parameter array in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE3/Making a function which requires parameter array in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE3/Making a variable of TValue type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE3/Making a variable of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE3/Multithreading in TCalculator/Using internal automatic thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE3/Multithreading in TCalculator/Using user-defined thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE3/Sample for the first time/MainForm.pas: -------------------------------------------------------------------------------- 1 | unit MainForm; 2 | 3 | interface 4 | 5 | {$B-} 6 | {$I Directives.inc} 7 | 8 | uses 9 | {$IFDEF DELPHI_XE7}WinApi.Windows, WinApi.Messages, {$ELSE}Windows, Messages, 10 | {$ENDIF}SysUtils, Classes, Controls, Forms, StdCtrls, ExtCtrls; 11 | 12 | type 13 | TMain = class(TForm) 14 | bCalculate: TButton; 15 | leInput: TLabeledEdit; 16 | leOutput: TLabeledEdit; 17 | procedure bCalculateClick(Sender: TObject); 18 | end; 19 | 20 | var 21 | Main: TMain; 22 | 23 | implementation 24 | 25 | uses 26 | CalcUtils; 27 | 28 | {$R *.dfm} 29 | 30 | procedure TMain.bCalculateClick(Sender: TObject); 31 | begin 32 | leOutput.Text := AsString(leInput.Text); 33 | end; 34 | 35 | end. 36 | -------------------------------------------------------------------------------- /Samples/Delphi XE3/Sample for the first time/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE3/Speed test of a compiled script execution and optimization mechanizm demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE4/Building graph in rectangular and polar coordinate systems/GraphBuilder.dpr: -------------------------------------------------------------------------------- 1 | { *********************************************************************** } 2 | { } 3 | { Graph builder } 4 | { } 5 | { Copyright (c) 2016 Pisarev Yuriy (post@pisarev.net) } 6 | { } 7 | { *********************************************************************** } 8 | 9 | program GraphBuilder; 10 | 11 | uses 12 | Forms, 13 | MainForm in 'MainForm.pas' {Main}; 14 | 15 | begin 16 | Application.Initialize; 17 | Application.CreateForm(TMain, Main); 18 | Application.Run; 19 | end. 20 | -------------------------------------------------------------------------------- /Samples/Delphi XE4/Decompiling demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE4/Function priority/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE4/High-performance TFastList (TStrings inheritor) test/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE4/List of variables/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | {$B-} 4 | 5 | uses 6 | Calculator, Classes, Dialogs; 7 | 8 | var 9 | Calc: TCalculator; 10 | List: TStrings; 11 | begin 12 | Calc := TCalculator.Create(nil); 13 | try 14 | List := TStringList.Create; 15 | try 16 | List.Add('A = 1 + 2'); 17 | List.Add('B = 3 + 4'); 18 | List.Add('C = A + B'); 19 | Calc.AddVariableList(List); 20 | finally 21 | List.Free; 22 | end; 23 | ShowMessage(Calc.AsString('A + B + C')); 24 | finally 25 | Calc.Free; 26 | end; 27 | end. 28 | -------------------------------------------------------------------------------- /Samples/Delphi XE4/Making a constant of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE4/Making a function managing by its Handle in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE4/Making a function managing by its Handle in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE4/Making a function managing by its Handle in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE4/Making a function which require parameter after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE4/Making a function which require parameter after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE4/Making a function which require parameter after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE4/Making a function which require parameter before itsel in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE4/Making a function which require parameter before itsel in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE4/Making a function which require parameter before itsel in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE4/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE4/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE4/Making a function which requires both parameters - before and after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE4/Making a function which requires no parameters in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE4/Making a function which requires no parameters in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE4/Making a function which requires no parameters in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE4/Making a function which requires parameter array in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE4/Making a function which requires parameter array in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE4/Making a function which requires parameter array in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE4/Making a variable of TValue type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE4/Making a variable of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE4/Multithreading in TCalculator/Using internal automatic thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE4/Multithreading in TCalculator/Using user-defined thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE4/Sample for the first time/MainForm.pas: -------------------------------------------------------------------------------- 1 | unit MainForm; 2 | 3 | interface 4 | 5 | {$B-} 6 | {$I Directives.inc} 7 | 8 | uses 9 | {$IFDEF DELPHI_XE7}WinApi.Windows, WinApi.Messages, {$ELSE}Windows, Messages, 10 | {$ENDIF}SysUtils, Classes, Controls, Forms, StdCtrls, ExtCtrls; 11 | 12 | type 13 | TMain = class(TForm) 14 | bCalculate: TButton; 15 | leInput: TLabeledEdit; 16 | leOutput: TLabeledEdit; 17 | procedure bCalculateClick(Sender: TObject); 18 | end; 19 | 20 | var 21 | Main: TMain; 22 | 23 | implementation 24 | 25 | uses 26 | CalcUtils; 27 | 28 | {$R *.dfm} 29 | 30 | procedure TMain.bCalculateClick(Sender: TObject); 31 | begin 32 | leOutput.Text := AsString(leInput.Text); 33 | end; 34 | 35 | end. 36 | -------------------------------------------------------------------------------- /Samples/Delphi XE4/Sample for the first time/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE4/Speed test of a compiled script execution and optimization mechanizm demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE5/Building graph in rectangular and polar coordinate systems/GraphBuilder.dpr: -------------------------------------------------------------------------------- 1 | { *********************************************************************** } 2 | { } 3 | { Graph builder } 4 | { } 5 | { Copyright (c) 2016 Pisarev Yuriy (post@pisarev.net) } 6 | { } 7 | { *********************************************************************** } 8 | 9 | program GraphBuilder; 10 | 11 | uses 12 | Forms, 13 | MainForm in 'MainForm.pas' {Main}; 14 | 15 | begin 16 | Application.Initialize; 17 | Application.CreateForm(TMain, Main); 18 | Application.Run; 19 | end. 20 | -------------------------------------------------------------------------------- /Samples/Delphi XE5/Decompiling demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE5/Function priority/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE5/High-performance TFastList (TStrings inheritor) test/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE5/List of variables/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | {$B-} 4 | 5 | uses 6 | Calculator, Classes, Dialogs; 7 | 8 | var 9 | Calc: TCalculator; 10 | List: TStrings; 11 | begin 12 | Calc := TCalculator.Create(nil); 13 | try 14 | List := TStringList.Create; 15 | try 16 | List.Add('A = 1 + 2'); 17 | List.Add('B = 3 + 4'); 18 | List.Add('C = A + B'); 19 | Calc.AddVariableList(List); 20 | finally 21 | List.Free; 22 | end; 23 | ShowMessage(Calc.AsString('A + B + C')); 24 | finally 25 | Calc.Free; 26 | end; 27 | end. 28 | -------------------------------------------------------------------------------- /Samples/Delphi XE5/Making a constant of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE5/Making a function managing by its Handle in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE5/Making a function managing by its Handle in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE5/Making a function managing by its Handle in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE5/Making a function which require parameter after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE5/Making a function which require parameter after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE5/Making a function which require parameter after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE5/Making a function which require parameter before itsel in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE5/Making a function which require parameter before itsel in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE5/Making a function which require parameter before itsel in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE5/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE5/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE5/Making a function which requires both parameters - before and after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE5/Making a function which requires no parameters in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE5/Making a function which requires no parameters in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE5/Making a function which requires no parameters in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE5/Making a function which requires parameter array in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE5/Making a function which requires parameter array in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE5/Making a function which requires parameter array in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE5/Making a variable of TValue type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE5/Making a variable of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE5/Multithreading in TCalculator/Using internal automatic thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE5/Multithreading in TCalculator/Using user-defined thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE5/Sample for the first time/MainForm.pas: -------------------------------------------------------------------------------- 1 | unit MainForm; 2 | 3 | interface 4 | 5 | {$B-} 6 | {$I Directives.inc} 7 | 8 | uses 9 | {$IFDEF DELPHI_XE7}WinApi.Windows, WinApi.Messages, {$ELSE}Windows, Messages, 10 | {$ENDIF}SysUtils, Classes, Controls, Forms, StdCtrls, ExtCtrls; 11 | 12 | type 13 | TMain = class(TForm) 14 | bCalculate: TButton; 15 | leInput: TLabeledEdit; 16 | leOutput: TLabeledEdit; 17 | procedure bCalculateClick(Sender: TObject); 18 | end; 19 | 20 | var 21 | Main: TMain; 22 | 23 | implementation 24 | 25 | uses 26 | CalcUtils; 27 | 28 | {$R *.dfm} 29 | 30 | procedure TMain.bCalculateClick(Sender: TObject); 31 | begin 32 | leOutput.Text := AsString(leInput.Text); 33 | end; 34 | 35 | end. 36 | -------------------------------------------------------------------------------- /Samples/Delphi XE5/Sample for the first time/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE5/Speed test of a compiled script execution and optimization mechanizm demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE6/Building graph in rectangular and polar coordinate systems/GraphBuilder.dpr: -------------------------------------------------------------------------------- 1 | { *********************************************************************** } 2 | { } 3 | { Graph builder } 4 | { } 5 | { Copyright (c) 2016 Pisarev Yuriy (post@pisarev.net) } 6 | { } 7 | { *********************************************************************** } 8 | 9 | program GraphBuilder; 10 | 11 | uses 12 | Forms, 13 | MainForm in 'MainForm.pas' {Main}; 14 | 15 | begin 16 | Application.Initialize; 17 | Application.CreateForm(TMain, Main); 18 | Application.Run; 19 | end. 20 | -------------------------------------------------------------------------------- /Samples/Delphi XE6/Decompiling demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE6/Function priority/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE6/High-performance TFastList (TStrings inheritor) test/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE6/List of variables/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | {$B-} 4 | 5 | uses 6 | Calculator, Classes, Dialogs; 7 | 8 | var 9 | Calc: TCalculator; 10 | List: TStrings; 11 | begin 12 | Calc := TCalculator.Create(nil); 13 | try 14 | List := TStringList.Create; 15 | try 16 | List.Add('A = 1 + 2'); 17 | List.Add('B = 3 + 4'); 18 | List.Add('C = A + B'); 19 | Calc.AddVariableList(List); 20 | finally 21 | List.Free; 22 | end; 23 | ShowMessage(Calc.AsString('A + B + C')); 24 | finally 25 | Calc.Free; 26 | end; 27 | end. 28 | -------------------------------------------------------------------------------- /Samples/Delphi XE6/Making a constant of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE6/Making a function managing by its Handle in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE6/Making a function managing by its Handle in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE6/Making a function managing by its Handle in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE6/Making a function which require parameter after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE6/Making a function which require parameter after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE6/Making a function which require parameter after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE6/Making a function which require parameter before itsel in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE6/Making a function which require parameter before itsel in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE6/Making a function which require parameter before itsel in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE6/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE6/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE6/Making a function which requires both parameters - before and after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE6/Making a function which requires no parameters in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE6/Making a function which requires no parameters in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE6/Making a function which requires no parameters in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE6/Making a function which requires parameter array in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE6/Making a function which requires parameter array in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE6/Making a function which requires parameter array in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE6/Making a variable of TValue type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE6/Making a variable of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE6/Multithreading in TCalculator/Using internal automatic thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE6/Multithreading in TCalculator/Using user-defined thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE6/Sample for the first time/MainForm.pas: -------------------------------------------------------------------------------- 1 | unit MainForm; 2 | 3 | interface 4 | 5 | {$B-} 6 | {$I Directives.inc} 7 | 8 | uses 9 | {$IFDEF DELPHI_XE7}WinApi.Windows, WinApi.Messages, {$ELSE}Windows, Messages, 10 | {$ENDIF}SysUtils, Classes, Controls, Forms, StdCtrls, ExtCtrls; 11 | 12 | type 13 | TMain = class(TForm) 14 | bCalculate: TButton; 15 | leInput: TLabeledEdit; 16 | leOutput: TLabeledEdit; 17 | procedure bCalculateClick(Sender: TObject); 18 | end; 19 | 20 | var 21 | Main: TMain; 22 | 23 | implementation 24 | 25 | uses 26 | CalcUtils; 27 | 28 | {$R *.dfm} 29 | 30 | procedure TMain.bCalculateClick(Sender: TObject); 31 | begin 32 | leOutput.Text := AsString(leInput.Text); 33 | end; 34 | 35 | end. 36 | -------------------------------------------------------------------------------- /Samples/Delphi XE6/Sample for the first time/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE6/Speed test of a compiled script execution and optimization mechanizm demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE7/Building graph in rectangular and polar coordinate systems/GraphBuilder.dpr: -------------------------------------------------------------------------------- 1 | { *********************************************************************** } 2 | { } 3 | { Graph builder } 4 | { } 5 | { Copyright (c) 2016 Pisarev Yuriy (post@pisarev.net) } 6 | { } 7 | { *********************************************************************** } 8 | 9 | program GraphBuilder; 10 | 11 | uses 12 | Forms, 13 | MainForm in 'MainForm.pas' {Main}; 14 | 15 | begin 16 | Application.Initialize; 17 | Application.CreateForm(TMain, Main); 18 | Application.Run; 19 | end. 20 | -------------------------------------------------------------------------------- /Samples/Delphi XE7/Decompiling demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE7/Function priority/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE7/High-performance TFastList (TStrings inheritor) test/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE7/List of variables/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | {$B-} 4 | 5 | uses 6 | Calculator, Classes, Dialogs; 7 | 8 | var 9 | Calc: TCalculator; 10 | List: TStrings; 11 | begin 12 | Calc := TCalculator.Create(nil); 13 | try 14 | List := TStringList.Create; 15 | try 16 | List.Add('A = 1 + 2'); 17 | List.Add('B = 3 + 4'); 18 | List.Add('C = A + B'); 19 | Calc.AddVariableList(List); 20 | finally 21 | List.Free; 22 | end; 23 | ShowMessage(Calc.AsString('A + B + C')); 24 | finally 25 | Calc.Free; 26 | end; 27 | end. 28 | -------------------------------------------------------------------------------- /Samples/Delphi XE7/Making a constant of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE7/Making a function managing by its Handle in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE7/Making a function managing by its Handle in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE7/Making a function managing by its Handle in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE7/Making a function which require parameter after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE7/Making a function which require parameter after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE7/Making a function which require parameter after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE7/Making a function which require parameter before itsel in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE7/Making a function which require parameter before itsel in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE7/Making a function which require parameter before itsel in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE7/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE7/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE7/Making a function which requires both parameters - before and after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE7/Making a function which requires no parameters in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE7/Making a function which requires no parameters in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE7/Making a function which requires no parameters in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE7/Making a function which requires parameter array in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE7/Making a function which requires parameter array in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE7/Making a function which requires parameter array in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE7/Making a variable of TValue type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE7/Making a variable of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE7/Multithreading in TCalculator/Using internal automatic thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE7/Multithreading in TCalculator/Using user-defined thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE7/Sample for the first time/MainForm.pas: -------------------------------------------------------------------------------- 1 | unit MainForm; 2 | 3 | interface 4 | 5 | {$B-} 6 | {$I Directives.inc} 7 | 8 | uses 9 | {$IFDEF DELPHI_XE7}WinApi.Windows, WinApi.Messages, {$ELSE}Windows, Messages, 10 | {$ENDIF}SysUtils, Classes, Controls, Forms, StdCtrls, ExtCtrls; 11 | 12 | type 13 | TMain = class(TForm) 14 | bCalculate: TButton; 15 | leInput: TLabeledEdit; 16 | leOutput: TLabeledEdit; 17 | procedure bCalculateClick(Sender: TObject); 18 | end; 19 | 20 | var 21 | Main: TMain; 22 | 23 | implementation 24 | 25 | uses 26 | CalcUtils; 27 | 28 | {$R *.dfm} 29 | 30 | procedure TMain.bCalculateClick(Sender: TObject); 31 | begin 32 | leOutput.Text := AsString(leInput.Text); 33 | end; 34 | 35 | end. 36 | -------------------------------------------------------------------------------- /Samples/Delphi XE7/Sample for the first time/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE7/Speed test of a compiled script execution and optimization mechanizm demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE8/Building graph in rectangular and polar coordinate systems/GraphBuilder.dpr: -------------------------------------------------------------------------------- 1 | { *********************************************************************** } 2 | { } 3 | { Graph builder } 4 | { } 5 | { Copyright (c) 2016 Pisarev Yuriy (post@pisarev.net) } 6 | { } 7 | { *********************************************************************** } 8 | 9 | program GraphBuilder; 10 | 11 | uses 12 | Forms, 13 | MainForm in 'MainForm.pas' {Main}; 14 | 15 | begin 16 | Application.Initialize; 17 | Application.CreateForm(TMain, Main); 18 | Application.Run; 19 | end. 20 | -------------------------------------------------------------------------------- /Samples/Delphi XE8/Decompiling demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE8/Function priority/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE8/High-performance TFastList (TStrings inheritor) test/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE8/List of variables/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | {$B-} 4 | 5 | uses 6 | Calculator, Classes, Dialogs; 7 | 8 | var 9 | Calc: TCalculator; 10 | List: TStrings; 11 | begin 12 | Calc := TCalculator.Create(nil); 13 | try 14 | List := TStringList.Create; 15 | try 16 | List.Add('A = 1 + 2'); 17 | List.Add('B = 3 + 4'); 18 | List.Add('C = A + B'); 19 | Calc.AddVariableList(List); 20 | finally 21 | List.Free; 22 | end; 23 | ShowMessage(Calc.AsString('A + B + C')); 24 | finally 25 | Calc.Free; 26 | end; 27 | end. 28 | -------------------------------------------------------------------------------- /Samples/Delphi XE8/Making a constant of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE8/Making a function managing by its Handle in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE8/Making a function managing by its Handle in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE8/Making a function managing by its Handle in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE8/Making a function which require parameter after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE8/Making a function which require parameter after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE8/Making a function which require parameter after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE8/Making a function which require parameter before itsel in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE8/Making a function which require parameter before itsel in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE8/Making a function which require parameter before itsel in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE8/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE8/Making a function which requires both parameters - before and after itself in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE8/Making a function which requires both parameters - before and after itself in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE8/Making a function which requires no parameters in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE8/Making a function which requires no parameters in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE8/Making a function which requires no parameters in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE8/Making a function which requires parameter array in TParser/MainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/Samples/Delphi XE8/Making a function which requires parameter array in TParser/MainForm.pas -------------------------------------------------------------------------------- /Samples/Delphi XE8/Making a function which requires parameter array in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE8/Making a variable of TValue type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE8/Making a variable of simple type in TParser/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE8/Multithreading in TCalculator/Using internal automatic thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE8/Multithreading in TCalculator/Using user-defined thread/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE8/Sample for the first time/MainForm.pas: -------------------------------------------------------------------------------- 1 | unit MainForm; 2 | 3 | interface 4 | 5 | {$B-} 6 | {$I Directives.inc} 7 | 8 | uses 9 | {$IFDEF DELPHI_XE7}WinApi.Windows, WinApi.Messages, {$ELSE}Windows, Messages, 10 | {$ENDIF}SysUtils, Classes, Controls, Forms, StdCtrls, ExtCtrls; 11 | 12 | type 13 | TMain = class(TForm) 14 | bCalculate: TButton; 15 | leInput: TLabeledEdit; 16 | leOutput: TLabeledEdit; 17 | procedure bCalculateClick(Sender: TObject); 18 | end; 19 | 20 | var 21 | Main: TMain; 22 | 23 | implementation 24 | 25 | uses 26 | CalcUtils; 27 | 28 | {$R *.dfm} 29 | 30 | procedure TMain.bCalculateClick(Sender: TObject); 31 | begin 32 | leOutput.Text := AsString(leInput.Text); 33 | end; 34 | 35 | end. 36 | -------------------------------------------------------------------------------- /Samples/Delphi XE8/Sample for the first time/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /Samples/Delphi XE8/Speed test of a compiled script execution and optimization mechanizm demo/Sample.dpr: -------------------------------------------------------------------------------- 1 | program Sample; 2 | 3 | uses 4 | Forms, 5 | MainForm in 'MainForm.pas' {Main}; 6 | 7 | begin 8 | Application.Initialize; 9 | Application.CreateForm(TMain, Main); 10 | Application.Run; 11 | end. 12 | -------------------------------------------------------------------------------- /image/image001.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/image/image001.png -------------------------------------------------------------------------------- /image/image002.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/image/image002.png -------------------------------------------------------------------------------- /image/image003.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/image/image003.png -------------------------------------------------------------------------------- /image/image004.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/image/image004.png -------------------------------------------------------------------------------- /image/image005.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/image/image005.png -------------------------------------------------------------------------------- /image/image006.gif: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/image/image006.gif -------------------------------------------------------------------------------- /image/image007.gif: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/image/image007.gif -------------------------------------------------------------------------------- /image/image008.gif: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/image/image008.gif -------------------------------------------------------------------------------- /image/image009.gif: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/image/image009.gif -------------------------------------------------------------------------------- /readme.html: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/alexmerkel/mathparser/36adbd9f1ffb837a7cb4908ece96114de7d55a75/readme.html --------------------------------------------------------------------------------