├── .github └── ISSUE_TEMPLATE │ ├── bug_report.md │ └── feature_request.md ├── .gitignore ├── API ├── Android │ ├── uAndroidOperatingSystem.pas │ └── uAndroidSystemMemory.pas └── Windows │ ├── uDriveInfo.pas │ ├── uDrives.pas │ ├── uErrorCodeToStr.pas │ ├── uWMPowerToString.pas │ ├── uWindowsCPU.pas │ ├── uWindowsManagementInstrumentation.pas │ ├── uWindowsOperatingSystem.pas │ ├── uWindowsPowerRequest.pas │ └── uWindowsSystemMemory.pas ├── ApplicationModule ├── uApplicationModule.pas ├── uApplicationModuleManager.pas ├── uApplicationModuleThread.pas ├── uBrokenApplicationModule.pas ├── uCorrectApplicationModule.pas ├── uDelayedApplicationModule.pas └── uWebUpdateApplicationModule.pas ├── Arguments ├── uArguments.pas ├── uArgumentsForTest.pas ├── uArgumentsTest.pas ├── uButtonArgument.pas ├── uByteArgument.pas ├── uColorArgument.pas ├── uComboArgument.pas ├── uCustomArgument.pas ├── uDefaultArguments.pas ├── uDirectoryArgument.pas ├── uFileNameArgument.pas ├── uNumericArgument.pas ├── uNumericArrayArgument.pas ├── uNumericalIntervalArgument.pas ├── uStringArgument.pas ├── uStringArrayArgument.pas ├── uSwitchArgument.pas └── uTimeArgument.pas ├── Benchmark ├── uBenchmark.pas ├── uCalculationBenchmark.pas ├── uDiskBenchmark.pas ├── uFibonacciBenchmark.pas ├── uHardwareBenchmark.pas └── uMemoryBenchmark.pas ├── Commands ├── uAboutCommand.pas ├── uCommands.pas ├── uCustomCommand.pas ├── uDefaultCommands.pas ├── uExitCommand.pas ├── uHelpCommand.pas ├── uRestartCommand.pas ├── uShowFileCommand.pas ├── uSimpleCommand.pas ├── uStateCommand.pas ├── uSystemInfoCommand.pas └── uUnsupportedCommand.pas ├── Configure IDE ├── -autoconf.cmd ├── AdjustObjectInspectorFont.pas ├── SxConfDelphi.exe ├── autoconf.cmd ├── bpl.txt └── lib.txt ├── Console ├── uCodePage.pas ├── uConsole.pas ├── uConsoleColor.pas ├── uConsoleCustomTheme.pas ├── uConsoleDarkTheme.pas ├── uConsoleGrayscaleTheme.pas ├── uConsoleOutputInfo.pas ├── uConsoleTable.pas ├── uCustomConsole.pas ├── uGUIConsole.pas ├── uSimpleConsole.pas ├── uWindowsConsole.pas ├── ufConsole.fmx └── ufConsole.pas ├── Core ├── Find.inc ├── Sort.inc ├── SortS.inc ├── StrToNum.inc ├── uApplicationStatistics.pas ├── uBackup.pas ├── uBackupTest.pas ├── uBlur.pas ├── uBookmark.pas ├── uBrowserBookmarks.pas ├── uBuildConfiguration.pas ├── uChar.pas ├── uCharTable.pas ├── uCharset.pas ├── uCharsetTest.pas ├── uCommonOutput.pas ├── uCommonOutputFormat.pas ├── uComparableList.pas ├── uCompare.pas ├── uCompareTest.pas ├── uCompatibility.pas ├── uContinuousStatistics.pas ├── uCrypt.pas ├── uCustomOperatingSystem.pas ├── uCustomPowerRequest.pas ├── uCustomWriter.pas ├── uCyclicRedundancyCheck.pas ├── uCyclicRedundancyCheckTest.pas ├── uDFile.pas ├── uData.pas ├── uDatas.pas ├── uDelayedCall.pas ├── uDelete.pas ├── uDictionary.pas ├── uDistanceFormater.pas ├── uDivideSpace.pas ├── uDivideSpaceOptions.pas ├── uDivideSpaceTest.pas ├── uEExternalApplication.pas ├── uEIOException.pas ├── uEParseError.pas ├── uEReadFileException.pas ├── uETimeOutException.pas ├── uEnglishFormatSettings.pas ├── uEnumReader.pas ├── uEscape.pas ├── uEscapeTest.pas ├── uFileFactory.pas ├── uFileList.pas ├── uFind.pas ├── uFindTest.pas ├── uFolder.pas ├── uFormal.pas ├── uHTML.pas ├── uHammingDistance.pas ├── uHashTable.pas ├── uImageResolution.pas ├── uInputFormat.pas ├── uIntToHex.pas ├── uIntegerList.pas ├── uIntegerListTest.pas ├── uInterator.pas ├── uLapStopwatch.pas ├── uLevenshteinDistance.pas ├── uLink.pas ├── uLocaleFormatSettings.pas ├── uLocaleOutputFormat.pas ├── uLockDir.pas ├── uMainTimer.pas ├── uMainTimerTest.pas ├── uMath.pas ├── uMathTest.pas ├── uMatrix.pas ├── uMeasureUnits.pas ├── uMessageLevel.pas ├── uMsg.pas ├── uNProjectVersion.pas ├── uNamedObject.pas ├── uNegativeNumberFormat.pas ├── uNetworkStatus.pas ├── uNumberFormater.pas ├── uObjectFactory.pas ├── uObjectFactoryTest.pas ├── uOperatingSystem.pas ├── uOptions.pas ├── uOutputFormat.pas ├── uOutputFormatTest.pas ├── uOutputInfo.pas ├── uPermutation.pas ├── uPermutationList.pas ├── uPermutationTest.pas ├── uPlugin.pas ├── uPowerRequest.pas ├── uProcessInfos.pas ├── uProcessMemory.pas ├── uProjectInfo.pas ├── uProjectVersion.pas ├── uRatioValue.pas ├── uReadImageProperties.pas ├── uRect.pas ├── uRelativeFileId.pas ├── uSchedule.pas ├── uSortVariant.pas ├── uSorts.pas ├── uStack.pas ├── uStartState.pas ├── uStartupEnvironment.pas ├── uStartupEnvironmentTest.pas ├── uStartupWindowState.pas ├── uStopwatch.pas ├── uStopwatchTest.pas ├── uStrings.pas ├── uStringsTest.pas ├── uSxAction.pas ├── uSxMSXMLDocument.pas ├── uSxObjectList.pas ├── uSxObjectListTest.pas ├── uSxService.pas ├── uSxStringList.pas ├── uSxStringListTest.pas ├── uSxXMLDocument.pas ├── uSynchro.pas ├── uSynchroReport.pas ├── uTask.pas ├── uTemporaryDirectory.pas ├── uTextAlignment.pas ├── uTextFilter.pas ├── uTextLines.pas ├── uTextMacro.pas ├── uTextMacroTest.pas ├── uTicks.pas ├── uTicksTest.pas ├── uTimeInterval.pas ├── uTimeSpan.pas ├── uToHTML.pas ├── uTransformation.pas ├── uTransient.pas ├── uTypes.pas ├── uURL.pas ├── uUndo.pas ├── uUndoRedo.pas ├── uUnicodeChar.pas ├── uUsageInfo.pas ├── uUsageInfoTest.pas ├── uVariant.pas ├── uVector.pas └── uWHRect.pas ├── Delphi IDE ├── uAsyncTaskForProjectOptionsTest.pas ├── uDelphi.pas ├── uDelphiTest.pas ├── uProjectOptions.pas ├── uProjectOptionsTest.pas └── uRegToCfg.pas ├── Executable ├── ReadMe.txt ├── uCommandConsoleApplication.pas ├── uCommonApplication.pas ├── uConsoleApplication.pas ├── uConsoleReader.pas ├── uConsoleSplashScreen.pas ├── uCustomSplashScreen.pas ├── uDUnitApplication.pas ├── uDUnitXApplication.pas ├── uDynamicLinkLibrary.pas ├── uFirst.pas ├── uLargeAddressAware.pas └── uUIApplication.pas ├── ExtLib ├── AltGrCrash.pas ├── ColorMatchingFunctions.pas ├── CoolTrayIcon │ ├── CoolTrayIcon.bdsproj │ ├── CoolTrayIcon.chm │ ├── CoolTrayIcon.dcr │ ├── CoolTrayIcon.dof │ ├── CoolTrayIcon.dpk │ ├── CoolTrayIcon.dproj │ ├── CoolTrayIcon.pas │ ├── RegisterTrayIcons.pas │ ├── SimpleTimer.pas │ ├── TextTrayIcon.dcr │ ├── TextTrayIcon.pas │ ├── convert_cti_projects.txt │ ├── convert_st_projects.txt │ ├── demos.txt │ ├── docs │ │ ├── CoolTrayIcon.html │ │ ├── DEMOS.TXT │ │ ├── History - CoolTrayIcon.txt │ │ ├── History - SimpleTimer.txt │ │ ├── History - TextTrayIcon.txt │ │ ├── SimpleTimer.html │ │ └── TextTrayIcon.html │ ├── install.txt │ └── readme.txt ├── DCPCrypt │ ├── Ciphers │ │ ├── DCPblowfish.inc │ │ ├── DCPblowfish.pas │ │ ├── DCPcast128.inc │ │ ├── DCPcast128.pas │ │ ├── DCPcast256.inc │ │ ├── DCPcast256.pas │ │ ├── DCPdes.inc │ │ ├── DCPdes.pas │ │ ├── DCPgost.inc │ │ ├── DCPgost.pas │ │ ├── DCPice.pas │ │ ├── DCPidea.pas │ │ ├── DCPmars.inc │ │ ├── DCPmars.pas │ │ ├── DCPmisty1.inc │ │ ├── DCPmisty1.pas │ │ ├── DCPrc2.inc │ │ ├── DCPrc2.pas │ │ ├── DCPrc4.pas │ │ ├── DCPrc5.pas │ │ ├── DCPrc6.pas │ │ ├── DCPrijndael.inc │ │ ├── DCPrijndael.pas │ │ ├── DCPserpent.pas │ │ ├── DCPtea.pas │ │ ├── DCPtwofish.inc │ │ └── DCPtwofish.pas │ ├── DCPbase64.pas │ ├── DCPblockciphers.pas │ ├── DCPciphers.dcr │ ├── DCPconst.pas │ ├── DCPcppbuilder5.bpk │ ├── DCPcppbuilder5.cpp │ ├── DCPcrypt2.pas │ ├── DCPdelphi4.dof │ ├── DCPdelphi4.dpk │ ├── DCPdelphi5.dof │ ├── DCPdelphi5.dpk │ ├── DCPdelphi6.dof │ ├── DCPdelphi6.dpk │ ├── DCPdelphi6.dproj │ ├── DCPdelphi6_Icon.ico │ ├── DCPdelphi6_Icon1.ico │ ├── DCPdelphi6_Icon2.ico │ ├── DCPhashes.dcr │ ├── DCPkylix.conf │ ├── DCPkylix.dpk │ ├── DCPkylix.dproj │ ├── DCPreg.pas │ ├── Docs │ │ ├── BlockCiphers.html │ │ ├── Ciphers.html │ │ ├── Hashes.html │ │ ├── Index.html │ │ ├── MIT_license.txt │ │ └── osi-certified-120x100.png │ ├── Hashes │ │ ├── DCPhaval.pas │ │ ├── DCPhaval3.inc │ │ ├── DCPhaval4.inc │ │ ├── DCPhaval5.inc │ │ ├── DCPmd4.pas │ │ ├── DCPmd5.pas │ │ ├── DCPripemd128.pas │ │ ├── DCPripemd160.pas │ │ ├── DCPsha1.pas │ │ ├── DCPsha256.pas │ │ ├── DCPsha512.pas │ │ ├── DCPtiger.inc │ │ └── DCPtiger.pas │ ├── Readme.txt │ ├── SelfTest.dpr │ ├── SelfTest.dproj │ ├── SelfTest.dproj.2007 │ └── jedi.inc ├── DUnit │ ├── Contrib │ │ ├── DUnitWizard │ │ │ ├── Docs │ │ │ │ ├── applet.png │ │ │ │ ├── behaviour.png │ │ │ │ ├── body.htm │ │ │ │ ├── contents.htm │ │ │ │ ├── default.css │ │ │ │ ├── dunit_wizard.png │ │ │ │ ├── index.htm │ │ │ │ ├── menu.jpg │ │ │ │ ├── menu.png │ │ │ │ ├── newClass.png │ │ │ │ ├── newProject.png │ │ │ │ ├── newTestModule.png │ │ │ │ ├── parameters.png │ │ │ │ └── title.htm │ │ │ ├── README.rtf │ │ │ ├── Source │ │ │ │ ├── Common │ │ │ │ │ ├── EPCCommon50.dpk │ │ │ │ │ ├── EPCCommon60.dpk │ │ │ │ │ ├── EPCCommon70.dpk │ │ │ │ │ ├── JEDI.inc │ │ │ │ │ ├── XPEvent.pas │ │ │ │ │ ├── XPInterfacedObject.pas │ │ │ │ │ ├── XPIterator.pas │ │ │ │ │ ├── XPObserver.pas │ │ │ │ │ ├── XPRestore.pas │ │ │ │ │ ├── XPSingleton.pas │ │ │ │ │ ├── XPSingletonForm.pas │ │ │ │ │ ├── XPStrings.pas │ │ │ │ │ ├── XPSyncRW.pas │ │ │ │ │ ├── XPTransactIniFile.pas │ │ │ │ │ ├── XPWinBase.pas │ │ │ │ │ ├── XPWinSync.pas │ │ │ │ │ └── dunit │ │ │ │ │ │ ├── MutualRefTests.dpr │ │ │ │ │ │ ├── XPInterfacedObjectTests.pas │ │ │ │ │ │ ├── XPObserverTests.pas │ │ │ │ │ │ └── XPTempReleaseTests.pas │ │ │ │ └── DelphiExperts │ │ │ │ │ ├── Common │ │ │ │ │ ├── EPCOTAUtils50.dpk │ │ │ │ │ ├── EPCOTAUtils60.dpk │ │ │ │ │ ├── EPCOTAUtils70.dpk │ │ │ │ │ ├── XPKeyWords.pas │ │ │ │ │ ├── XPPascalScanner.pas │ │ │ │ │ ├── XPToken.pas │ │ │ │ │ ├── XPTokenMulticaster.pas │ │ │ │ │ ├── XP_OTACreators.pas │ │ │ │ │ ├── XP_OTAEditorUtils.pas │ │ │ │ │ ├── XP_OTAUtils.pas │ │ │ │ │ └── XP_OTAWizards.pas │ │ │ │ │ └── DUnitProject │ │ │ │ │ ├── DUnitWizardProjectGroup50.bpg │ │ │ │ │ ├── DUnitWizardProjectGroup60.bpg │ │ │ │ │ ├── DUnitWizardProjectGroup70.bpg │ │ │ │ │ ├── EPCDUnitWizard50.dpk │ │ │ │ │ ├── EPCDUnitWizard60.dpk │ │ │ │ │ ├── EPCDUnitWizard70.dpk │ │ │ │ │ ├── ProjectSource.txt │ │ │ │ │ ├── TestClassDecl.txt │ │ │ │ │ ├── TestMethodDecl.txt │ │ │ │ │ ├── TestModule.txt │ │ │ │ │ ├── TestSuiteReg.txt │ │ │ │ │ ├── UsesTestedUnit.txt │ │ │ │ │ ├── XPDUnitCommon.pas │ │ │ │ │ ├── XPDUnitMacros.pas │ │ │ │ │ ├── XPDUnitMenuWizard.pas │ │ │ │ │ ├── XPDUnitParameters.pas │ │ │ │ │ ├── XPDUnitProject.dfm │ │ │ │ │ ├── XPDUnitProject.pas │ │ │ │ │ ├── XPDUnitProjectWizard.pas │ │ │ │ │ ├── XPDUnitProjectWizard.rc │ │ │ │ │ ├── XPDUnitSetup.dfm │ │ │ │ │ ├── XPDUnitSetup.pas │ │ │ │ │ ├── XPDUnitTestClass.dfm │ │ │ │ │ ├── XPDUnitTestClass.pas │ │ │ │ │ ├── XPDUnitTestClassWizard.pas │ │ │ │ │ ├── XPDUnitTestClassWizard.rc │ │ │ │ │ ├── XPDUnitTestModule.dfm │ │ │ │ │ ├── XPDUnitTestModule.pas │ │ │ │ │ ├── XPDUnitTestModuleWizard.pas │ │ │ │ │ ├── XPDUnitTestModuleWizard.rc │ │ │ │ │ ├── XPDUnitWizard.pas │ │ │ │ │ ├── XPParserFilters.pas │ │ │ │ │ ├── XPTemplateParser.pas │ │ │ │ │ ├── XPTestedUnitParser.pas │ │ │ │ │ ├── XPTestedUnitUtils.pas │ │ │ │ │ ├── XPTextTemplates.pas │ │ │ │ │ ├── XPTextTemplates.rc │ │ │ │ │ ├── dunit │ │ │ │ │ ├── EPCDUnitWizardTests.dpr │ │ │ │ │ ├── Examples │ │ │ │ │ │ └── TestedUnitParserTest_1.pas │ │ │ │ │ ├── TestedUnitStream.pas │ │ │ │ │ ├── WizardFormsDemo.dpr │ │ │ │ │ ├── WizardFormsDemoMain.dfm │ │ │ │ │ ├── WizardFormsDemoMain.pas │ │ │ │ │ ├── XPDUnitMacrosTests.pas │ │ │ │ │ ├── XPDUnitParametersTests.pas │ │ │ │ │ ├── XPTemplateParserTests.pas │ │ │ │ │ ├── XPTestedUnitParserTests.pas │ │ │ │ │ └── XPTestedUnitUtilsTests.pas │ │ │ │ │ ├── dunit_project.bmp │ │ │ │ │ ├── dunit_project16.ico │ │ │ │ │ ├── dunit_project256.ico │ │ │ │ │ ├── dunit_testclass.bmp │ │ │ │ │ ├── dunit_testmodule.bmp │ │ │ │ │ ├── dunit_testmodule16.ico │ │ │ │ │ └── dunit_testmodule256.ico │ │ │ └── lesser.txt │ │ ├── XMLReporting │ │ │ ├── XMLTestRunner.pas │ │ │ ├── dunit-report.css │ │ │ ├── dunit-report.html │ │ │ ├── dunit-report.xml │ │ │ ├── dunit-report.xsl │ │ │ └── want.xml │ │ └── XPGen │ │ │ ├── Makefile │ │ │ ├── TEST_Parse_Unit_Heading.txt │ │ │ ├── TEST_Parse_const_Paragraph.txt │ │ │ ├── TEST_Parse_derived.txt │ │ │ ├── TEST_Parse_tobject_derived.txt │ │ │ ├── TEST_Parse_type_Paragraph.txt │ │ │ ├── TEST_Parse_typedef.txt │ │ │ ├── TEST_Parse_uses_clause.txt │ │ │ ├── TEST_Parse_var_paragraph.txt │ │ │ ├── TEST_SyncToken.txt │ │ │ ├── WIZARDXPGEN.PAS │ │ │ ├── XPGEN.DPK │ │ │ ├── frmXPGenOpts.dfm │ │ │ ├── frmXPGenOpts.pas │ │ │ ├── listsupport.pas │ │ │ ├── parsedef.pas │ │ │ ├── readme.html │ │ │ ├── suite_xpgen.pas │ │ │ ├── testNextToken.txt │ │ │ ├── testXpgen.dpr │ │ │ ├── testXpgenLib.dpr │ │ │ ├── test_Get_Token.txt │ │ │ ├── test_ParseEventDef.txt │ │ │ ├── test_xpLex.pas │ │ │ ├── test_xpParse.pas │ │ │ ├── testunit.dfm │ │ │ ├── testunit.pas │ │ │ ├── want.xml │ │ │ ├── wizardXpGenOptions.pas │ │ │ ├── xpCodeGen.pas │ │ │ ├── xpLex.pas │ │ │ ├── xpParse.pas │ │ │ ├── xpgen.dpr │ │ │ ├── xpmain.dfm │ │ │ └── xpmain.pas │ ├── Makefile │ ├── doc │ │ ├── DUNIT.CNT │ │ ├── DUNIT.HLP │ │ ├── LICENSE.html │ │ ├── README.html │ │ ├── README_CHT.html │ │ ├── TODO.html │ │ ├── dunit.css │ │ ├── images │ │ │ ├── china.gif │ │ │ ├── dunit_name.png │ │ │ ├── environment_options.jpg │ │ │ ├── jira_button_120wx60h.gif │ │ │ ├── project_options.jpg │ │ │ ├── screenshot.png │ │ │ ├── screenshot_running.png │ │ │ ├── tw.jpg │ │ │ ├── usa.gif │ │ │ ├── wincvs_setup_1.jpg │ │ │ ├── wincvs_setup_2.jpg │ │ │ ├── xtao128.png │ │ │ ├── xtao128_new.png │ │ │ ├── xtao16-16.png │ │ │ ├── xtao16-256.png │ │ │ ├── xtao16.png │ │ │ ├── xtao256.png │ │ │ ├── xtao32-256.png │ │ │ ├── xtao32.png │ │ │ └── xtao64.png │ │ ├── index.html │ │ ├── tutorial.doc │ │ ├── tutorial.html │ │ └── tutorial_files │ │ │ ├── image002.gif │ │ │ ├── image003.png │ │ │ ├── image004.jpg │ │ │ ├── image006.gif │ │ │ ├── image007.png │ │ │ └── image008.jpg │ ├── etc │ │ ├── versioninfo.template.inc │ │ └── versioninfo.template.rc │ ├── examples │ │ ├── ChecklessTests │ │ │ ├── FailChecklessTestsDemo.dpr │ │ │ ├── TestFailChecklessTests.pas │ │ │ └── want.xml │ │ ├── HaltRepeating │ │ │ ├── DemoHaltOnError.dpr │ │ │ ├── DemoHaltRepeatingOnError.pas │ │ │ └── want.xml │ │ ├── MemLeakDetect │ │ │ ├── LeakTestDemo.dpr │ │ │ ├── UnitTestLeak.pas │ │ │ ├── UnitTestSetup.pas │ │ │ └── want.xml │ │ ├── TListTest │ │ │ ├── ListTest.dpr │ │ │ ├── ListTest4Net.bdsproj │ │ │ ├── ListTest4Net.dpr │ │ │ ├── Makefile │ │ │ ├── TListTestCase.pas │ │ │ └── want.xml │ │ ├── cmdline │ │ │ ├── Makefile │ │ │ ├── Project1.bdsproj │ │ │ ├── Project1.dpr │ │ │ ├── Project1Test.bdsproj │ │ │ ├── Project1Test.dpr │ │ │ ├── ProjectGroup1.bdsgroup │ │ │ ├── ProjectGroup1.bpg │ │ │ ├── Unit1.pas │ │ │ ├── Unit1Test.pas │ │ │ ├── Unit2.pas │ │ │ ├── Unit2Test.pas │ │ │ ├── runtest.cmd │ │ │ └── want.xml │ │ ├── embeddable │ │ │ ├── EmbeddableGUITestRunner.dfm │ │ │ ├── EmbeddableGUITestRunner.pas │ │ │ ├── EmbeddableGUITestRunner.txt │ │ │ └── readme.html │ │ ├── readme.txt │ │ ├── registration │ │ │ ├── Makefile │ │ │ ├── TestUnit1.pas │ │ │ ├── TestUnit2.pas │ │ │ ├── TestUnit3.pas │ │ │ ├── UnitReg.bdsproj │ │ │ ├── UnitReg.dpr │ │ │ └── want.xml │ │ ├── registry │ │ │ ├── Makefile │ │ │ ├── Step1 │ │ │ │ ├── ChangeLog │ │ │ │ ├── RegistryTest.bdsproj │ │ │ │ ├── RegistryTest.dpr │ │ │ │ ├── RegistryUnit.pas │ │ │ │ └── RegistryUnitTest.pas │ │ │ ├── Step2 │ │ │ │ ├── ChangeLog │ │ │ │ ├── RegistryTest.bdsproj │ │ │ │ ├── RegistryTest.dpr │ │ │ │ ├── RegistryUnit.pas │ │ │ │ └── RegistryUnitTest.pas │ │ │ ├── Step3 │ │ │ │ ├── ChangeLog │ │ │ │ ├── RegistryTest.bdsproj │ │ │ │ ├── RegistryTest.dpr │ │ │ │ ├── RegistryUnit.pas │ │ │ │ └── RegistryUnitTest.pas │ │ │ ├── readme.html │ │ │ └── want.xml │ │ ├── structure │ │ │ ├── ChangeLog │ │ │ ├── Makefile │ │ │ ├── diffunit │ │ │ │ ├── Project1.bdsproj │ │ │ │ ├── Project1.dpr │ │ │ │ ├── Project1Test.bdsproj │ │ │ │ ├── Project1Test.dpr │ │ │ │ ├── ProjectGroup1.bdsgroup │ │ │ │ ├── ProjectGroup1.bpg │ │ │ │ ├── Unit1.pas │ │ │ │ ├── Unit1Test.pas │ │ │ │ ├── Unit2.pas │ │ │ │ ├── Unit2Test.pas │ │ │ │ └── UnitStructure.png │ │ │ ├── readme.html │ │ │ ├── sameunit │ │ │ │ ├── Project1.bdsproj │ │ │ │ ├── Project1.dpr │ │ │ │ ├── Project1Test.bdsproj │ │ │ │ ├── Project1Test.dpr │ │ │ │ ├── ProjectGroup1.bdsgroup │ │ │ │ ├── ProjectGroup1.bpg │ │ │ │ ├── Unit1.pas │ │ │ │ └── Unit2.pas │ │ │ └── want.xml │ │ └── testexception │ │ │ ├── ChangeLog │ │ │ ├── Project1.bdsproj │ │ │ ├── Project1.dpr │ │ │ ├── Project1Test.bdsproj │ │ │ ├── Project1Test.dpr │ │ │ ├── ProjectGroup1.bdsgroup │ │ │ ├── ProjectGroup1.bpg │ │ │ ├── Unit1.pas │ │ │ ├── Unit1Test.pas │ │ │ ├── Unit2.pas │ │ │ ├── Unit2Test.pas │ │ │ └── want.xml │ ├── helpsrc │ │ ├── Makefile │ │ ├── TestFramework.HPJ │ │ ├── TestFramework.LibHPJ │ │ └── test.hlp_sgml │ ├── readme-9.4.txt │ ├── readme-fastmm.txt │ ├── readme-kylix.txt │ ├── readme.html │ ├── release.ini │ ├── src │ │ ├── DUnit4Net.bdsgroup │ │ ├── DUnitConsts.pas │ │ ├── DUnitMainForm.dfm │ │ ├── DUnitMainForm.pas │ │ ├── DUnitW32.bdsgroup │ │ ├── DUnitW32.bdsproj │ │ ├── DUnitW32.dpr │ │ ├── DunitAbout.dfm │ │ ├── DunitAbout.pas │ │ ├── FastMMMemLeakMonitor.pas │ │ ├── GUITestRunner.dfm │ │ ├── GUITestRunner.pas │ │ ├── GUITesting.pas │ │ ├── HeidiTestRunner.pas │ │ ├── Makefile │ │ ├── QGUITestRunner.pas │ │ ├── QGUITestRunner.xfm │ │ ├── TestExtensions.pas │ │ ├── TestFramework.pas │ │ ├── TestModules.pas │ │ ├── TextTestRunner.pas │ │ ├── dunit.bpg │ │ ├── dunit.dpr │ │ ├── dunit.dproj │ │ ├── dunit.ini │ │ ├── dunit_Icon.ico │ │ ├── images │ │ │ ├── actions_images.bmp │ │ │ ├── dunit.ico │ │ │ ├── dunit16.ico │ │ │ ├── dunit16_new.ico │ │ │ ├── dunit_new.ico │ │ │ ├── list_images.bmp │ │ │ ├── logo.bmp │ │ │ ├── run_images.bmp │ │ │ └── state_images.bmp │ │ ├── versioninfo.inc │ │ └── versioninfo.rc │ ├── tests │ │ ├── DUnitTestLib.dpr │ │ ├── DUnitTestLibW32.bdsproj │ │ ├── DUnitTestLibW32.dpr │ │ ├── FastMMMonitorTest.pas │ │ ├── Makefile │ │ ├── UnitTestExtensions.pas │ │ ├── UnitTestFramework.pas │ │ ├── UnitTestGUITestRunner.pas │ │ ├── UnitTestGUITesting.dfm │ │ ├── UnitTestGUITesting.pas │ │ ├── UnitTests.dpr │ │ ├── UnitTests4Net.bdsproj │ │ ├── UnitTests4Net.dpr │ │ ├── UnitTestsW32.bdsproj │ │ └── UnitTestsW32.dpr │ └── want.xml ├── Delphi7 │ ├── Graphics.pas │ ├── IdComponent.pas │ ├── IdFTPList.pas │ ├── PngImage │ │ ├── PngImage.pas │ │ ├── obj │ │ │ ├── adler32.obj │ │ │ ├── deflate.obj │ │ │ ├── infblock.obj │ │ │ ├── infcodes.obj │ │ │ ├── inffast.obj │ │ │ ├── inflate.obj │ │ │ ├── inftrees.obj │ │ │ ├── infutil.obj │ │ │ └── trees.obj │ │ ├── pngimage.chm │ │ ├── pnglang.pas │ │ └── pngzlib.pas │ ├── SvcMgr.pas │ ├── SysUtils.pas │ └── UITypes.pas ├── DelphiBigNumbers │ ├── CompilerAndRTLVersions.pas │ ├── GenerateBaseConversionTables.dpr │ ├── GenerateBaseConversionTables.dproj │ ├── Velthuis.BigDecimals.pas │ ├── Velthuis.BigIntegers.Primes.pas │ ├── Velthuis.BigIntegers.operators.hpp │ ├── Velthuis.BigIntegers.pas │ ├── Velthuis.BigRationals.pas │ ├── Velthuis.ExactFloatStrings.pas │ ├── Velthuis.FloatUtils.pas │ ├── Velthuis.Loggers.pas │ ├── Velthuis.Numerics.pas │ ├── Velthuis.RandomNumbers.pas │ ├── Velthuis.Sizes.pas │ ├── Velthuis.StrConsts.pas │ ├── Velthuis.XorShifts.pas │ └── bases.inc ├── DelphiXE │ ├── DBGrids.pas │ └── Grids.pas ├── DelphiXE2 │ ├── Vcl.DBGrids.pas │ └── Vcl.Grids.pas ├── Exif.pas ├── ExtLib.dof ├── FFTs │ ├── Complexs.pas │ ├── FFTs.pas │ └── Readme.txt ├── FastMM │ ├── CPP Builder Support │ │ └── FastMM4BCB.cpp │ ├── Demos │ │ ├── Dynamically Loaded DLL │ │ │ ├── ApplicationForm.dfm │ │ │ ├── ApplicationForm.pas │ │ │ ├── DLLForm.dfm │ │ │ ├── DLLForm.pas │ │ │ ├── DynamicallyLoadedDLLDemo.groupproj │ │ │ ├── TestApplication.dpr │ │ │ ├── TestApplication.dproj │ │ │ ├── TestApplication.res │ │ │ ├── TestDLL.dpr │ │ │ ├── TestDLL.dproj │ │ │ └── TestDLL.res │ │ ├── Replacement borlndmm DLL │ │ │ ├── BorlndMM.dll │ │ │ ├── DemoForm.dfm │ │ │ ├── DemoForm.pas │ │ │ ├── FastMM_FullDebugMode.dll │ │ │ ├── FullDebugModeDemo.dpr │ │ │ └── FullDebugModeDemo.res │ │ └── Usage Tracker │ │ │ ├── DemoForm.dfm │ │ │ ├── DemoForm.pas │ │ │ ├── FastMMUsageTracker.dfm │ │ │ ├── FastMMUsageTracker.pas │ │ │ ├── UsageTrackerDemo.dpr │ │ │ ├── UsageTrackerDemo.dproj │ │ │ └── UsageTrackerDemo.res │ ├── FastMM4.pas │ ├── FastMM4DataCollector.pas │ ├── FastMM4LockFreeStack.pas │ ├── FastMM4Messages.pas │ ├── FastMM4Options.inc │ ├── FastMM4_FAQ.txt │ ├── FastMM4_Readme.txt │ ├── FastMM_OSXUtil.pas │ ├── FullDebugMode DLL │ │ ├── CPP Builder Support │ │ │ ├── FastMM_FullDebugMode.lib │ │ │ └── Readme.txt │ │ ├── FastMM_FullDebugMode.deployproj │ │ ├── FastMM_FullDebugMode.dpr │ │ ├── FastMM_FullDebugMode.dproj │ │ ├── FastMM_FullDebugMode.entitlements │ │ ├── FastMM_FullDebugMode.info.plist │ │ ├── FastMM_FullDebugMode.res │ │ ├── FastMM_FullDebugMode_Icon.ico │ │ ├── FullDebugMode_DLL_TestApp.dpr │ │ ├── FullDebugMode_DLL_TestApp.dproj │ │ └── Precompiled │ │ │ ├── FastMM_FullDebugMode.dll │ │ │ ├── FastMM_FullDebugMode64.dll │ │ │ └── libFastMM_FullDebugMode.dylib │ ├── README.md │ ├── Replacement BorlndMM DLL │ │ ├── BCB5 │ │ │ ├── BorlndMM.bpf │ │ │ ├── BorlndMM.bpr │ │ │ ├── BorlndMM_.pas │ │ │ ├── DLLEntry.cpp │ │ │ ├── Export.def │ │ │ └── Precompiled │ │ │ │ └── BorlndMM.dll │ │ ├── BCB6 │ │ │ ├── BorlndMM.bpf │ │ │ ├── BorlndMM.bpr │ │ │ ├── BorlndMM.res │ │ │ ├── BorlndMM_.pas │ │ │ ├── DLLEntry.cpp │ │ │ ├── Export.def │ │ │ └── Precompiled │ │ │ │ └── BorlndMM.dll │ │ ├── CB2006 │ │ │ ├── BorlndMM.bdsproj │ │ │ ├── BorlndMM.bpf │ │ │ ├── BorlndMM.pas │ │ │ ├── DLLEntry.cpp │ │ │ ├── Export.def │ │ │ ├── Precompiled │ │ │ │ └── BorlndMM.dll │ │ │ └── Readme.txt │ │ ├── CB2007 │ │ │ ├── BorlndMM.cbproj │ │ │ ├── BorlndMM.pas │ │ │ ├── DLLEntry.cpp │ │ │ ├── Export.def │ │ │ ├── Precompiled │ │ │ │ └── BorlndMM.dll │ │ │ └── Readme.txt │ │ └── Delphi │ │ │ ├── BorlndMM.dpr │ │ │ ├── BorlndMM.dproj │ │ │ ├── BorlndMM.res │ │ │ ├── FastMMDebugSupport.pas │ │ │ └── Precompiled │ │ │ ├── for Applications │ │ │ ├── Debug │ │ │ │ └── BorlndMM.dll │ │ │ └── Performance │ │ │ │ └── BorlndMM.dll │ │ │ └── for Delphi IDE │ │ │ ├── Debug │ │ │ └── BorlndMM.dll │ │ │ └── Performance │ │ │ └── BorlndMM.dll │ └── Translations │ │ ├── Afrikaans │ │ └── FastMM4Messages.pas │ │ ├── Belarussian │ │ └── FastMM4Messages.pas │ │ ├── Chinese (Simplified) │ │ ├── FastMM4Messages.pas │ │ └── FastMM4Options.inc │ │ ├── Czech │ │ └── FastMM4Messages.pas │ │ ├── English │ │ └── FastMM4Messages.pas │ │ ├── French │ │ └── FastMM4Messages.pas │ │ ├── German │ │ ├── by Thomas Speck │ │ │ └── FastMM4Messages.pas │ │ └── by Uwe Queisser │ │ │ └── FastMM4Messages.pas │ │ ├── Indonesian │ │ └── FastMM4Messages.pas │ │ ├── Italian │ │ └── FastMM4Messages.pas │ │ ├── Polish │ │ └── FastMM4Messages.pas │ │ ├── Portuguese (Brazil) │ │ └── FastMM4Messages.pas │ │ ├── Portuguese │ │ └── FastMM4Messages.pas │ │ ├── Romanian │ │ └── FastMM4Messages.pas │ │ ├── Russian │ │ └── FastMM4Messages.pas │ │ ├── Spanish │ │ └── FastMM4Messages.pas │ │ └── Ukrainian │ │ └── FastMM4Messages.pas ├── FastMMUsageTracker.dfm ├── FastMMUsageTracker.pas ├── GammaF │ ├── GammaF.pas │ └── ap.pas ├── GraphicEx │ ├── 3rd party │ │ ├── AutoResourceStr │ │ │ ├── AutoResourceStr.pas │ │ │ └── variantWrapper.pas │ │ └── DelphiZlib │ │ │ ├── ZLibEx.inc │ │ │ ├── ZLibEx.pas │ │ │ ├── ZLibExApi.pas │ │ │ ├── ZLibExGZ.pas │ │ │ ├── readme.txt │ │ │ ├── win32 │ │ │ ├── adler32.obj │ │ │ ├── compress.obj │ │ │ ├── crc32.obj │ │ │ ├── deflate.obj │ │ │ ├── infback.obj │ │ │ ├── inffast.obj │ │ │ ├── inflate.obj │ │ │ ├── inftrees.obj │ │ │ └── trees.obj │ │ │ ├── win64 │ │ │ ├── adler32.obj │ │ │ ├── compress.obj │ │ │ ├── crc32.obj │ │ │ ├── deflate.obj │ │ │ ├── infback.obj │ │ │ ├── inffast.obj │ │ │ ├── inflate.obj │ │ │ ├── inftrees.obj │ │ │ └── trees.obj │ │ │ └── zlib │ │ │ ├── adler32.c │ │ │ ├── compress.c │ │ │ ├── crc32.c │ │ │ ├── crc32.h │ │ │ ├── deflate.c │ │ │ ├── deflate.h │ │ │ ├── infback.c │ │ │ ├── inffast.c │ │ │ ├── inffast.h │ │ │ ├── inffixed.h │ │ │ ├── inflate.c │ │ │ ├── inflate.h │ │ │ ├── inftrees.c │ │ │ ├── inftrees.h │ │ │ ├── trees.c │ │ │ ├── trees.h │ │ │ ├── zconf.h │ │ │ ├── zlib.h │ │ │ ├── zutil.c │ │ │ └── zutil.h │ ├── AllGraphicStrings.pas │ ├── Compilers.inc │ ├── Demos │ │ ├── .gitignore │ │ ├── Browser │ │ │ ├── Browser.dpr │ │ │ ├── Browser.dproj │ │ │ ├── Main.dfm │ │ │ └── Main.pas │ │ ├── Convert │ │ │ ├── Convert.dpr │ │ │ ├── Main.dfm │ │ │ ├── Main.pas │ │ │ ├── Properties.dfm │ │ │ └── Properties.pas │ │ ├── OneImage │ │ │ ├── Main.dfm │ │ │ ├── Main.pas │ │ │ └── OneImage.dpr │ │ ├── SaveAs │ │ │ ├── SaveAsDemo.dpr │ │ │ ├── mainform.dfm │ │ │ └── mainform.pas │ │ └── proj_common.pas │ ├── For older (non-unicode) versions of Delphi.txt │ ├── GraphicColor.pas │ ├── GraphicCompression.pas │ ├── GraphicConfiguration.inc │ ├── GraphicEx.chm │ ├── GraphicEx.pas │ ├── GraphicStrings.pas │ ├── GraphicStringsCT.pas │ ├── GraphicStringsDE.pas │ ├── GraphicStringsEN.pas │ ├── GraphicStringsES.pas │ ├── GraphicStringsEnUk.pas │ ├── GraphicStringsFR.pas │ ├── GraphicStringsIT.pas │ ├── GraphicStringsPL.pas │ ├── GraphicStringsRU.pas │ ├── JpegCompression.pas │ ├── LICENSE │ ├── MZLib.pas │ ├── README.md │ └── TIFF.pas ├── IGDIPlus │ ├── Demo │ │ ├── Delphi2009 │ │ │ ├── IGDIPlusDemo.dpr │ │ │ ├── IGDIPlusDemo.dproj │ │ │ ├── Unit1.dfm │ │ │ └── Unit1.pas │ │ ├── Delphi2010 │ │ │ ├── IGDIPlusDemo.dpr │ │ │ ├── IGDIPlusDemo.dproj │ │ │ ├── Unit1.dfm │ │ │ └── Unit1.pas │ │ ├── DelphiXE │ │ │ ├── IGDIPlusDemo.dpr │ │ │ ├── IGDIPlusDemo.dproj │ │ │ ├── Unit1.dfm │ │ │ └── Unit1.pas │ │ ├── DelphiXE2 │ │ │ ├── IGDIPlusDemo.dpr │ │ │ ├── IGDIPlusDemo.dproj │ │ │ ├── Unit1.dfm │ │ │ └── Unit1.pas │ │ ├── DelphiXE3 │ │ │ ├── IGDIPlusDemo.dpr │ │ │ ├── IGDIPlusDemo.dproj │ │ │ ├── Unit1.dfm │ │ │ └── Unit1.pas │ │ └── DelphiXE4 │ │ │ ├── IGDIPlusDemo.dpr │ │ │ ├── IGDIPlusDemo.dproj │ │ │ ├── Unit1.dfm │ │ │ └── Unit1.pas │ ├── IGDIPlus.pas │ └── IGDIPlusAPI.inc ├── MSVCRTMemoryManager.pas ├── NLDJoystick │ ├── NLDJoystick.dcr │ ├── NLDJoystick.pas │ ├── NLDJoystick70.dpk │ ├── NLDJoystick70.dproj │ └── Readme.txt ├── OmniXML │ ├── OBufferedStreams.pas │ ├── OEncoding.pas │ ├── OTextReadWrite.pas │ ├── OWideSupp.pas │ ├── OXml.inc │ ├── OXmlLng.pas │ ├── OmniXML.inc │ ├── OmniXML.pas │ ├── OmniXMLXPath.pas │ ├── OmniXML_Dictionary.pas │ ├── OmniXML_JEDI.inc │ ├── OmniXML_LookupTables.pas │ ├── OmniXML_Types.pas │ └── README.md ├── OpenGL │ ├── Geometry.pas │ └── OpenGL12.pas ├── SQLite3 │ ├── SQLite3BtnArrow.bmp │ └── SQLite3BtnOk.bmp ├── SafeMM │ ├── BorlndMM.dpr │ ├── BorlndMM.dproj │ ├── SafeMM.pas │ └── SafeMMInstall.pas ├── SynTaskDialog.pas ├── SynTaskDialog.rc ├── SynTaskDialog.res ├── TaskBarAPI.pas ├── WTSAPI.pas └── resample.pas ├── ExternalApplication ├── uAPI.pas ├── uCustomExternalApplication.pas ├── uExternalApplication.pas ├── uExternalApplicationReadThread.pas ├── uExternalApplicationTest.pas ├── uExternalApplicationThread.pas ├── uPipedExternalApplication.pas ├── uPipedExternalApplicationTest.pas ├── uShellApplication.pas └── uShellApplicationThread.pas ├── Files ├── Config │ ├── uConfigFile.pas │ ├── uDIniFile.pas │ ├── uGUIMainCfg.pas │ ├── uLocalMainCfg.pas │ ├── uMainCfg.pas │ ├── uRWFile.pas │ ├── uSxIniFile.pas │ ├── uXMLFIleTest.pas │ └── uXMLFile.pas ├── Database │ ├── uCSVFile.pas │ ├── uCSVFileTest.pas │ ├── uDBF.pas │ ├── uDBFReader.pas │ ├── uDBFTest.pas │ └── uMapInfo.pas ├── uAndroidSystemPaths.pas ├── uBufferedRawFile.pas ├── uCustomBuffer.pas ├── uCustomSystemPaths.pas ├── uFile.pas ├── uFileCharset.pas ├── uFileLineReader.pas ├── uFileStatistics.pas ├── uFileTest.pas ├── uFiles.pas ├── uFilesTest.pas ├── uProtectedRawFile.pas ├── uRawFile.pas ├── uRawFileTest.pas ├── uReadBuffer.pas ├── uSequentialWriteBuffer.pas ├── uSplitFile.pas ├── uSplitFileTest.pas ├── uSystemPaths.pas ├── uTextFile.pas ├── uTextFileTest.pas ├── uWindowsFileAPI.pas └── uWindowsSystemPaths.pas ├── Formatter ├── uBinaryPrefix.pas ├── uByteFormatter.pas ├── uFormatter.pas ├── uFormatters.pas ├── uFrequencyFormatter.pas ├── uMaskFormatter.pas ├── uMetricPrefix.pas ├── uNumberFormatter.pas ├── uPercentFormatter.pas ├── uPercentFormatterTest.pas ├── uTimeFormatter.pas ├── uTimePrefix.pas ├── uTwoDigitFormatter.pas ├── uUnitFormatter.pas └── uUnitPrefix.pas ├── GUI ├── FMX │ └── uFMXGUIApplication.pas ├── VCL │ ├── Components │ │ ├── uCustomDTimer.pas │ │ ├── uDButton.pas │ │ ├── uDEdit.pas │ │ ├── uDForm.pas │ │ ├── uDGauge.pas │ │ ├── uDIdleTimer.pas │ │ ├── uDImage.pas │ │ ├── uDLabel.pas │ │ ├── uDMemo.pas │ │ ├── uDPanel.pas │ │ ├── uDTimer.pas │ │ ├── uDTimerTest.pas │ │ ├── uDView.pas │ │ ├── uDWinControl.pas │ │ ├── uDispl.pas │ │ ├── uDropFilesForm.pas │ │ ├── uNumericComboBox.pas │ │ ├── uOpenedFileItem.pas │ │ ├── uOpenedFiles.pas │ │ ├── uSxCheckBox.pas │ │ ├── uSxColor.pas │ │ ├── uSxComboBox.pas │ │ ├── uSxEmptyPanel.pas │ │ ├── uSxGUI.pas │ │ ├── uSxLabel.pas │ │ ├── uSxPathEdit.pas │ │ ├── uSxRibbon.pas │ │ ├── uSxRibbonItem.pas │ │ └── uSxToolBar.pas │ ├── Forms │ │ ├── fFind.dfm │ │ ├── fFind.pas │ │ ├── uAbout.dfm │ │ ├── uAbout.pas │ │ ├── uFileExt.dfm │ │ ├── uFileExt.pas │ │ ├── uGColor.dfm │ │ ├── uGColor.pas │ │ ├── uGetInt.dfm │ │ ├── uGetInt.pas │ │ ├── uGetStr.dfm │ │ ├── uGetStr.pas │ │ ├── uGetTime.dfm │ │ ├── uGetTime.pas │ │ ├── uInfoWindow.dfm │ │ ├── uInfoWindow.pas │ │ ├── uMemStatus.dfm │ │ ├── uMemStatus.pas │ │ ├── uMsgDlg.pas │ │ ├── uScores.dfm │ │ ├── uScores.pas │ │ ├── uSounds.dfm │ │ ├── uSounds.pas │ │ ├── uSplash.dfm │ │ ├── uSplash.pas │ │ ├── uStyle.dfm │ │ ├── uStyle.pas │ │ ├── ufGetKey.dfm │ │ ├── ufGetKey.pas │ │ ├── ufGrate.dfm │ │ ├── ufGrate.pas │ │ ├── ufMsgDlg.dfm │ │ ├── ufMsgDlg.pas │ │ ├── ufOpenedFiles.dfm │ │ ├── ufOpenedFiles.pas │ │ ├── ufOptions.dfm │ │ ├── ufOptions.pas │ │ ├── ufSchedule.dfm │ │ ├── ufSchedule.pas │ │ ├── ufStatus.dfm │ │ ├── ufStatus.pas │ │ ├── ufSysInfo.dfm │ │ ├── ufSysInfo.pas │ │ ├── ufTableForm.dfm │ │ ├── ufTableForm.pas │ │ ├── ufTextStatus.dfm │ │ └── ufTextStatus.pas │ ├── Frames │ │ ├── rOkCancel.dfm │ │ └── rOkCancel.pas │ ├── uLgToPx.pas │ ├── uVCLGUIApplication.pas │ └── uVCLIniFile.pas ├── efBLoop.inc ├── efELoop.inc ├── uCSS.pas ├── uColor.pas ├── uColorSequence.pas ├── uColorSequenceTest.pas ├── uCommonMenu.pas ├── uDBitmap.pas ├── uDBitmapTest.pas ├── uDChart.pas ├── uDGraph.pas ├── uDViewLogger.pas ├── uDb.pas ├── uDesktopWindow.pas ├── uDesktopWindowTest.pas ├── uDownloadEx.pas ├── uDrawStyle.pas ├── uDrawStyleHelper.pas ├── uFTP.pas ├── uFilePosCache.pas ├── uFirefoxBookmarks.pas ├── uGUIApplication.pas ├── uGUIOutputInfo.pas ├── uGUISplashScreen.pas ├── uGlobalOptions.pas ├── uGraph.pas ├── uIgnore.pas ├── uLayout.pas ├── uLongOperation.pas ├── uMenus.pas ├── uMultiIns.pas ├── uNamedColors.pas ├── uOperaBookmarks.pas ├── uPictureFactory.pas ├── uPictureFactoryTest.pas ├── uProcess.pas ├── uPropertiesDialog.pas ├── uRGBColor.pas ├── uReg.pas ├── uRegistryClasses.pas ├── uRenderer.pas ├── uReopen.pas ├── uSGL.pas ├── uSavePictureDialog.pas ├── uScreen.pas ├── uScreenMode.pas ├── uScreenSaverApplication.pas ├── uScreenTest.pas ├── uScreenshots.pas ├── uSmallRasterFont.pas ├── uSpark.pas ├── uSparks.pas ├── uStartup.pas ├── uSystem.pas ├── uSystemColors.pas ├── uTaskBarWindow.pas ├── uTaskBarWindowTest.pas ├── uTextPos.pas ├── uVCLDictionary.pas ├── uVisualOptions.pas ├── uWatch.pas ├── uWebUpdate.pas ├── uWebUpdateTest.pas ├── uYCbCrColor.pas └── uYUVColor.pas ├── Game ├── Turn-based │ ├── Common │ │ ├── uCustomForsythEdwardsNotationParser.pas │ │ ├── uCustomForsythEdwardsNotationWriter.pas │ │ ├── uForsythEdwardsNotation.pas │ │ ├── uGameVariant.pas │ │ ├── uGameVariants.pas │ │ ├── uHash.pas │ │ ├── uMove.pas │ │ ├── uMoveGenerator.pas │ │ ├── uMoveList.pas │ │ ├── uMoveStack.pas │ │ ├── uPortableGameNotation.pas │ │ ├── uPosition.pas │ │ ├── uScore.pas │ │ └── uSquare.pas │ ├── Engine │ │ ├── Common │ │ │ ├── uAnalysis.pas │ │ │ ├── uAnalysisInfo.pas │ │ │ ├── uCommonEngine.pas │ │ │ ├── uRootMoves.pas │ │ │ ├── uSubtreeStatus.pas │ │ │ └── uVariationCut.pas │ │ ├── External │ │ │ ├── uCustomEngineWriter.pas │ │ │ ├── uExternalEngine.pas │ │ │ ├── uExternalEngineParser.pas │ │ │ ├── uPerftParser.pas │ │ │ ├── uPerftParserTest.pas │ │ │ ├── uStartWriter.pas │ │ │ ├── uUCIParser.pas │ │ │ ├── uUCIReaderInit.pas │ │ │ ├── uUCIWriter.pas │ │ │ ├── uXBoardParser.pas │ │ │ ├── uXBoardReaderInit.pas │ │ │ └── uXBoardWriter.pas │ │ ├── Internal │ │ │ ├── uCommonEngineOptions.pas │ │ │ ├── uDllEngine.pas │ │ │ ├── uDllInterface.pas │ │ │ ├── uDrawManager.pas │ │ │ ├── uInternalEngine.pas │ │ │ ├── uOneSecondTimer.pas │ │ │ ├── uOpponent.pas │ │ │ ├── uStopCause.pas │ │ │ ├── uStopManager.pas │ │ │ └── uStopManagerToUCIString.pas │ │ ├── Output │ │ │ ├── uEngineOutput.pas │ │ │ ├── uEngineOutputForTests.pas │ │ │ ├── uLoggedEngineOutput.pas │ │ │ └── uNoEngineOutput.pas │ │ └── Protocols │ │ │ ├── Commands │ │ │ ├── UCI │ │ │ │ ├── uGoCommand.pas │ │ │ │ ├── uIsReadyCommand.pas │ │ │ │ ├── uPonderHitCommand.pas │ │ │ │ ├── uPositionCommand.pas │ │ │ │ ├── uRegisterCommand.pas │ │ │ │ ├── uSetOptionCommand.pas │ │ │ │ └── uUCICommand.pas │ │ │ ├── USI │ │ │ │ └── uUSICommand.pas │ │ │ ├── XBoard │ │ │ │ ├── uAcceptedCommand.pas │ │ │ │ ├── uAnalyzeCommand.pas │ │ │ │ ├── uBkCommand.pas │ │ │ │ ├── uComputerCommand.pas │ │ │ │ ├── uCoresCommand.pas │ │ │ │ ├── uDotCommand.pas │ │ │ │ ├── uDrawCommand.pas │ │ │ │ ├── uEGTPathCommand.pas │ │ │ │ ├── uEasyCommand.pas │ │ │ │ ├── uEditCommand.pas │ │ │ │ ├── uExcludeAllCommand.pas │ │ │ │ ├── uExcludeCommand.pas │ │ │ │ ├── uForceCommand.pas │ │ │ │ ├── uHardCommand.pas │ │ │ │ ├── uHintCommand.pas │ │ │ │ ├── uICSCommand.pas │ │ │ │ ├── uIncludeAllCommand.pas │ │ │ │ ├── uIncludeCommand.pas │ │ │ │ ├── uLevelCommand.pas │ │ │ │ ├── uLevelCommandParser.pas │ │ │ │ ├── uMemoryCommand.pas │ │ │ │ ├── uNameCommand.pas │ │ │ │ ├── uNewCommand.pas │ │ │ │ ├── uNoPostCommand.pas │ │ │ │ ├── uNpsCommand.pas │ │ │ │ ├── uOTimCommand.pas │ │ │ │ ├── uOptionCommand.pas │ │ │ │ ├── uPauseCommand.pas │ │ │ │ ├── uPingCommand.pas │ │ │ │ ├── uPlayOtherCommand.pas │ │ │ │ ├── uPostCommand.pas │ │ │ │ ├── uProtoVerCommand.pas │ │ │ │ ├── uQuestionMarkCommand.pas │ │ │ │ ├── uRandomCommand.pas │ │ │ │ ├── uRatingCommand.pas │ │ │ │ ├── uRejectedCommand.pas │ │ │ │ ├── uRemoveCommand.pas │ │ │ │ ├── uResultCommand.pas │ │ │ │ ├── uResumeCommand.pas │ │ │ │ ├── uSdCommand.pas │ │ │ │ ├── uSetBoardCommand.pas │ │ │ │ ├── uSetScoreCommand.pas │ │ │ │ ├── uStCommand.pas │ │ │ │ ├── uTimeCommand.pas │ │ │ │ ├── uUndoCommand.pas │ │ │ │ ├── uUserMoveCommand.pas │ │ │ │ ├── uVariantCommand.pas │ │ │ │ ├── uXBoardCommand.pas │ │ │ │ ├── uXBoardExitCommand.pas │ │ │ │ ├── uXBoardGoCommand.pas │ │ │ │ └── uXBoardProtocolCommand.pas │ │ │ ├── uBenchmarkCommand.pas │ │ │ ├── uCommonSetOptionCommand.pas │ │ │ ├── uDebugCommand.pas │ │ │ ├── uEngineCommand.pas │ │ │ ├── uEngineStateCommand.pas │ │ │ ├── uEvalCommand.pas │ │ │ ├── uNewGameCommand.pas │ │ │ ├── uPerftCommand.pas │ │ │ ├── uProtocolCommand.pas │ │ │ ├── uShowBoardCommand.pas │ │ │ ├── uSimpleEngineCommand.pas │ │ │ └── uStopCommand.pas │ │ │ ├── UCI │ │ │ ├── uLevelManagerToUCIString.pas │ │ │ ├── uUCIEngineOutput.pas │ │ │ └── uUCIProtocol.pas │ │ │ ├── USI │ │ │ ├── uUSIEngineOutput.pas │ │ │ └── uUSIProtocol.pas │ │ │ ├── XBoard │ │ │ ├── uLevelManagerToXBoardString.pas │ │ │ ├── uXBoardEngineOutput.pas │ │ │ ├── uXBoardFeatures.pas │ │ │ └── uXBoardProtocol.pas │ │ │ ├── uAutodetectEngineProtocol.pas │ │ │ ├── uCommonProtocol.pas │ │ │ ├── uConsoleEngine.pas │ │ │ ├── uNoProtocolEngineOutput.pas │ │ │ ├── uProtocolEngineOutput.pas │ │ │ └── uTextType.pas │ ├── Levels │ │ ├── uCustomLevel.pas │ │ ├── uInfiniteLevel.pas │ │ ├── uLevelManager.pas │ │ ├── uMaximalDepthLevel.pas │ │ ├── uMoveTimeLevel.pas │ │ ├── uNodesLevel.pas │ │ ├── uRandomIntervalLevel.pas │ │ ├── uTimeControlLevel.pas │ │ ├── uTimeLevel.pas │ │ └── uWinInLevel.pas │ └── NamedGameSpeed │ │ ├── uChessDotComNamedGameSpeed.pas │ │ ├── uFideNamedGameSpeed.pas │ │ ├── uLichessNamedGameSpeed.pas │ │ └── uNamedGameSpeed.pas ├── uBoard.pas └── uMaze.pas ├── Geometry ├── uGeometry2D.pas ├── uGeometry2DTest.pas ├── uGeometry3D.pas ├── uPolygon2D.pas └── uPolygon2DTest.pas ├── Hardware ├── uCPU.pas ├── uCPUTest.pas ├── uCustomCPU.pas └── uRS232.pas ├── Input ├── uCustomKeyboard.pas ├── uKeyboard.pas ├── uVirtualKeyCode.pas └── uWindowsKeyboard.pas ├── LICENSE.md ├── Logger ├── uDateTimeLogger.pas ├── uFileLogger.pas ├── uLog.pas ├── uLogger.pas ├── uMainLog.pas └── uMainLogDecorator.pas ├── Math ├── uEvenNumbersSet.pas ├── uNegativeNumberSet.pas ├── uNonNegativeNumberSet.pas ├── uNonPositiveNumberSet.pas ├── uNumericalInterval.pas ├── uNumericalSet.pas ├── uOddNumbersSet.pas └── uPositiveNumberSet.pas ├── Memory ├── uAlignedMemory.pas ├── uCustomSystemMemory.pas └── uSystemMemory.pas ├── Packages ├── Graphics │ └── Lib.ico ├── LibD2005.dpk ├── LibD2006.dpk ├── LibD2007.dpk ├── LibD2007.dproj ├── LibD2009.dpk ├── LibD2010.dpk ├── LibD7.dof ├── LibD7.dpk ├── LibD8.dpk ├── LibDXE.dpk ├── LibDXE.dproj ├── LibDXE2.dpk ├── LibDXE2.dproj ├── LibDXE3.dpk ├── LibDXE4.dpk ├── LibDXE5.dpk ├── LibDXE5.dproj ├── LibDXE6.dpk ├── LibDXE6.dproj ├── LibDXE7.dpk ├── LibDXE9.dpk ├── LibDXE9.dproj ├── SxLibrary.dpk ├── SxLibrary.dproj ├── uCompLog.pas ├── uCompLog7.pas ├── uDButton.dcr ├── uDForm.dcr ├── uDGauge.dcr ├── uDImage.dcr ├── uDLabel.dcr ├── uDPanel.dcr ├── uDTimer.dcr ├── uDView.dcr ├── uMyAfterCompile.pas ├── uOpenedFiles.dcr ├── uRegisterSxLibrary.pas ├── uSxPathEdit.dcr ├── uSxRibbon.dcr └── uSxToolBar.dcr ├── Parser ├── uBigDecimalConsts.pas ├── uBigDecimalHelper.pas ├── uBigDecimalHyperbolic.pas ├── uBigDecimalParser.pas ├── uBigDecimalUtils.pas ├── uCustomParser.pas ├── uEloFunctions.pas ├── uExpressionTree.pas ├── uExpressionTreeEvaluator.pas ├── uGoniometricFunctions.pas ├── uHyperbolicFunctions.pas ├── uLogicFunctions.pas ├── uMathExpressionParser.pas ├── uMathExpressionParserTest.pas ├── uMathFunctions.pas ├── uNamespace.pas ├── uNumberEString.pas ├── uNumberPiString.pas ├── uParserMsg.pas ├── uPhysicsFunctions.pas ├── uStatisticsFunctions.pas ├── uSxCustomLineParser.pas ├── uSxCustomParser.pas ├── uSxStringParser.pas ├── uTimeExpressionParser.pas └── uTimeExpressionParserTest.pas ├── RandomGenerator ├── uBorlandCRandomGenerator.pas ├── uDelphiRandomGenerator.pas ├── uGNUCRandomGenerator.pas ├── uKnuthRandomGenerator.pas ├── uLinearCongruentialGenerator.pas ├── uNumericalRecepiesRandomGenerator.pas ├── uRandom0Generator.pas ├── uRandomGenerator.pas ├── uRandomGeneratorTest.pas ├── uShuffleGenerator.pas └── uSxRandomGenerator.pas ├── Regional ├── uCountry.pas ├── uRegional.pas ├── uRegionalCodePage.pas ├── uRegionalCodePageTest.pas ├── uRegionalTest.pas └── uSunInfo.pas ├── Renderer ├── uBar.pas ├── uBarRenderer.pas ├── uBorder.pas ├── uCircle.pas ├── uClip.pas ├── uClipping.pas ├── uEllipse.pas ├── uFill.pas ├── uFontCache.pas ├── uGradientBar.pas ├── uGraphicObject.pas ├── uGraphicObjects.pas ├── uGraphicObjectsRenderer.pas ├── uGraphicObjectsRendererTest.pas ├── uLine.pas ├── uPathGraphicObject.pas ├── uPointGraphicObject.pas ├── uPolygon.pas ├── uPolygonGraphicObject.pas ├── uPolyline.pas ├── uRectangle.pas ├── uRenderTask.pas ├── uStroke.pas ├── uSxBitmap.pas ├── uSxBitmapUtils.pas ├── uSxFont.pas └── uText.pas ├── Round ├── uAlternatingTieBreakRound.pas ├── uRandomRound.pas ├── uRandomTieBreakRound.pas ├── uRound.pas └── uStochasticRound.pas ├── SVG ├── uSVGReader.pas └── uSVGReaderTest.pas ├── Sound ├── Channels │ ├── u5Point0Channels.pas │ ├── u5Point1Channels.pas │ ├── u7Point1Channels.pas │ ├── uChannel.pas │ ├── uChannels.pas │ ├── uMonoChannels.pas │ ├── uQuadChannels.pas │ ├── uSpeakerConfiguration.pas │ ├── uSpeakerId.pas │ ├── uStereoChannels.pas │ └── uSurroundChannels.pas ├── Mixers │ ├── uSoundMixer.pas │ ├── uSoundMixer0D.pas │ └── uSoundMixer2D.pas ├── Players │ ├── uFillBufferThread.pas │ ├── uMidiPlayer.pas │ ├── uMidiPlayerTest.pas │ ├── uPlaySound.pas │ ├── uWaveCommon.pas │ ├── uWavePlayer.pas │ ├── uWavePlayerTest.pas │ └── uWaveRecorder.pas └── SoundItems │ ├── uBlueNoise.pas │ ├── uBrownNoise.pas │ ├── uGreyNoise.pas │ ├── uISoundItem.pas │ ├── uNoiseTest.pas │ ├── uPinkNoise.pas │ ├── uSampleRates.pas │ ├── uSoundItem.pas │ ├── uSoundItem2D.pas │ ├── uTestSoundItem.pas │ ├── uTone.pas │ ├── uVioletNoise.pas │ ├── uWave.pas │ ├── uWaveFile.pas │ ├── uWaveItem.pas │ ├── uWaveTest.pas │ └── uWhiteNoise.pas ├── Table ├── uCell.pas ├── uColumn.pas ├── uICell.pas ├── uIRow.pas ├── uITable.pas ├── uItemType.pas ├── uRow.pas ├── uTable.pas ├── uTableBorderDoubleLineSet.pas ├── uTableBorderInvisibleSet.pas ├── uTableBorderLightSet.pas ├── uTableBorderSet.pas ├── uTableBorderTextSet.pas └── uTableSerializer.pas ├── Test ├── DUnitTests │ ├── DUnitTests.bpg │ ├── DUnitTests.dof │ ├── DUnitTests.dpr │ └── DUnitTests.dproj ├── DUnitXTests │ ├── DUnitXTests.dpr │ ├── DUnitXTests.dproj │ └── Unit1.pas ├── Data │ ├── CSV │ │ ├── Correct.csv │ │ ├── Empty.csv │ │ ├── Incorrect1.csv │ │ └── Incorrect2.csv │ ├── DBF │ │ ├── Cz-1250.dbf │ │ ├── Cz-852.dbf │ │ └── Cz.ods │ ├── Example Raster Graphics │ │ └── Abalone.png │ ├── Example Scalable Vector Graphics │ │ ├── Medium-Poly-Rose-Breasted-Groesbeck.svg │ │ ├── cherry.svg │ │ └── lime.svg │ ├── Music │ │ ├── Music0.mid │ │ ├── Music1.mid │ │ ├── Music2.mid │ │ └── Music3.mid │ ├── Parser │ │ ├── AdvancedMath.csv │ │ ├── BasicMath.csv │ │ ├── Comparison.csv │ │ ├── Constants.csv │ │ ├── ELO.csv │ │ ├── EmptyInput.csv │ │ ├── Errors.csv │ │ ├── Goniometric.csv │ │ ├── Hyperbolic.csv │ │ ├── Logic.csv │ │ ├── Numbers.csv │ │ ├── Operators.csv │ │ ├── Physics.csv │ │ └── Rounding.csv │ ├── StartupEnvironment │ │ ├── Reference.txt │ │ └── Test.txt │ ├── Test.bdsproj │ ├── Text1.txt │ ├── Text2.txt │ ├── Text3.txt │ └── Wave │ │ ├── 4ch.wav │ │ ├── 6_Channel_ID.wav │ │ ├── 8_Channel_ID.wav │ │ ├── M1F1-Alaw-AFsp.wav │ │ ├── M1F1-AlawWE-AFsp.wav │ │ ├── M1F1-float32-AFsp.wav │ │ ├── M1F1-float32WE-AFsp.wav │ │ ├── M1F1-float64-AFsp.wav │ │ ├── M1F1-float64WE-AFsp.wav │ │ ├── M1F1-int12-AFsp.wav │ │ ├── M1F1-int12WE-AFsp.wav │ │ ├── M1F1-int16-AFsp.wav │ │ ├── M1F1-int16WE-AFsp.wav │ │ ├── M1F1-int24-AFsp.wav │ │ ├── M1F1-int24WE-AFsp.wav │ │ ├── M1F1-mulaw-AFsp.wav │ │ ├── M1F1-mulawWE-AFsp.wav │ │ ├── M1F1-uint8-AFsp.wav │ │ ├── drmapan.wav │ │ ├── stereofl.wav │ │ └── stereol.wav ├── DllForTest │ ├── DllForTest.dof │ ├── DllForTest.dpr │ ├── DllForTest.dproj │ ├── DllForTest_Icon.ico │ └── uLoadDllTest.pas ├── Echo │ ├── Echo.dpr │ └── Echo.dproj ├── Graphics │ └── LibTest.ico ├── Test.groupproj └── Test_prjgroup.tvsconfig ├── ThreadPool ├── uAsyncTask.pas ├── uAsyncTaskForTest.pas ├── uNewThread.pas ├── uSxMeasuredThread.pas ├── uSxThread.pas ├── uSxThreadTimer.pas ├── uSxThreadTimerTest.pas ├── uThreadPool.pas ├── uThreadPoolTest.pas └── uWorkerThread.pas ├── VersionSystem ├── uGITVersionSystem.pas ├── uSVNVersionSystem.pas └── uVersionSystem.pas └── docs ├── README.md └── SxLib.png /.github/ISSUE_TEMPLATE/bug_report.md: -------------------------------------------------------------------------------- 1 | --- 2 | name: Bug report 3 | about: Create a report to help us improve 4 | 5 | --- 6 | 7 | **Describe the bug** 8 | A clear and concise description of what the bug is. 9 | If possible add any other context about the problem. 10 | 11 | **To Reproduce** 12 | Choise one of these options: 13 | 1. Add unit test (preffered) 14 | 2. Simple source code which causes the bug 15 | 3. Write steps to reproduce the behavior 16 | 17 | **Expected behavior** 18 | A clear and concise description of what you expected to happen. 19 | 20 | **Desktop (please complete the following information):** 21 | – Delphi version 22 | – Compiler settings (32/64 bits) 23 | – OS version (i. e. Microsoft Windows [Version 10.0.17134.285]) 24 | 25 | **Additional context** 26 | -------------------------------------------------------------------------------- /.github/ISSUE_TEMPLATE/feature_request.md: -------------------------------------------------------------------------------- 1 | --- 2 | name: Feature request 3 | about: Suggest an idea for this project 4 | 5 | --- 6 | 7 | **Is your feature request related to a problem? Please describe.** 8 | A clear and concise description of what the problem is. Ex. I'm always frustrated when [...] 9 | 10 | **Describe the solution you'd like** 11 | A clear and concise description of what you want to happen. 12 | 13 | **Describe alternatives you've considered** 14 | A clear and concise description of any alternative solutions or features you've considered. 15 | 16 | **Additional context** 17 | Add any other context or screenshots about the feature request here. 18 | -------------------------------------------------------------------------------- /ApplicationModule/uCorrectApplicationModule.pas: -------------------------------------------------------------------------------- 1 | unit uCorrectApplicationModule; 2 | 3 | interface 4 | 5 | uses 6 | uApplicationModule; 7 | 8 | type 9 | TCorrectApplicationModule = class(TApplicationModule) 10 | protected 11 | procedure OnLoad; override; 12 | procedure OnUnload; override; 13 | end; 14 | 15 | implementation 16 | 17 | { TCorrectApplicationModule } 18 | 19 | procedure TCorrectApplicationModule.OnLoad; 20 | begin 21 | inherited; 22 | 23 | end; 24 | 25 | procedure TCorrectApplicationModule.OnUnload; 26 | begin 27 | inherited; 28 | 29 | end; 30 | 31 | end. 32 | -------------------------------------------------------------------------------- /Arguments/uByteArgument.pas: -------------------------------------------------------------------------------- 1 | unit uByteArgument; 2 | 3 | interface 4 | 5 | uses 6 | uNumericalIntervalArgument; 7 | 8 | type 9 | TByteArgument = class(TNumericalIntervalArgument) 10 | public 11 | constructor Create; 12 | end; 13 | 14 | implementation 15 | 16 | { TByteArgument } 17 | 18 | constructor TByteArgument.Create; 19 | begin 20 | inherited; 21 | 22 | NumericalInterval.MinimalValue := Low(Byte); 23 | NumericalInterval.MaximalValue := High(Byte); 24 | end; 25 | 26 | end. -------------------------------------------------------------------------------- /Benchmark/uHardwareBenchmark.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Benchmark/uHardwareBenchmark.pas -------------------------------------------------------------------------------- /Commands/uExitCommand.pas: -------------------------------------------------------------------------------- 1 | unit uExitCommand; 2 | 3 | interface 4 | 5 | uses 6 | uCommonApplication, 7 | uSimpleCommand; 8 | 9 | type 10 | TExitCommand = class(TSimpleCommand) 11 | public 12 | constructor Create; 13 | 14 | procedure ExecuteNoParam; override; 15 | end; 16 | 17 | TQuitCommand = class(TExitCommand); 18 | 19 | implementation 20 | 21 | { TExitCommand } 22 | 23 | constructor TExitCommand.Create; 24 | begin 25 | inherited; 26 | 27 | Description := 'Terminate application.'; 28 | end; 29 | 30 | procedure TExitCommand.ExecuteNoParam; 31 | begin 32 | inherited; 33 | 34 | CommonApplication.Terminate; 35 | end; 36 | 37 | end. 38 | -------------------------------------------------------------------------------- /Commands/uRestartCommand.pas: -------------------------------------------------------------------------------- 1 | unit uRestartCommand; 2 | 3 | interface 4 | 5 | uses 6 | uExitCommand; 7 | 8 | type 9 | TRestartCommand = class(TExitCommand) 10 | public 11 | constructor Create; 12 | 13 | procedure ExecuteNoParam; override; 14 | end; 15 | 16 | implementation 17 | 18 | uses 19 | uCommonApplication; 20 | 21 | { TRestartCommand } 22 | 23 | constructor TRestartCommand.Create; 24 | begin 25 | inherited; 26 | 27 | Description := 'Restart application.'; 28 | end; 29 | 30 | procedure TRestartCommand.ExecuteNoParam; 31 | begin 32 | CommonApplication.RestartAfterClose := True; 33 | 34 | inherited; 35 | end; 36 | 37 | end. 38 | -------------------------------------------------------------------------------- /Commands/uUnsupportedCommand.pas: -------------------------------------------------------------------------------- 1 | unit uUnsupportedCommand; 2 | 3 | interface 4 | 5 | uses 6 | uCustomCommand; 7 | 8 | type 9 | TUnsupportedCommand = class(TCustomCommand) 10 | public 11 | procedure Execute(const AParameters: string); override; 12 | end; 13 | 14 | implementation 15 | 16 | uses 17 | SysUtils; 18 | 19 | { TUnsupportedCommand } 20 | 21 | procedure TUnsupportedCommand.Execute(const AParameters: string); 22 | begin 23 | inherited; 24 | 25 | raise ENotSupportedException.Create(Shortcut + ' command is not supported.'); 26 | end; 27 | 28 | end. 29 | -------------------------------------------------------------------------------- /Configure IDE/-autoconf.cmd: -------------------------------------------------------------------------------- 1 | rem run before Delphi IDE starts 2 | 3 | SxConfDelphi.exe -r -l lib.txt -b bpl.txt 4 | 5 | @IF NOT %ERRORLEVEL% EQU 0 PAUSE 6 | 7 | rem remove user environment variable sx-library 8 | setx sx-library "" 9 | 10 | @IF NOT %ERRORLEVEL% EQU 0 PAUSE 11 | -------------------------------------------------------------------------------- /Configure IDE/SxConfDelphi.exe: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Configure IDE/SxConfDelphi.exe -------------------------------------------------------------------------------- /Configure IDE/autoconf.cmd: -------------------------------------------------------------------------------- 1 | rem run before Delphi IDE starts 2 | 3 | rem set user environment variable sx-library to repository root 4 | pushd .. 5 | setx sx-library "%cd%" 6 | @IF NOT %ERRORLEVEL% EQU 0 PAUSE 7 | popd 8 | 9 | SxConfDelphi.exe -l lib.txt -b bpl.txt 10 | 11 | @IF NOT %ERRORLEVEL% EQU 0 PAUSE -------------------------------------------------------------------------------- /Configure IDE/bpl.txt: -------------------------------------------------------------------------------- 1 | -$(sx-library) 2 | $(sx-library)\Packages\LibD%DelphiShortName%.bpl -------------------------------------------------------------------------------- /Console/uCodePage.pas: -------------------------------------------------------------------------------- 1 | unit uCodePage; 2 | 3 | interface 4 | 5 | {$ifdef MSWINDOWS} 6 | uses 7 | Winapi.Windows; 8 | 9 | type 10 | TCodePage = ( 11 | cpAnsi = CP_ACP, // Windows code pages 12 | cpOEM = CP_OEMCP, // DOS 13 | cpMAC = CP_MACCP, 14 | cpSymbol = CP_SYMBOL, 15 | cpUTF7 = CP_UTF7, 16 | cpUTF8 = CP_UTF8); 17 | {$else} 18 | type 19 | TCodePage = ( 20 | cpUnknown, 21 | cpAnsi, 22 | cpUTF7, 23 | cpUTF8); 24 | {$endif} 25 | 26 | 27 | implementation 28 | 29 | end. 30 | -------------------------------------------------------------------------------- /Core/uBackupTest.pas: -------------------------------------------------------------------------------- 1 | unit uBackupTest; 2 | 3 | interface 4 | 5 | uses TestFrameWork; 6 | 7 | type 8 | TBackupTest = class(TTestCase) 9 | published 10 | procedure Test; 11 | end; 12 | 13 | implementation 14 | 15 | uses 16 | uTypes, 17 | SysUtils, 18 | uFiles, 19 | uBackup, 20 | uTemporaryDirectory; 21 | 22 | procedure TBackupTest.Test; 23 | var 24 | FileName: TFileName; 25 | i: SG; 26 | begin 27 | FileName := TemporaryDirectory.ProcessTempDir + 'data.txt'; 28 | for i := 0 to 199 do 29 | begin 30 | WriteStringToFile(FileName, 'text' + IntToStr(i), False); 31 | BackupFile(FileName, bfSame); 32 | end; 33 | end; 34 | 35 | initialization 36 | RegisterTest('Backup Test', TBackupTest.Suite); 37 | end. 38 | -------------------------------------------------------------------------------- /Core/uChar.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Core/uChar.pas -------------------------------------------------------------------------------- /Core/uCharsetTest.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Core/uCharsetTest.pas -------------------------------------------------------------------------------- /Core/uCommonOutput.pas: -------------------------------------------------------------------------------- 1 | unit uCommonOutput; 2 | 3 | interface 4 | 5 | uses 6 | uOutputInfo; 7 | 8 | var 9 | CommonOutput: IOutputInfo; 10 | 11 | implementation 12 | 13 | end. 14 | -------------------------------------------------------------------------------- /Core/uCustomWriter.pas: -------------------------------------------------------------------------------- 1 | unit uCustomWriter; 2 | 3 | interface 4 | 5 | type 6 | ICustomWriter = interface(IInterface) 7 | function AsString: string; 8 | end; 9 | 10 | implementation 11 | 12 | end. 13 | -------------------------------------------------------------------------------- /Core/uDistanceFormater.pas: -------------------------------------------------------------------------------- 1 | unit uDistanceFormater; 2 | 3 | interface 4 | 5 | uses 6 | uUnitFormatter; 7 | 8 | type 9 | TDistanceUnits = (duSI, duImperial); 10 | 11 | TDistanceFormater = class(TUnitFormatter) 12 | private 13 | FDistanceUnits: TDistanceUnits; 14 | procedure SetDistanceUnits(const Value: TDistanceUnits); 15 | public 16 | property DistanceUnits: TDistanceUnits read FDistanceUnits write SetDistanceUnits; 17 | end; 18 | 19 | implementation 20 | 21 | { TDistanceFormater } 22 | 23 | procedure TDistanceFormater.SetDistanceUnits(const Value: TDistanceUnits); 24 | begin 25 | FDistanceUnits := Value; 26 | end; 27 | 28 | end. 29 | -------------------------------------------------------------------------------- /Core/uEExternalApplication.pas: -------------------------------------------------------------------------------- 1 | unit uEExternalApplication; 2 | 3 | interface 4 | 5 | uses 6 | SysUtils, 7 | uTypes; 8 | 9 | type 10 | EExternalApplication = class(EExternal) 11 | public 12 | constructor Create(const APath: string; const AExitCode: U4; const AOuput: string); 13 | end; 14 | 15 | implementation 16 | 17 | uses 18 | uOutputFormat; 19 | 20 | { EExternalException } 21 | 22 | constructor EExternalApplication.Create(const APath: string; const AExitCode: U4; const AOuput: string); 23 | begin 24 | Message := '"' + APath + '" exit code is ' + ExitCodeToString(AExitCode, ofIO) + ', Output: ' + AOuput; 25 | end; 26 | 27 | end. 28 | -------------------------------------------------------------------------------- /Core/uEIOException.pas: -------------------------------------------------------------------------------- 1 | unit uEIOException; 2 | 3 | interface 4 | 5 | uses 6 | SysUtils, 7 | uTypes; 8 | 9 | type 10 | EIOException = class(EInOutError) 11 | public 12 | constructor Create(const APath: string; const AErrorCode: U4); 13 | end; 14 | 15 | implementation 16 | 17 | {$ifdef MSWINDOWS} 18 | uses 19 | uErrorCodeToStr; 20 | {$endif} 21 | 22 | { EIOException } 23 | 24 | constructor EIOException.Create(const APath: string; const AErrorCode: U4); 25 | begin 26 | {$ifdef MSWINDOWS} 27 | Message := ErrorCodeToStr(AErrorCode) + ': ' + APath; 28 | {$else} 29 | Message := IntToStr(AErrorCode) + ': ' + APath; 30 | {$endif} 31 | end; 32 | 33 | end. 34 | 35 | -------------------------------------------------------------------------------- /Core/uEReadFileException.pas: -------------------------------------------------------------------------------- 1 | unit uEReadFileException; 2 | 3 | interface 4 | 5 | uses 6 | SysUtils, 7 | uTypes; 8 | 9 | type 10 | EReadFileException = class(Exception) 11 | public 12 | constructor Create(const APath: string; const AErrorMessage: string); overload; 13 | end; 14 | 15 | implementation 16 | 17 | uses 18 | uMsg; 19 | 20 | { EReadFileException } 21 | 22 | constructor EReadFileException.Create(const APath, AErrorMessage: string); 23 | begin 24 | Message := AErrorMessage + ': ' + APath; 25 | end; 26 | 27 | end. 28 | -------------------------------------------------------------------------------- /Core/uETimeOutException.pas: -------------------------------------------------------------------------------- 1 | unit uETimeOutException; 2 | 3 | interface 4 | 5 | uses 6 | SysUtils; 7 | 8 | type 9 | ETimeOutException = class(Exception); 10 | 11 | implementation 12 | 13 | end. 14 | -------------------------------------------------------------------------------- /Core/uEscapeTest.pas: -------------------------------------------------------------------------------- 1 | unit uEscapeTest; 2 | 3 | interface 4 | 5 | uses TestFrameWork; 6 | 7 | type 8 | TEscapeTest = class(TTestCase) 9 | published 10 | procedure Test; 11 | end; 12 | 13 | implementation 14 | 15 | uses 16 | uTypes, uStrings, uEscape; 17 | 18 | { TEscapeTest } 19 | 20 | procedure TEscapeTest.Test; 21 | var 22 | i: SG; 23 | Original, Escaped, Unescaped: string; 24 | begin 25 | for i := 0 to 99 do 26 | begin 27 | Original := RandomString(i); 28 | Escaped := AddEscape(Original); 29 | Unescaped := RemoveEscape(Escaped); 30 | Check(Original = Unescaped, 'AddEscape & RemoveEscape is not compatible'); 31 | end; 32 | end; 33 | 34 | initialization 35 | RegisterTest('Escape Test', TEscapeTest.Suite); 36 | end. 37 | -------------------------------------------------------------------------------- /Core/uIntegerList.pas: -------------------------------------------------------------------------------- 1 | unit uIntegerList; 2 | 3 | interface 4 | 5 | uses 6 | uComparableList; 7 | 8 | type 9 | TIntegerList = TComparableList; 10 | 11 | implementation 12 | 13 | end. 14 | -------------------------------------------------------------------------------- /Core/uMathTest.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Core/uMathTest.pas -------------------------------------------------------------------------------- /Core/uMessageLevel.pas: -------------------------------------------------------------------------------- 1 | unit uMessageLevel; 2 | 3 | interface 4 | 5 | uses 6 | uTypes; 7 | 8 | type 9 | TMessageLevel = uTypes.TMessageLevel; 10 | 11 | var 12 | MessageLevelStr: array[TMessageLevel] of string; 13 | 14 | implementation 15 | 16 | uses 17 | uStrings; 18 | 19 | initialization 20 | {$IFNDEF NoInitialization} 21 | EnumToStr(TypeInfo(TMessageLevel), MessageLevelStr); 22 | {$ENDIF NoInitialization} 23 | end. 24 | -------------------------------------------------------------------------------- /Core/uNamedObject.pas: -------------------------------------------------------------------------------- 1 | unit uNamedObject; 2 | 3 | interface 4 | 5 | type 6 | TNamedObject = class(TObject) 7 | private 8 | FName: string; 9 | procedure SetName(const Value: string); 10 | public 11 | property Name: string read FName write SetName; 12 | end; 13 | 14 | implementation 15 | 16 | { TNamedObject } 17 | 18 | procedure TNamedObject.SetName(const Value: string); 19 | begin 20 | FName := Value; 21 | end; 22 | 23 | end. 24 | -------------------------------------------------------------------------------- /Core/uNumberFormater.pas: -------------------------------------------------------------------------------- 1 | unit uNumberFormatter; 2 | 3 | interface 4 | 5 | uses 6 | uNumberFormatter; 7 | 8 | type 9 | TNumberFormatter = class(TFormatter) 10 | public 11 | function Format(const AValue: FG): string; 12 | function Format(const AValue: SG): string; 13 | end; 14 | 15 | implementation 16 | 17 | uses 18 | uOutputFormat; 19 | 20 | { TNumberFormatter } 21 | 22 | function TNumberFormatter.Format(const AValue: FG): string; 23 | begin 24 | Result := FToS(AValue); 25 | end; 26 | 27 | function TNumberFormatter.Format(const AValue: SG): string; 28 | begin 29 | Result := NToS(AValue); 30 | end; 31 | 32 | end. 33 | -------------------------------------------------------------------------------- /Core/uObjectFactoryTest.pas: -------------------------------------------------------------------------------- 1 | unit uObjectFactoryTest; 2 | 3 | interface 4 | 5 | uses TestFrameWork; 6 | 7 | type 8 | TObjectFactoryTest = class(TTestCase) 9 | published 10 | procedure Test; 11 | end; 12 | 13 | implementation 14 | 15 | uses 16 | uObjectFactory; 17 | 18 | { TObjectFactoryTest } 19 | 20 | procedure TObjectFactoryTest.Test; 21 | var 22 | ObjectFactory: TObjectFactory; 23 | begin 24 | ObjectFactory := TObjectFactory.Create; 25 | try 26 | 27 | finally 28 | ObjectFactory.Free; 29 | end; 30 | 31 | CheckTrue(True, ''); 32 | end; 33 | 34 | initialization 35 | RegisterTest('Object Factory Test', TObjectFactoryTest.Suite); 36 | end. 37 | -------------------------------------------------------------------------------- /Core/uPowerRequest.pas: -------------------------------------------------------------------------------- 1 | unit uPowerRequest; 2 | 3 | interface 4 | 5 | {$ifdef MSWINDOWS} 6 | uses 7 | uWindowsPowerRequest; 8 | 9 | type 10 | TPowerRequest = TWindowsPowerRequest; 11 | 12 | {$else} 13 | uses 14 | uCustomPowerRequest; 15 | 16 | type 17 | TPowerRequest = TCustomPowerRequest; 18 | 19 | {$endif} 20 | 21 | implementation 22 | 23 | end. 24 | -------------------------------------------------------------------------------- /Core/uProcessMemory.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Core/uProcessMemory.pas -------------------------------------------------------------------------------- /Core/uStrings.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Core/uStrings.pas -------------------------------------------------------------------------------- /Core/uToHTML.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Core/uToHTML.pas -------------------------------------------------------------------------------- /Core/uUndo.pas: -------------------------------------------------------------------------------- 1 | unit uUndo; 2 | 3 | interface 4 | 5 | uses 6 | uTypes; 7 | 8 | type 9 | TUndo = class(TObject) 10 | private 11 | FName: string; 12 | FDateTime: TDateTime; 13 | public 14 | constructor Create(const Name: string); 15 | destructor Destroy; override; 16 | function GetSize: U8; virtual; abstract; 17 | // function Data; virtual; abstract; 18 | property Name: string read FName; 19 | end; 20 | 21 | implementation 22 | 23 | uses SysUtils; 24 | 25 | { TUndo } 26 | 27 | constructor TUndo.Create(const Name: string); 28 | begin 29 | FName := Name; 30 | FDateTime := Now; 31 | end; 32 | 33 | destructor TUndo.Destroy; 34 | begin 35 | // FName := ''; 36 | end; 37 | 38 | end. 39 | -------------------------------------------------------------------------------- /Core/uUsageInfoTest.pas: -------------------------------------------------------------------------------- 1 | unit uUsageInfoTest; 2 | 3 | interface 4 | 5 | uses 6 | uTypes, 7 | TestFrameWork; 8 | 9 | type 10 | TUsageInfoTest = class(TTestCase) 11 | published 12 | procedure Test; 13 | end; 14 | 15 | implementation 16 | 17 | uses 18 | uCommonApplication, 19 | uUsageInfo; 20 | 21 | { TUsageInfoTest } 22 | 23 | procedure TUsageInfoTest.Test; 24 | begin 25 | CommonApplication := TCommonApplication.Create; 26 | try 27 | TryUploadData(True); 28 | finally 29 | CommonApplication.Free; 30 | end; 31 | end; 32 | 33 | initialization 34 | RegisterTest('Usage Info Test', TUsageInfoTest.Suite); 35 | end. 36 | -------------------------------------------------------------------------------- /Core/uVector.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Core/uVector.pas -------------------------------------------------------------------------------- /Executable/ReadMe.txt: -------------------------------------------------------------------------------- 1 | Inheritance: 2 | 3 | Custom Application 4 | Dynamic Link Library 5 | Service Application 6 | UI Application 7 | Console Application 8 | Command Console Application 9 | GUI Application 10 | Screen Saver Application -------------------------------------------------------------------------------- /Executable/uCustomSplashScreen.pas: -------------------------------------------------------------------------------- 1 | unit uCustomSplashScreen; 2 | 3 | interface 4 | 5 | type 6 | TCustomSplashScreen = class 7 | public 8 | procedure Show; virtual; abstract; 9 | procedure AddMessage(const AText: string); virtual; abstract; 10 | procedure Hide; virtual; abstract; 11 | end; 12 | 13 | implementation 14 | 15 | end. 16 | -------------------------------------------------------------------------------- /Executable/uDUnitApplication.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Executable/uDUnitApplication.pas -------------------------------------------------------------------------------- /Executable/uDUnitXApplication.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Executable/uDUnitXApplication.pas -------------------------------------------------------------------------------- /Executable/uLargeAddressAware.pas: -------------------------------------------------------------------------------- 1 | // The 32 bit application can handle addresses larger than 2 GB. 2 | 3 | unit uLargeAddressAware; 4 | 5 | interface 6 | 7 | implementation 8 | 9 | {$ifdef WIN32} 10 | {$if CompilerVersion >= 18} 11 | uses 12 | Windows; 13 | {$else} 14 | const 15 | IMAGE_FILE_LARGE_ADDRESS_AWARE = $20; 16 | {$endif} 17 | 18 | {$SetPEFlags IMAGE_FILE_LARGE_ADDRESS_AWARE} 19 | {$endif} 20 | 21 | end. 22 | -------------------------------------------------------------------------------- /ExtLib/CoolTrayIcon/CoolTrayIcon.chm: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/CoolTrayIcon/CoolTrayIcon.chm -------------------------------------------------------------------------------- /ExtLib/CoolTrayIcon/CoolTrayIcon.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/CoolTrayIcon/CoolTrayIcon.dcr -------------------------------------------------------------------------------- /ExtLib/CoolTrayIcon/TextTrayIcon.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/CoolTrayIcon/TextTrayIcon.dcr -------------------------------------------------------------------------------- /ExtLib/CoolTrayIcon/convert_st_projects.txt: -------------------------------------------------------------------------------- 1 | Version 2.0.0 of SimpleTimer is incompatible with older versions, which 2 | means you will have to adjust your previous projects that use SimpleTimer. 3 | 4 | 5 | 1) The Start and Stop methods have been replaced with the Enabled and Interval 6 | properties, to make SimpleTimer more interchangeable with TTimer. 7 | 8 | To start the timer you will need to first set the Interval, then set Enabled 9 | to True (just like TTimer). Also, you must specify an OnTimer event method 10 | (see below). 11 | 12 | 13 | 2) The callback method you used for receiving notifications from a SimpleTimer 14 | object has been replaced by an OnTimer event. This both makes SimpleTimer 15 | easier to use and makes it look more like TTimer. 16 | 17 | -------------------------------------------------------------------------------- /ExtLib/CoolTrayIcon/docs/History - CoolTrayIcon.txt: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/CoolTrayIcon/docs/History - CoolTrayIcon.txt -------------------------------------------------------------------------------- /ExtLib/CoolTrayIcon/readme.txt: -------------------------------------------------------------------------------- 1 | This zip-file contains the two Delphi components, CoolTrayIcon and 2 | TextTrayIcon (tray icon components). 3 | 4 | Refer to CoolTrayIcon.chm and install.txt for documentation. 5 | 6 | See also convert_cti_projects.txt if you're upgrading from a previous version 7 | of CoolTrayIcon/TextTrayIcon. 8 | 9 | ***** If you redistribute this package, please include all original files. ***** 10 | 11 | -------------------------------------------------------------------------------- /ExtLib/DCPCrypt/DCPciphers.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DCPCrypt/DCPciphers.dcr -------------------------------------------------------------------------------- /ExtLib/DCPCrypt/DCPdelphi4.dof: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DCPCrypt/DCPdelphi4.dof -------------------------------------------------------------------------------- /ExtLib/DCPCrypt/DCPdelphi5.dof: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DCPCrypt/DCPdelphi5.dof -------------------------------------------------------------------------------- /ExtLib/DCPCrypt/DCPdelphi6.dof: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DCPCrypt/DCPdelphi6.dof -------------------------------------------------------------------------------- /ExtLib/DCPCrypt/DCPdelphi6_Icon.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DCPCrypt/DCPdelphi6_Icon.ico -------------------------------------------------------------------------------- /ExtLib/DCPCrypt/DCPdelphi6_Icon1.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DCPCrypt/DCPdelphi6_Icon1.ico -------------------------------------------------------------------------------- /ExtLib/DCPCrypt/DCPdelphi6_Icon2.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DCPCrypt/DCPdelphi6_Icon2.ico -------------------------------------------------------------------------------- /ExtLib/DCPCrypt/DCPhashes.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DCPCrypt/DCPhashes.dcr -------------------------------------------------------------------------------- /ExtLib/DCPCrypt/DCPkylix.conf: -------------------------------------------------------------------------------- 1 | -$A8 2 | -$B- 3 | -$C+ 4 | -$D+ 5 | -$E- 6 | -$F- 7 | -$G+ 8 | -$H+ 9 | -$I+ 10 | -$J- 11 | -$K- 12 | -$L+ 13 | -$M- 14 | -$N+ 15 | -$O+ 16 | -$P+ 17 | -$Q- 18 | -$R- 19 | -$S- 20 | -$T- 21 | -$U- 22 | -$V+ 23 | -$W- 24 | -$X+ 25 | -$YD 26 | -$Z1 27 | -cg 28 | -H+ 29 | -W+ 30 | -M 31 | -$M16384,1048576 32 | -K$00400000 33 | -Z 34 | -------------------------------------------------------------------------------- /ExtLib/DCPCrypt/Docs/osi-certified-120x100.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DCPCrypt/Docs/osi-certified-120x100.png -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Docs/applet.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/DUnitWizard/Docs/applet.png -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Docs/behaviour.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/DUnitWizard/Docs/behaviour.png -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Docs/default.css: -------------------------------------------------------------------------------- 1 | .default { font-family: Verdana, "Trebuchet MS", Arial, Helvetica, sans-serif; font-size: 14px; font-style: normal; line-height: normal} 2 | a { text-decoration: none} 3 | .ide { font-family: Arial, Helvetica, sans-serif; font-size: 12px} 4 | .dkeyword { font-family: "Courier New", Courier, mono; font-size: 12px; font-weight: bold} 5 | .example { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 12px; background-color: #E0FFC1; white-space: pre} 6 | -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Docs/dunit_wizard.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/DUnitWizard/Docs/dunit_wizard.png -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Docs/index.htm: -------------------------------------------------------------------------------- 1 | 2 | 3 | DUnitWizard 3.0 documentation 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 | 13 | 14 | <body bgcolor="#FFFFFF" text="#000000"> 15 | </body> 16 | 17 | 18 | -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Docs/menu.jpg: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/DUnitWizard/Docs/menu.jpg -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Docs/menu.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/DUnitWizard/Docs/menu.png -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Docs/newClass.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/DUnitWizard/Docs/newClass.png -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Docs/newProject.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/DUnitWizard/Docs/newProject.png -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Docs/newTestModule.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/DUnitWizard/Docs/newTestModule.png -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Docs/parameters.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/DUnitWizard/Docs/parameters.png -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Docs/title.htm: -------------------------------------------------------------------------------- 1 | 2 | 3 | Untitled Document 4 | 5 | 6 | 7 | 8 | 9 |
10 |

DUnitWizard 11 | 3.0 documentation

12 |
13 | 14 | 15 | -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/Common/XPPascalScanner.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/Common/XPPascalScanner.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/Common/XP_OTAEditorUtils.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/Common/XP_OTAEditorUtils.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/ProjectSource.txt: -------------------------------------------------------------------------------- 1 | // Uncomment the following directive to create a console application 2 | // or leave commented to create a GUI application... 3 | // {$APPTYPE CONSOLE} 4 | 5 | program #PROJECTNAME; 6 | 7 | uses 8 | TestFramework {$IFDEF LINUX}, 9 | QForms, 10 | QGUITestRunner {$ELSE}, 11 | Forms, 12 | GUITestRunner {$ENDIF}, 13 | TextTestRunner; 14 | 15 | {$R *.RES} 16 | 17 | begin 18 | Application.Initialize; 19 | 20 | {$IFDEF LINUX} 21 | QGUITestRunner.RunRegisteredTests; 22 | {$ELSE} 23 | if System.IsConsole then 24 | TextTestRunner.RunRegisteredTests 25 | else 26 | GUITestRunner.RunRegisteredTests; 27 | {$ENDIF} 28 | 29 | end. 30 | 31 | -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/TestClassDecl.txt: -------------------------------------------------------------------------------- 1 | type 2 | #CLASSNAME = class(TTestCase) 3 | private 4 | 5 | protected 6 | 7 | // procedure SetUp; override; 8 | // procedure TearDown; override; 9 | 10 | published 11 | 12 | // Test methods 13 | #TESTMETHODDECLBLOCK 14 | 15 | end; 16 | 17 | -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/TestMethodDecl.txt: -------------------------------------------------------------------------------- 1 | procedure #METHODNAME; 2 | -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/TestModule.txt: -------------------------------------------------------------------------------- 1 | unit #UNITNAME; 2 | 3 | interface 4 | 5 | uses 6 | #USESTESTEDUNIT 7 | TestFrameWork; 8 | 9 | #TESTCLASSDECLBLOCK 10 | implementation 11 | 12 | initialization 13 | 14 | #TESTSUITEREGBLOCK 15 | 16 | end. 17 | -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/TestSuiteReg.txt: -------------------------------------------------------------------------------- 1 | TestFramework.RegisterTest('#UNITNAME Suite', 2 | #CLASSNAME.Suite); 3 | -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/UsesTestedUnit.txt: -------------------------------------------------------------------------------- 1 | #TESTEDUNITNAME, 2 | -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/XPDUnitProjectWizard.rc: -------------------------------------------------------------------------------- 1 | DUNIT_PROJECT_ICON ICON dunit_project256.ico 2 | DUNIT_PROJECTSOURCE_TEXT RCDATA ProjectSource.txt 3 | DUNIT_PROJECT_MENU BITMAP dunit_project.bmp 4 | 5 | -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/XPDUnitTestClassWizard.rc: -------------------------------------------------------------------------------- 1 | DUNIT_TESTCLASS_MENU BITMAP dunit_testclass.bmp 2 | 3 | -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/XPDUnitTestModuleWizard.rc: -------------------------------------------------------------------------------- 1 | DUNIT_TESTMODULE_ICON ICON dunit_testmodule256.ico 2 | DUNIT_TESTMODULE_MENU BITMAP dunit_testmodule.bmp 3 | 4 | -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/XPTextTemplates.rc: -------------------------------------------------------------------------------- 1 | DUNIT_TESTMODULE_TEXT RCDATA TestModule.txt 2 | DUNIT_TESTCLASSDECL_TEXT RCDATA TestClassDecl.txt 3 | DUNIT_TESTMETHODDECL_TEXT RCDATA TestMethodDecl.txt 4 | DUNIT_TESTSUITEREG_TEXT RCDATA TestSuiteReg.txt 5 | DUNIT_USESTESTEDUNIT_TEXT RCDATA UsesTestedUnit.txt 6 | 7 | -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/dunit/WizardFormsDemo.dpr: -------------------------------------------------------------------------------- 1 | program WizardFormsDemo; 2 | 3 | uses 4 | Forms, 5 | XPDUnitSetup in '..\XPDUnitSetup.pas' {XPDUnitSetupForm}, 6 | WizardFormsDemoMain in 'WizardFormsDemoMain.pas' {Form1}, 7 | XPDUnitTestModule in '..\XPDUnitTestModule.pas' {XPDUnitTestCaseForm}, 8 | XPDUnitProject in '..\XPDUnitProject.pas' {XPDUnitProjectForm}, 9 | XPTestedUnitParser in '..\XPTestedUnitParser.pas', 10 | TestedUnitStream in 'TestedUnitStream.pas'; 11 | 12 | {$R *.RES} 13 | 14 | begin 15 | Application.Initialize; 16 | Application.CreateForm(TForm1, Form1); 17 | Application.Run; 18 | end. 19 | -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/dunit_project.bmp: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/dunit_project.bmp -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/dunit_project16.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/dunit_project16.ico -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/dunit_project256.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/dunit_project256.ico -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/dunit_testclass.bmp: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/dunit_testclass.bmp -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/dunit_testmodule.bmp: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/dunit_testmodule.bmp -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/dunit_testmodule16.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/dunit_testmodule16.ico -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/dunit_testmodule256.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/dunit_testmodule256.ico -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XMLReporting/XMLTestRunner.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/XMLReporting/XMLTestRunner.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/Makefile: -------------------------------------------------------------------------------- 1 | #$Id: Makefile,v 1.6 2008/04/18 02:32:56 judc Exp $ 2 | ROOT=..\.. 3 | 4 | include $(ROOT)\Rules.mak 5 | 6 | structure: 7 | $(DCC) -B -CC testXpgen.dpr 8 | $(BIN_DIR)\testXpgen.exe 9 | 10 | guitest: 11 | $(DCC) -B -CG testXpgen.dpr 12 | $(BIN_DIR)\testXpgen.exe 13 | -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/TEST_Parse_Unit_Heading.txt: -------------------------------------------------------------------------------- 1 | unit TEST_xpParse; 2 | -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/TEST_Parse_uses_clause.txt: -------------------------------------------------------------------------------- 1 | uses 2 | DUnit, 3 | // windows 4 | (*parseDef,*) 5 | {xpParse,} 6 | SysUtils; 7 | -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/TEST_Parse_var_paragraph.txt: -------------------------------------------------------------------------------- 1 | var 2 | oldLimit, 3 | oldItems, 4 | i :Integer; 5 | j :IIterator; 6 | o :IUnknown; 7 | t 8 | n :TTreeNode; 9 | HitInfo :THitTests; 10 | Pos :TPoint; 11 | -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/TEST_SyncToken.txt: -------------------------------------------------------------------------------- 1 | unit TEST_xpParse; 2 | -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/listsupport.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/XPGen/listsupport.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/parsedef.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/XPGen/parsedef.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/suite_xpgen.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/XPGen/suite_xpgen.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/testNextToken.txt: -------------------------------------------------------------------------------- 1 | begin end 2 | if(a = b) then do 3 | 'this is a full string'; 4 | -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/testXpgen.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/XPGen/testXpgen.dpr -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/testXpgenLib.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/XPGen/testXpgenLib.dpr -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/test_Get_Token.txt: -------------------------------------------------------------------------------- 1 | unit TEST_xpParse; 2 | { 3 | Unit : TEST_xpParse 4 | 5 | Description : A Big Nasty Comment that should be skipped 6 | 7 | Programmer : mike 8 | 9 | Date : 15-Jul-2000 10 | } 11 | ()[]:=*/+ 12 | interface 13 | (* This is an old school comment *) 14 | 15 | uses 16 | // This one of those brain dead CPP 17 | DUnit, 18 | xpParse, 19 | SysUtils; 20 | 21 | 22 | 23 | -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/test_ParseEventDef.txt: -------------------------------------------------------------------------------- 1 | 2 | SimpleEventDef = procedure (Sender: TObject) of object; 3 | 4 | ComplexEventDef = procedure (Sender: TObject;MyParam : double) of object; 5 | 6 | -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/test_xpLex.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/XPGen/test_xpLex.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/test_xpParse.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/XPGen/test_xpParse.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/testunit.dfm: -------------------------------------------------------------------------------- 1 | object Form2: TForm2 2 | Left = 168 3 | Top = 264 4 | Width = 870 5 | Height = 640 6 | Caption = 'Form2' 7 | Color = clBtnFace 8 | Font.Charset = DEFAULT_CHARSET 9 | Font.Color = clWindowText 10 | Font.Height = -11 11 | Font.Name = 'Microsoft Sans Serif' 12 | Font.Style = [] 13 | OldCreateOrder = False 14 | Visible = True 15 | PixelsPerInch = 96 16 | TextHeight = 13 17 | end 18 | -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/testunit.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/XPGen/testunit.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/xpCodeGen.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/XPGen/xpCodeGen.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/xpLex.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/XPGen/xpLex.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/xpParse.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/XPGen/xpParse.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/xpgen.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/XPGen/xpgen.dpr -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/xpmain.dfm: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/XPGen/xpmain.dfm -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/xpmain.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/Contrib/XPGen/xpmain.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/DUNIT.HLP: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/doc/DUNIT.HLP -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/README_CHT.html: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/doc/README_CHT.html -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/china.gif: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/doc/images/china.gif -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/dunit_name.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/doc/images/dunit_name.png -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/environment_options.jpg: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/doc/images/environment_options.jpg -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/jira_button_120wx60h.gif: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/doc/images/jira_button_120wx60h.gif -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/project_options.jpg: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/doc/images/project_options.jpg -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/screenshot.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/doc/images/screenshot.png -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/screenshot_running.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/doc/images/screenshot_running.png -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/tw.jpg: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/doc/images/tw.jpg -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/usa.gif: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/doc/images/usa.gif -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/wincvs_setup_1.jpg: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/doc/images/wincvs_setup_1.jpg -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/wincvs_setup_2.jpg: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/doc/images/wincvs_setup_2.jpg -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/xtao128.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/doc/images/xtao128.png -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/xtao128_new.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/doc/images/xtao128_new.png -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/xtao16-16.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/doc/images/xtao16-16.png -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/xtao16-256.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/doc/images/xtao16-256.png -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/xtao16.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/doc/images/xtao16.png -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/xtao256.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/doc/images/xtao256.png -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/xtao32-256.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/doc/images/xtao32-256.png -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/xtao32.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/doc/images/xtao32.png -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/xtao64.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/doc/images/xtao64.png -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/index.html: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/doc/index.html -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/tutorial.doc: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/doc/tutorial.doc -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/tutorial_files/image002.gif: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/doc/tutorial_files/image002.gif -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/tutorial_files/image003.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/doc/tutorial_files/image003.png -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/tutorial_files/image004.jpg: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/doc/tutorial_files/image004.jpg -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/tutorial_files/image006.gif: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/doc/tutorial_files/image006.gif -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/tutorial_files/image007.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/doc/tutorial_files/image007.png -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/tutorial_files/image008.jpg: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/doc/tutorial_files/image008.jpg -------------------------------------------------------------------------------- /ExtLib/DUnit/etc/versioninfo.template.inc: -------------------------------------------------------------------------------- 1 | ReleaseNo : array[1..3] of Integer 2 | = (${comma.version}); 3 | ReleaseStr = '${version}'; 4 | ReleaseName = ''; 5 | ReleaseWhen : array[1..6] of Integer 6 | = (${when}); 7 | ReleaseYear = ${year}; 8 | ReleaseMonth = ${month}; 9 | ReleaseDay = ${day}; 10 | ReleaseHour = ${hour}; 11 | ReleaseMinute = ${minute}; 12 | 13 | -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/ChecklessTests/FailChecklessTestsDemo.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/examples/ChecklessTests/FailChecklessTestsDemo.dpr -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/ChecklessTests/TestFailChecklessTests.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/examples/ChecklessTests/TestFailChecklessTests.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/HaltRepeating/DemoHaltOnError.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/examples/HaltRepeating/DemoHaltOnError.dpr -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/HaltRepeating/DemoHaltRepeatingOnError.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/examples/HaltRepeating/DemoHaltRepeatingOnError.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/MemLeakDetect/LeakTestDemo.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/examples/MemLeakDetect/LeakTestDemo.dpr -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/MemLeakDetect/UnitTestLeak.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/examples/MemLeakDetect/UnitTestLeak.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/MemLeakDetect/UnitTestSetup.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/examples/MemLeakDetect/UnitTestSetup.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/TListTest/Makefile: -------------------------------------------------------------------------------- 1 | #$Id: Makefile,v 1.4 2008/04/18 02:32:59 judc Exp $ 2 | ROOT=..\.. 3 | 4 | include $(ROOT)\Rules.mak 5 | 6 | tlist: 7 | $(DCC) -B ListTest.dpr 8 | 9 | -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/cmdline/Makefile: -------------------------------------------------------------------------------- 1 | #$Id: Makefile,v 1.5 2008/04/18 02:32:59 judc Exp $ 2 | ROOT=../.. 3 | include $(ROOT)/Rules.mak 4 | 5 | cmdline: 6 | $(DCC) -B Project1.dpr 7 | $(DCC) -B Project1Test.dpr 8 | -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/cmdline/Project1.dpr: -------------------------------------------------------------------------------- 1 | program Project1; 2 | 3 | uses 4 | Unit1, Unit2; 5 | 6 | {$R *.res} 7 | 8 | begin 9 | // do stuff with Unit1 and Unit2 10 | end. 11 | 12 | -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/cmdline/Unit1.pas: -------------------------------------------------------------------------------- 1 | unit Unit1; 2 | 3 | interface 4 | 5 | type 6 | TMyObject = class(TObject) 7 | public 8 | procedure DoSomething; 9 | end; 10 | 11 | implementation 12 | 13 | { TMyObject } 14 | 15 | procedure TMyObject.DoSomething; 16 | begin 17 | // do something 18 | end; 19 | 20 | end. 21 | 22 | -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/cmdline/Unit2.pas: -------------------------------------------------------------------------------- 1 | unit Unit2; 2 | 3 | interface 4 | 5 | type 6 | TSuperObject = class(TObject) 7 | public 8 | function DoSomethingSuper: boolean; 9 | end; 10 | 11 | implementation 12 | 13 | { TSuperObject } 14 | 15 | function TSuperObject.DoSomethingSuper: boolean; 16 | begin 17 | // do something ... 18 | Result := (Random < 0.5); 19 | end; 20 | 21 | end. 22 | 23 | -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/cmdline/runtest.cmd: -------------------------------------------------------------------------------- 1 | echo off 2 | Project1Test.exe %1 3 | if ERRORLEVEL 1 echo ********* Test(s) failed! ******** 4 | -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/embeddable/EmbeddableGUITestRunner.dfm: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/examples/embeddable/EmbeddableGUITestRunner.dfm -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/registration/Makefile: -------------------------------------------------------------------------------- 1 | #$Id: Makefile,v 1.4 2008/04/18 02:32:59 judc Exp $ 2 | ROOT=../.. 3 | 4 | include $(ROOT)/Rules.mak 5 | 6 | registration: 7 | $(DCC) -B UnitReg.dpr 8 | 9 | -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/registration/TestUnit1.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/examples/registration/TestUnit1.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/registration/TestUnit2.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/examples/registration/TestUnit2.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/registration/TestUnit3.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/examples/registration/TestUnit3.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/registration/UnitReg.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/examples/registration/UnitReg.dpr -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/registry/Makefile: -------------------------------------------------------------------------------- 1 | #$Id: Makefile,v 1.5 2008/04/18 02:32:59 judc Exp $ 2 | ROOT=..\.. 3 | 4 | include $(ROOT)\Rules.mak 5 | 6 | all: 7 | $(DCC) -B Step1\RegistryTest.dpr 8 | $(DCC) -B Step2\RegistryTest.dpr 9 | $(DCC) -B Step3\RegistryTest.dpr 10 | 11 | -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/registry/Step1/RegistryTest.dpr: -------------------------------------------------------------------------------- 1 | program RegistryTest; 2 | 3 | uses 4 | TestFramework, 5 | GUITestRunner, 6 | RegistryUnitTest; 7 | 8 | {$R *.RES} 9 | 10 | function MasterTestSuite: ITestSuite; 11 | begin 12 | Result := TTestSuite.Create; 13 | Result.AddTest(RegistryUnitTest.Suite); 14 | end; 15 | 16 | begin 17 | GUITestRunner.RunTest(MasterTestSuite); 18 | 19 | end. 20 | -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/registry/Step2/RegistryTest.dpr: -------------------------------------------------------------------------------- 1 | program RegistryTest; 2 | 3 | uses 4 | TestFramework, 5 | GUITestRunner, 6 | RegistryUnitTest; 7 | 8 | {$R *.RES} 9 | 10 | function MasterTestSuite: ITestSuite; 11 | begin 12 | Result := TTestSuite.Create; 13 | Result.AddTest(RegistryUnitTest.Suite); 14 | end; 15 | 16 | begin 17 | GUITestRunner.RunTest(MasterTestSuite); 18 | end. 19 | -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/registry/Step3/RegistryTest.dpr: -------------------------------------------------------------------------------- 1 | program RegistryTest; 2 | 3 | uses 4 | TestFramework, 5 | GUITestRunner, 6 | RegistryUnitTest; 7 | 8 | {$R *.RES} 9 | 10 | function MasterTestSuite: ITestSuite; 11 | begin 12 | Result := TTestSuite.Create; 13 | Result.AddTest(RegistryUnitTest.Suite); 14 | end; 15 | 16 | begin 17 | GUITestRunner.RunTest(MasterTestSuite); 18 | 19 | end. 20 | -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/structure/Makefile: -------------------------------------------------------------------------------- 1 | #$Id: Makefile,v 1.6 2008/04/18 02:33:00 judc Exp $ 2 | ROOT=..\.. 3 | 4 | include $(ROOT)\Rules.mak 5 | 6 | structure: 7 | $(DCC) -B diffunit\Project1.dpr 8 | $(DCC) -B -DTESTING diffunit\Project1Test.dpr 9 | $(DCC) -B sameunit\Project1.dpr 10 | $(DCC) -B -DTESTING sameunit\Project1Test.dpr 11 | 12 | -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/structure/diffunit/Project1.dpr: -------------------------------------------------------------------------------- 1 | program Project1; 2 | 3 | uses 4 | Unit1, Unit2; 5 | 6 | {$R *.res} 7 | 8 | begin 9 | // do stuff with Unit1 and Unit2 10 | end. 11 | 12 | -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/structure/diffunit/Project1Test.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/examples/structure/diffunit/Project1Test.dpr -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/structure/diffunit/Unit1.pas: -------------------------------------------------------------------------------- 1 | unit Unit1; 2 | 3 | interface 4 | 5 | type 6 | TMyObject = class(TObject) 7 | public 8 | procedure DoSomething; 9 | end; 10 | 11 | implementation 12 | 13 | { TMyObject } 14 | 15 | procedure TMyObject.DoSomething; 16 | begin 17 | // do something 18 | end; 19 | 20 | end. 21 | 22 | -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/structure/diffunit/Unit2.pas: -------------------------------------------------------------------------------- 1 | unit Unit2; 2 | 3 | interface 4 | 5 | type 6 | TSuperObject = class(TObject) 7 | public 8 | function DoSomethingSuper: boolean; 9 | end; 10 | 11 | implementation 12 | 13 | { TSuperObject } 14 | 15 | function TSuperObject.DoSomethingSuper: boolean; 16 | begin 17 | // do something ... 18 | Result := (Random < 0.5); 19 | end; 20 | 21 | end. 22 | 23 | -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/structure/diffunit/UnitStructure.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/examples/structure/diffunit/UnitStructure.png -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/structure/readme.html: -------------------------------------------------------------------------------- 1 | 2 | 3 | 4 | 5 | 8 | 11 | 12 | 13 | 16 | 19 | 20 |
6 | diffunit 7 | 9 | Sample test structure with tests in separate units 10 |
14 | sameunit 15 | 17 | Sample test structure with tests in same unit as production code 18 |
21 | 22 | 23 | -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/structure/sameunit/Project1.dpr: -------------------------------------------------------------------------------- 1 | { Must do a BUILD ALL to compile out the test code under the TESTING directive } 2 | program Project1; 3 | 4 | uses 5 | Unit1, Unit2; 6 | 7 | {$R *.res} 8 | 9 | begin 10 | // do stuff with Unit1 and Unit2 11 | end. 12 | 13 | -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/structure/sameunit/Project1Test.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/examples/structure/sameunit/Project1Test.dpr -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/testexception/Project1.dpr: -------------------------------------------------------------------------------- 1 | program Project1; 2 | 3 | uses 4 | Unit1, Unit2; 5 | 6 | {$R *.res} 7 | 8 | begin 9 | // do stuff with Unit1 and Unit2 10 | end. 11 | 12 | -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/testexception/Project1Test.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/examples/testexception/Project1Test.dpr -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/testexception/Unit2.pas: -------------------------------------------------------------------------------- 1 | unit Unit2; 2 | 3 | interface 4 | 5 | type 6 | TSuperObject = class(TObject) 7 | public 8 | function DoSomethingSuper: boolean; 9 | end; 10 | 11 | implementation 12 | 13 | { TSuperObject } 14 | 15 | function TSuperObject.DoSomethingSuper: boolean; 16 | begin 17 | // do something ... 18 | Result := true 19 | end; 20 | 21 | end. 22 | 23 | -------------------------------------------------------------------------------- /ExtLib/DUnit/helpsrc/Makefile: -------------------------------------------------------------------------------- 1 | ROOT=.. 2 | !include "$(ROOT)\Rules.mak" 3 | 4 | all: 5 | -md $(DOC_DIR)\API 6 | $(COPY) /S HTML\* $(DOC_DIR)\API 7 | $(COPY) TESTFRAMEWORK.HLP $(DOC_DIR)\DUNIT.HLP 8 | -------------------------------------------------------------------------------- /ExtLib/DUnit/helpsrc/TestFramework.HPJ: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/helpsrc/TestFramework.HPJ -------------------------------------------------------------------------------- /ExtLib/DUnit/readme.html: -------------------------------------------------------------------------------- 1 | 2 | 3 | 4 | 5 | 7 | 8 | 9 | 10 | 11 | -------------------------------------------------------------------------------- /ExtLib/DUnit/release.ini: -------------------------------------------------------------------------------- 1 | [releases] 2 | current=9.4.0 3 | last_date=2008-08-21 4 | -------------------------------------------------------------------------------- /ExtLib/DUnit/src/DUnitMainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/src/DUnitMainForm.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/src/DUnitW32.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/src/DUnitW32.dpr -------------------------------------------------------------------------------- /ExtLib/DUnit/src/DunitAbout.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/src/DunitAbout.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/src/FastMMMemLeakMonitor.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/src/FastMMMemLeakMonitor.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/src/GUITestRunner.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/src/GUITestRunner.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/src/GUITesting.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/src/GUITesting.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/src/Makefile: -------------------------------------------------------------------------------- 1 | #$Id: Makefile,v 1.7 2008/04/18 02:33:01 judc Exp $ 2 | ROOT=.. 3 | include $(ROOT)\\Rules.mak 4 | 5 | all: 6 | $(DCC_BARE) -N$(FWK_DIR) -Z -B DUnit.dpk 7 | -------------------------------------------------------------------------------- /ExtLib/DUnit/src/QGUITestRunner.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/src/QGUITestRunner.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/src/TestExtensions.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/src/TestExtensions.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/src/TestFramework.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/src/TestFramework.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/src/TestModules.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/src/TestModules.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/src/TextTestRunner.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/src/TextTestRunner.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/src/dunit.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/src/dunit.dpr -------------------------------------------------------------------------------- /ExtLib/DUnit/src/dunit.ini: -------------------------------------------------------------------------------- 1 | [GUITestRunner Config] 2 | AutoSave=1 3 | Left=274 4 | Top=261 5 | Width=765 6 | Height=675 7 | Maximized=0 8 | UseRegistry=0 9 | ResultsPanel.Height=267 10 | ErrorMessage.Height=75 11 | ErrorMessage.Visible=1 12 | FailureList.ColumnWidth[0]=120 13 | FailureList.ColumnWidth[1]=100 14 | FailureList.ColumnWidth[2]=200 15 | FailureList.ColumnWidth[3]=325 16 | HideTestNodesOnOpen=0 17 | BreakOnFailures=0 18 | FailOnNoChecksExecuted=0 19 | FailOnMemoryLeaked=0 20 | IgnoreSetUpTearDownLeaks=0 21 | ReportMemoryLeakTypes=0 22 | SelectTestedNode=1 23 | WarnOnFailTestOverride=0 24 | PopupX=350 25 | PopupY=30 26 | -------------------------------------------------------------------------------- /ExtLib/DUnit/src/dunit_Icon.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/src/dunit_Icon.ico -------------------------------------------------------------------------------- /ExtLib/DUnit/src/images/actions_images.bmp: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/src/images/actions_images.bmp -------------------------------------------------------------------------------- /ExtLib/DUnit/src/images/dunit.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/src/images/dunit.ico -------------------------------------------------------------------------------- /ExtLib/DUnit/src/images/dunit16.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/src/images/dunit16.ico -------------------------------------------------------------------------------- /ExtLib/DUnit/src/images/dunit16_new.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/src/images/dunit16_new.ico -------------------------------------------------------------------------------- /ExtLib/DUnit/src/images/dunit_new.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/src/images/dunit_new.ico -------------------------------------------------------------------------------- /ExtLib/DUnit/src/images/list_images.bmp: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/src/images/list_images.bmp -------------------------------------------------------------------------------- /ExtLib/DUnit/src/images/logo.bmp: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/src/images/logo.bmp -------------------------------------------------------------------------------- /ExtLib/DUnit/src/images/run_images.bmp: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/src/images/run_images.bmp -------------------------------------------------------------------------------- /ExtLib/DUnit/src/images/state_images.bmp: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/src/images/state_images.bmp -------------------------------------------------------------------------------- /ExtLib/DUnit/src/versioninfo.inc: -------------------------------------------------------------------------------- 1 | ReleaseNo : array[1..3] of Integer 2 | = (9,4,0); 3 | ReleaseStr = '9.4.0'; 4 | ReleaseName = ''; 5 | ReleaseWhen : array[1..6] of Integer 6 | = (2008,08,21,00,00,00); 7 | ReleaseYear = 2008; 8 | ReleaseMonth = 08; 9 | ReleaseDay = 21; 10 | ReleaseHour = 00; 11 | ReleaseMinute = 00; 12 | 13 | -------------------------------------------------------------------------------- /ExtLib/DUnit/src/versioninfo.rc: -------------------------------------------------------------------------------- 1 | VS_VERSION_INFO VERSIONINFO 2 | FILEVERSION 9,4,0 3 | PRODUCTVERSION 9,4,0 4 | FILEFLAGSMASK 0x3fL 5 | FILEFLAGS 0x0L 6 | FILEOS 0x4L 7 | FILETYPE 0x1L 8 | FILESUBTYPE 0x0L 9 | BEGIN 10 | BLOCK "StringFileInfo" 11 | BEGIN 12 | BLOCK "080904B0" 13 | BEGIN 14 | VALUE "FileDescription", "DUnit - XTreme testing for Delphi\0" 15 | VALUE "FileVersion", "9.4.0\0" 16 | VALUE "InternalName", "DUnit\0" 17 | VALUE "LegalCopyright", "Copyright \251 1999-2009 The DUnit Group.\0" 18 | VALUE "ProductName", "DUnit\0" 19 | VALUE "ProductVersion","9.4.0\0" 20 | END 21 | END 22 | 23 | BLOCK "VarFileInfo" 24 | BEGIN 25 | VALUE "Translation", 0x809,1200 26 | END 27 | END 28 | -------------------------------------------------------------------------------- /ExtLib/DUnit/tests/DUnitTestLib.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/tests/DUnitTestLib.dpr -------------------------------------------------------------------------------- /ExtLib/DUnit/tests/DUnitTestLibW32.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/tests/DUnitTestLibW32.dpr -------------------------------------------------------------------------------- /ExtLib/DUnit/tests/FastMMMonitorTest.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/tests/FastMMMonitorTest.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/tests/Makefile: -------------------------------------------------------------------------------- 1 | #$Id: Makefile,v 1.6 2008/04/18 02:33:03 judc Exp $ 2 | ROOT=.. 3 | 4 | include $(ROOT)\\Rules.mak 5 | 6 | bin: 7 | -$(MKDIR) $(BIN_DIR) 8 | $(DCC) -B -E$(BIN_DIR) UnitTests.dpr 9 | 10 | test: 11 | $(DCC) -CC -B UnitTests.dpr 12 | $(BIN_DIR)\\UnitTests.exe -text-mode 13 | -------------------------------------------------------------------------------- /ExtLib/DUnit/tests/UnitTestExtensions.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/tests/UnitTestExtensions.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/tests/UnitTestFramework.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/tests/UnitTestFramework.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/tests/UnitTestGUITestRunner.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/tests/UnitTestGUITestRunner.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/tests/UnitTestGUITesting.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/tests/UnitTestGUITesting.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/tests/UnitTests.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/tests/UnitTests.dpr -------------------------------------------------------------------------------- /ExtLib/DUnit/tests/UnitTests4Net.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/tests/UnitTests4Net.dpr -------------------------------------------------------------------------------- /ExtLib/DUnit/tests/UnitTestsW32.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/tests/UnitTestsW32.dpr -------------------------------------------------------------------------------- /ExtLib/DUnit/want.xml: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/DUnit/want.xml -------------------------------------------------------------------------------- /ExtLib/Delphi7/Graphics.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/Delphi7/Graphics.pas -------------------------------------------------------------------------------- /ExtLib/Delphi7/PngImage/PngImage.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/Delphi7/PngImage/PngImage.pas -------------------------------------------------------------------------------- /ExtLib/Delphi7/PngImage/obj/adler32.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/Delphi7/PngImage/obj/adler32.obj -------------------------------------------------------------------------------- /ExtLib/Delphi7/PngImage/obj/deflate.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/Delphi7/PngImage/obj/deflate.obj -------------------------------------------------------------------------------- /ExtLib/Delphi7/PngImage/obj/infblock.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/Delphi7/PngImage/obj/infblock.obj -------------------------------------------------------------------------------- /ExtLib/Delphi7/PngImage/obj/infcodes.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/Delphi7/PngImage/obj/infcodes.obj -------------------------------------------------------------------------------- /ExtLib/Delphi7/PngImage/obj/inffast.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/Delphi7/PngImage/obj/inffast.obj -------------------------------------------------------------------------------- /ExtLib/Delphi7/PngImage/obj/inflate.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/Delphi7/PngImage/obj/inflate.obj -------------------------------------------------------------------------------- /ExtLib/Delphi7/PngImage/obj/inftrees.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/Delphi7/PngImage/obj/inftrees.obj -------------------------------------------------------------------------------- /ExtLib/Delphi7/PngImage/obj/infutil.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/Delphi7/PngImage/obj/infutil.obj -------------------------------------------------------------------------------- /ExtLib/Delphi7/PngImage/obj/trees.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/Delphi7/PngImage/obj/trees.obj -------------------------------------------------------------------------------- /ExtLib/Delphi7/PngImage/pngimage.chm: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/Delphi7/PngImage/pngimage.chm -------------------------------------------------------------------------------- /ExtLib/Delphi7/PngImage/pnglang.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/Delphi7/PngImage/pnglang.pas -------------------------------------------------------------------------------- /ExtLib/Delphi7/UITypes.pas: -------------------------------------------------------------------------------- 1 | // Original UITypes in namespace System since Delphi XE2 2 | // For backward compatibility only 3 | {$if CompilerVersion < 23} 4 | unit UITypes; 5 | 6 | interface 7 | 8 | uses 9 | Graphics; 10 | 11 | type 12 | TColor = Graphics.TColor; 13 | 14 | // TODO : etc 15 | 16 | implementation 17 | 18 | end. 19 | {$ifend} 20 | -------------------------------------------------------------------------------- /ExtLib/Exif.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/Exif.pas -------------------------------------------------------------------------------- /ExtLib/ExtLib.dof: -------------------------------------------------------------------------------- 1 | [Version Info Keys] 2 | FileDescription=External units and components for Delphi -------------------------------------------------------------------------------- /ExtLib/FFTs/Complexs.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FFTs/Complexs.pas -------------------------------------------------------------------------------- /ExtLib/FastMM/Demos/Dynamically Loaded DLL/TestApplication.dpr: -------------------------------------------------------------------------------- 1 | program TestApplication; 2 | 3 | uses 4 | FastMM4, 5 | Forms, 6 | ApplicationForm in 'ApplicationForm.pas' {fAppMain}; 7 | 8 | {$R *.res} 9 | 10 | begin 11 | Application.Initialize; 12 | Application.CreateForm(TfAppMain, fAppMain); 13 | Application.Run; 14 | end. 15 | -------------------------------------------------------------------------------- /ExtLib/FastMM/Demos/Dynamically Loaded DLL/TestApplication.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/Demos/Dynamically Loaded DLL/TestApplication.res -------------------------------------------------------------------------------- /ExtLib/FastMM/Demos/Dynamically Loaded DLL/TestDLL.dpr: -------------------------------------------------------------------------------- 1 | library TestDLL; 2 | 3 | uses 4 | FastMM4, 5 | SysUtils, 6 | Classes, 7 | DLLForm in 'DLLForm.pas' {fDLLMain}; 8 | 9 | {$R *.res} 10 | 11 | procedure ShowDLLForm; 12 | begin 13 | with TfDLLMain.Create(nil) do 14 | begin 15 | try 16 | ShowModal; 17 | finally 18 | Free; 19 | end; 20 | end; 21 | end; 22 | 23 | exports ShowDllForm; 24 | 25 | begin 26 | end. 27 | -------------------------------------------------------------------------------- /ExtLib/FastMM/Demos/Dynamically Loaded DLL/TestDLL.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/Demos/Dynamically Loaded DLL/TestDLL.res -------------------------------------------------------------------------------- /ExtLib/FastMM/Demos/Replacement borlndmm DLL/BorlndMM.dll: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/Demos/Replacement borlndmm DLL/BorlndMM.dll -------------------------------------------------------------------------------- /ExtLib/FastMM/Demos/Replacement borlndmm DLL/FastMM_FullDebugMode.dll: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/Demos/Replacement borlndmm DLL/FastMM_FullDebugMode.dll -------------------------------------------------------------------------------- /ExtLib/FastMM/Demos/Replacement borlndmm DLL/FullDebugModeDemo.dpr: -------------------------------------------------------------------------------- 1 | program FullDebugModeDemo; 2 | 3 | uses 4 | ShareMem, 5 | Forms, 6 | DemoForm in 'DemoForm.pas' {Form1}, 7 | FastMMDebugSupport in '..\..\Replacement BorlndMM DLL\Delphi\FastMMDebugSupport.pas'; 8 | 9 | {$R *.res} 10 | 11 | begin 12 | Application.Initialize; 13 | Application.CreateForm(TForm1, Form1); 14 | Application.Run; 15 | end. 16 | -------------------------------------------------------------------------------- /ExtLib/FastMM/Demos/Replacement borlndmm DLL/FullDebugModeDemo.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/Demos/Replacement borlndmm DLL/FullDebugModeDemo.res -------------------------------------------------------------------------------- /ExtLib/FastMM/Demos/Usage Tracker/DemoForm.pas: -------------------------------------------------------------------------------- 1 | unit DemoForm; 2 | 3 | interface 4 | 5 | uses 6 | Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, 7 | Dialogs, StdCtrls, FastMMUsageTracker; 8 | 9 | type 10 | TfDemo = class(TForm) 11 | bShowTracker: TButton; 12 | procedure bShowTrackerClick(Sender: TObject); 13 | private 14 | { Private declarations } 15 | public 16 | { Public declarations } 17 | end; 18 | 19 | var 20 | fDemo: TfDemo; 21 | 22 | implementation 23 | 24 | {$R *.dfm} 25 | 26 | procedure TfDemo.bShowTrackerClick(Sender: TObject); 27 | begin 28 | ShowFastMMUsageTracker; 29 | end; 30 | 31 | end. 32 | -------------------------------------------------------------------------------- /ExtLib/FastMM/Demos/Usage Tracker/UsageTrackerDemo.dpr: -------------------------------------------------------------------------------- 1 | program UsageTrackerDemo; 2 | 3 | uses 4 | FastMM4, 5 | Forms, 6 | DemoForm in 'DemoForm.pas' {fDemo}; 7 | 8 | {$R *.res} 9 | 10 | {Enable large address space support for this demo} 11 | {$SetPEFlags $20} 12 | 13 | begin 14 | Application.Initialize; 15 | Application.CreateForm(TfDemo, fDemo); 16 | Application.Run; 17 | end. 18 | -------------------------------------------------------------------------------- /ExtLib/FastMM/Demos/Usage Tracker/UsageTrackerDemo.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/Demos/Usage Tracker/UsageTrackerDemo.res -------------------------------------------------------------------------------- /ExtLib/FastMM/FastMM4.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/FastMM4.pas -------------------------------------------------------------------------------- /ExtLib/FastMM/FullDebugMode DLL/CPP Builder Support/FastMM_FullDebugMode.lib: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/FullDebugMode DLL/CPP Builder Support/FastMM_FullDebugMode.lib -------------------------------------------------------------------------------- /ExtLib/FastMM/FullDebugMode DLL/CPP Builder Support/Readme.txt: -------------------------------------------------------------------------------- 1 | C++ Builder projects can statically link to FastMM_FullDebugMode.dll. For that FastMM_FullDebugMode.lib is needed. 2 | 3 | - JiYuan Xie -------------------------------------------------------------------------------- /ExtLib/FastMM/FullDebugMode DLL/FastMM_FullDebugMode.entitlements: -------------------------------------------------------------------------------- 1 | 2 | 3 | 4 | 5 | 6 | 7 | -------------------------------------------------------------------------------- /ExtLib/FastMM/FullDebugMode DLL/FastMM_FullDebugMode.info.plist: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/FullDebugMode DLL/FastMM_FullDebugMode.info.plist -------------------------------------------------------------------------------- /ExtLib/FastMM/FullDebugMode DLL/FastMM_FullDebugMode.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/FullDebugMode DLL/FastMM_FullDebugMode.res -------------------------------------------------------------------------------- /ExtLib/FastMM/FullDebugMode DLL/FastMM_FullDebugMode_Icon.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/FullDebugMode DLL/FastMM_FullDebugMode_Icon.ico -------------------------------------------------------------------------------- /ExtLib/FastMM/FullDebugMode DLL/Precompiled/FastMM_FullDebugMode.dll: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/FullDebugMode DLL/Precompiled/FastMM_FullDebugMode.dll -------------------------------------------------------------------------------- /ExtLib/FastMM/FullDebugMode DLL/Precompiled/FastMM_FullDebugMode64.dll: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/FullDebugMode DLL/Precompiled/FastMM_FullDebugMode64.dll -------------------------------------------------------------------------------- /ExtLib/FastMM/FullDebugMode DLL/Precompiled/libFastMM_FullDebugMode.dylib: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/FullDebugMode DLL/Precompiled/libFastMM_FullDebugMode.dylib -------------------------------------------------------------------------------- /ExtLib/FastMM/Replacement BorlndMM DLL/BCB5/BorlndMM.bpf: -------------------------------------------------------------------------------- 1 | USEUNIT("DLLEntry.cpp"); 2 | USEUNIT("FastMM4BCB.cpp"); 3 | USEUNIT("FastMM4.pas"); 4 | USEUNIT("BorlndMM_.pas"); 5 | USEDEF("Export.def"); 6 | //--------------------------------------------------------------------------- 7 | This file is used by the project manager only and should be treated like the project file 8 | 9 | DllEntryPoint -------------------------------------------------------------------------------- /ExtLib/FastMM/Replacement BorlndMM DLL/BCB5/Precompiled/BorlndMM.dll: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/Replacement BorlndMM DLL/BCB5/Precompiled/BorlndMM.dll -------------------------------------------------------------------------------- /ExtLib/FastMM/Replacement BorlndMM DLL/BCB6/BorlndMM.bpf: -------------------------------------------------------------------------------- 1 | This file is used by the project manager only and should be treated like the project file 2 | 3 | DllEntryPoint -------------------------------------------------------------------------------- /ExtLib/FastMM/Replacement BorlndMM DLL/BCB6/BorlndMM.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/Replacement BorlndMM DLL/BCB6/BorlndMM.res -------------------------------------------------------------------------------- /ExtLib/FastMM/Replacement BorlndMM DLL/BCB6/Precompiled/BorlndMM.dll: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/Replacement BorlndMM DLL/BCB6/Precompiled/BorlndMM.dll -------------------------------------------------------------------------------- /ExtLib/FastMM/Replacement BorlndMM DLL/CB2006/BorlndMM.bpf: -------------------------------------------------------------------------------- 1 | This file is used by the project manager only and should be treated like the project file 2 | 3 | To add a file to this project use the Project menu 'Add to Project' 4 | 5 | DllEntryPoint -------------------------------------------------------------------------------- /ExtLib/FastMM/Replacement BorlndMM DLL/CB2006/Precompiled/BorlndMM.dll: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/Replacement BorlndMM DLL/CB2006/Precompiled/BorlndMM.dll -------------------------------------------------------------------------------- /ExtLib/FastMM/Replacement BorlndMM DLL/CB2006/Readme.txt: -------------------------------------------------------------------------------- 1 | LoadDebugDLLDynamically must be defined. -------------------------------------------------------------------------------- /ExtLib/FastMM/Replacement BorlndMM DLL/CB2007/Precompiled/BorlndMM.dll: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/Replacement BorlndMM DLL/CB2007/Precompiled/BorlndMM.dll -------------------------------------------------------------------------------- /ExtLib/FastMM/Replacement BorlndMM DLL/CB2007/Readme.txt: -------------------------------------------------------------------------------- 1 | LoadDebugDLLDynamically must be defined. -------------------------------------------------------------------------------- /ExtLib/FastMM/Replacement BorlndMM DLL/Delphi/BorlndMM.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/Replacement BorlndMM DLL/Delphi/BorlndMM.res -------------------------------------------------------------------------------- /ExtLib/FastMM/Replacement BorlndMM DLL/Delphi/Precompiled/for Applications/Debug/BorlndMM.dll: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/Replacement BorlndMM DLL/Delphi/Precompiled/for Applications/Debug/BorlndMM.dll -------------------------------------------------------------------------------- /ExtLib/FastMM/Replacement BorlndMM DLL/Delphi/Precompiled/for Applications/Performance/BorlndMM.dll: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/Replacement BorlndMM DLL/Delphi/Precompiled/for Applications/Performance/BorlndMM.dll -------------------------------------------------------------------------------- /ExtLib/FastMM/Replacement BorlndMM DLL/Delphi/Precompiled/for Delphi IDE/Debug/BorlndMM.dll: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/Replacement BorlndMM DLL/Delphi/Precompiled/for Delphi IDE/Debug/BorlndMM.dll -------------------------------------------------------------------------------- /ExtLib/FastMM/Replacement BorlndMM DLL/Delphi/Precompiled/for Delphi IDE/Performance/BorlndMM.dll: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/Replacement BorlndMM DLL/Delphi/Precompiled/for Delphi IDE/Performance/BorlndMM.dll -------------------------------------------------------------------------------- /ExtLib/FastMM/Translations/Afrikaans/FastMM4Messages.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/Translations/Afrikaans/FastMM4Messages.pas -------------------------------------------------------------------------------- /ExtLib/FastMM/Translations/Belarussian/FastMM4Messages.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/Translations/Belarussian/FastMM4Messages.pas -------------------------------------------------------------------------------- /ExtLib/FastMM/Translations/Chinese (Simplified)/FastMM4Messages.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/Translations/Chinese (Simplified)/FastMM4Messages.pas -------------------------------------------------------------------------------- /ExtLib/FastMM/Translations/Chinese (Simplified)/FastMM4Options.inc: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/Translations/Chinese (Simplified)/FastMM4Options.inc -------------------------------------------------------------------------------- /ExtLib/FastMM/Translations/Czech/FastMM4Messages.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/Translations/Czech/FastMM4Messages.pas -------------------------------------------------------------------------------- /ExtLib/FastMM/Translations/French/FastMM4Messages.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/Translations/French/FastMM4Messages.pas -------------------------------------------------------------------------------- /ExtLib/FastMM/Translations/German/by Thomas Speck/FastMM4Messages.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/Translations/German/by Thomas Speck/FastMM4Messages.pas -------------------------------------------------------------------------------- /ExtLib/FastMM/Translations/German/by Uwe Queisser/FastMM4Messages.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/Translations/German/by Uwe Queisser/FastMM4Messages.pas -------------------------------------------------------------------------------- /ExtLib/FastMM/Translations/Italian/FastMM4Messages.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/Translations/Italian/FastMM4Messages.pas -------------------------------------------------------------------------------- /ExtLib/FastMM/Translations/Polish/FastMM4Messages.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/Translations/Polish/FastMM4Messages.pas -------------------------------------------------------------------------------- /ExtLib/FastMM/Translations/Portuguese (Brazil)/FastMM4Messages.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/Translations/Portuguese (Brazil)/FastMM4Messages.pas -------------------------------------------------------------------------------- /ExtLib/FastMM/Translations/Portuguese/FastMM4Messages.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/Translations/Portuguese/FastMM4Messages.pas -------------------------------------------------------------------------------- /ExtLib/FastMM/Translations/Russian/FastMM4Messages.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/Translations/Russian/FastMM4Messages.pas -------------------------------------------------------------------------------- /ExtLib/FastMM/Translations/Spanish/FastMM4Messages.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/Translations/Spanish/FastMM4Messages.pas -------------------------------------------------------------------------------- /ExtLib/FastMM/Translations/Ukrainian/FastMM4Messages.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/FastMM/Translations/Ukrainian/FastMM4Messages.pas -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/AutoResourceStr/variantWrapper.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/GraphicEx/3rd party/AutoResourceStr/variantWrapper.pas -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win32/adler32.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/GraphicEx/3rd party/DelphiZlib/win32/adler32.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win32/compress.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/GraphicEx/3rd party/DelphiZlib/win32/compress.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win32/crc32.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/GraphicEx/3rd party/DelphiZlib/win32/crc32.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win32/deflate.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/GraphicEx/3rd party/DelphiZlib/win32/deflate.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win32/infback.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/GraphicEx/3rd party/DelphiZlib/win32/infback.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win32/inffast.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/GraphicEx/3rd party/DelphiZlib/win32/inffast.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win32/inflate.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/GraphicEx/3rd party/DelphiZlib/win32/inflate.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win32/inftrees.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/GraphicEx/3rd party/DelphiZlib/win32/inftrees.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win32/trees.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/GraphicEx/3rd party/DelphiZlib/win32/trees.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win64/adler32.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/GraphicEx/3rd party/DelphiZlib/win64/adler32.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win64/compress.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/GraphicEx/3rd party/DelphiZlib/win64/compress.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win64/crc32.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/GraphicEx/3rd party/DelphiZlib/win64/crc32.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win64/deflate.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/GraphicEx/3rd party/DelphiZlib/win64/deflate.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win64/infback.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/GraphicEx/3rd party/DelphiZlib/win64/infback.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win64/inffast.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/GraphicEx/3rd party/DelphiZlib/win64/inffast.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win64/inflate.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/GraphicEx/3rd party/DelphiZlib/win64/inflate.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win64/inftrees.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/GraphicEx/3rd party/DelphiZlib/win64/inftrees.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win64/trees.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/GraphicEx/3rd party/DelphiZlib/win64/trees.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/zlib/inffast.h: -------------------------------------------------------------------------------- 1 | /* inffast.h -- header to use inffast.c 2 | * Copyright (C) 1995-2003, 2010 Mark Adler 3 | * For conditions of distribution and use, see copyright notice in zlib.h 4 | */ 5 | 6 | /* WARNING: this file should *not* be used by applications. It is 7 | part of the implementation of the compression library and is 8 | subject to change. Applications should only use zlib.h. 9 | */ 10 | 11 | void ZLIB_INTERNAL inflate_fast OF((z_streamp strm, unsigned start)); 12 | -------------------------------------------------------------------------------- /ExtLib/GraphicEx/AllGraphicStrings.pas: -------------------------------------------------------------------------------- 1 | unit AllGraphicStrings; 2 | 3 | interface 4 | 5 | uses GraphicStringsEN, GraphicStringsEnUk, GraphicStringsCT, GraphicStringsDe, 6 | GraphicStringsES, GraphicStringsFR, GraphicStringsIT, GraphicStringsPL, 7 | GraphicStringsRU; 8 | 9 | implementation 10 | 11 | end. 12 | -------------------------------------------------------------------------------- /ExtLib/GraphicEx/Demos/.gitignore: -------------------------------------------------------------------------------- 1 | *.ini -------------------------------------------------------------------------------- /ExtLib/GraphicEx/Demos/Browser/Browser.dpr: -------------------------------------------------------------------------------- 1 | program Browser; 2 | 3 | uses 4 | Forms, 5 | GraphicColor in '..\..\GraphicColor.pas', 6 | GraphicCompression in '..\..\GraphicCompression.pas', 7 | GraphicEx in '..\..\GraphicEx.pas', 8 | GraphicStrings in '..\..\GraphicStrings.pas', 9 | JpegCompression in '..\..\JpegCompression.pas', 10 | Main in 'Main.pas' {MainForm}, 11 | MZLib in '..\..\MZLib.pas', 12 | TIFF in '..\..\TIFF.pas'; 13 | 14 | {$R *.RES} 15 | 16 | begin 17 | Application.Initialize; 18 | Application.CreateForm(TMainForm, MainForm); 19 | Application.Run; 20 | end. 21 | 22 | -------------------------------------------------------------------------------- /ExtLib/GraphicEx/Demos/Browser/Main.dfm: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/GraphicEx/Demos/Browser/Main.dfm -------------------------------------------------------------------------------- /ExtLib/GraphicEx/Demos/Convert/Convert.dpr: -------------------------------------------------------------------------------- 1 | program Convert; 2 | 3 | uses 4 | Forms, 5 | GraphicEx in '..\..\GraphicEx.pas', 6 | GraphicColor in '..\..\GraphicColor.pas', 7 | GraphicStrings in '..\..\GraphicStrings.pas', 8 | GraphicCompression in '..\..\GraphicCompression.pas', 9 | JpegCompression in '..\..\JpegCompression.pas', 10 | Main in 'Main.pas' {MainForm}, 11 | MZLib in '..\..\MZLib.pas', 12 | Properties in 'Properties.pas' {PropertyDialog}, 13 | TIFF in '..\..\TIFF.pas'; 14 | 15 | {$R *.RES} 16 | 17 | begin 18 | Application.Initialize; 19 | Application.CreateForm(TMainForm, MainForm); 20 | Application.CreateForm(TPropertyDialog, PropertyDialog); 21 | Application.Run; 22 | end. 23 | 24 | -------------------------------------------------------------------------------- /ExtLib/GraphicEx/Demos/Convert/Main.dfm: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/GraphicEx/Demos/Convert/Main.dfm -------------------------------------------------------------------------------- /ExtLib/GraphicEx/Demos/OneImage/OneImage.dpr: -------------------------------------------------------------------------------- 1 | program OneImage; 2 | 3 | uses 4 | Forms, 5 | Main in 'Main.pas' {MainForm}, 6 | proj_common in '..\proj_common.pas', 7 | GraphicColor in '..\..\GraphicColor.pas', 8 | GraphicCompression in '..\..\GraphicCompression.pas', 9 | GraphicEx in '..\..\GraphicEx.pas', 10 | GraphicStrings in '..\..\GraphicStrings.pas', 11 | JpegCompression in '..\..\JpegCompression.pas', 12 | MZLib in '..\..\MZLib.pas', 13 | TIFF in '..\..\TIFF.pas'; 14 | 15 | {$R *.res} 16 | 17 | begin 18 | Application.Initialize; 19 | Application.CreateForm(TMainForm, MainForm); 20 | Application.Run; 21 | end. 22 | -------------------------------------------------------------------------------- /ExtLib/GraphicEx/GraphicEx.chm: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/GraphicEx/GraphicEx.chm -------------------------------------------------------------------------------- /ExtLib/GraphicEx/GraphicEx.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/GraphicEx/GraphicEx.pas -------------------------------------------------------------------------------- /ExtLib/IGDIPlus/Demo/Delphi2009/IGDIPlusDemo.dpr: -------------------------------------------------------------------------------- 1 | program IGDIPlusDemo; 2 | 3 | uses 4 | Forms, 5 | Unit1 in 'Unit1.pas' {Form1}; 6 | 7 | {$R *.res} 8 | 9 | begin 10 | Application.Initialize; 11 | Application.MainFormOnTaskbar := True; 12 | Application.CreateForm(TForm1, Form1); 13 | Application.Run; 14 | end. 15 | -------------------------------------------------------------------------------- /ExtLib/IGDIPlus/Demo/Delphi2009/Unit1.dfm: -------------------------------------------------------------------------------- 1 | object Form1: TForm1 2 | Left = 208 3 | Top = 149 4 | Caption = 'IGDI+ Demo' 5 | ClientHeight = 335 6 | ClientWidth = 595 7 | Color = clBtnFace 8 | Font.Charset = DEFAULT_CHARSET 9 | Font.Color = clWindowText 10 | Font.Height = -11 11 | Font.Name = 'Microsoft Sans Serif' 12 | Font.Style = [] 13 | OldCreateOrder = False 14 | OnPaint = FormPaint 15 | PixelsPerInch = 96 16 | TextHeight = 13 17 | end 18 | -------------------------------------------------------------------------------- /ExtLib/IGDIPlus/Demo/Delphi2010/IGDIPlusDemo.dpr: -------------------------------------------------------------------------------- 1 | program IGDIPlusDemo; 2 | 3 | uses 4 | Forms, 5 | Unit1 in 'Unit1.pas' {Form1}; 6 | 7 | {$R *.res} 8 | 9 | begin 10 | Application.Initialize; 11 | Application.MainFormOnTaskbar := True; 12 | Application.CreateForm(TForm1, Form1); 13 | Application.Run; 14 | end. 15 | -------------------------------------------------------------------------------- /ExtLib/IGDIPlus/Demo/Delphi2010/Unit1.dfm: -------------------------------------------------------------------------------- 1 | object Form1: TForm1 2 | Left = 208 3 | Top = 149 4 | Caption = 'IGDI+ Demo' 5 | ClientHeight = 335 6 | ClientWidth = 595 7 | Color = clBtnFace 8 | Font.Charset = DEFAULT_CHARSET 9 | Font.Color = clWindowText 10 | Font.Height = -11 11 | Font.Name = 'Microsoft Sans Serif' 12 | Font.Style = [] 13 | OldCreateOrder = False 14 | OnPaint = FormPaint 15 | PixelsPerInch = 96 16 | TextHeight = 13 17 | end 18 | -------------------------------------------------------------------------------- /ExtLib/IGDIPlus/Demo/DelphiXE/IGDIPlusDemo.dpr: -------------------------------------------------------------------------------- 1 | program IGDIPlusDemo; 2 | 3 | uses 4 | Forms, 5 | Unit1 in 'Unit1.pas' {Form1}; 6 | 7 | {$R *.res} 8 | 9 | begin 10 | Application.Initialize; 11 | Application.MainFormOnTaskbar := True; 12 | Application.CreateForm(TForm1, Form1); 13 | Application.Run; 14 | end. 15 | -------------------------------------------------------------------------------- /ExtLib/IGDIPlus/Demo/DelphiXE/Unit1.dfm: -------------------------------------------------------------------------------- 1 | object Form1: TForm1 2 | Left = 208 3 | Top = 149 4 | Caption = 'IGDI+ Demo' 5 | ClientHeight = 335 6 | ClientWidth = 595 7 | Color = clBtnFace 8 | Font.Charset = DEFAULT_CHARSET 9 | Font.Color = clWindowText 10 | Font.Height = -11 11 | Font.Name = 'Microsoft Sans Serif' 12 | Font.Style = [] 13 | OldCreateOrder = False 14 | OnPaint = FormPaint 15 | PixelsPerInch = 96 16 | TextHeight = 13 17 | end 18 | -------------------------------------------------------------------------------- /ExtLib/IGDIPlus/Demo/DelphiXE2/IGDIPlusDemo.dpr: -------------------------------------------------------------------------------- 1 | program IGDIPlusDemo; 2 | 3 | uses 4 | Vcl.Forms, 5 | Unit1 in 'Unit1.pas' {Form1}; 6 | 7 | {$R *.res} 8 | 9 | begin 10 | Application.Initialize; 11 | Application.MainFormOnTaskbar := True; 12 | Application.CreateForm(TForm1, Form1); 13 | Application.Run; 14 | end. 15 | -------------------------------------------------------------------------------- /ExtLib/IGDIPlus/Demo/DelphiXE2/Unit1.dfm: -------------------------------------------------------------------------------- 1 | object Form1: TForm1 2 | Left = 208 3 | Top = 149 4 | Caption = 'IGDI+ Demo' 5 | ClientHeight = 333 6 | ClientWidth = 595 7 | Color = clBtnFace 8 | Font.Charset = DEFAULT_CHARSET 9 | Font.Color = clWindowText 10 | Font.Height = -11 11 | Font.Name = 'Microsoft Sans Serif' 12 | Font.Style = [] 13 | OldCreateOrder = False 14 | OnPaint = FormPaint 15 | PixelsPerInch = 96 16 | TextHeight = 13 17 | end 18 | -------------------------------------------------------------------------------- /ExtLib/IGDIPlus/Demo/DelphiXE3/IGDIPlusDemo.dpr: -------------------------------------------------------------------------------- 1 | program IGDIPlusDemo; 2 | 3 | uses 4 | Vcl.Forms, 5 | Unit1 in 'Unit1.pas' {Form1}; 6 | 7 | {$R *.res} 8 | 9 | begin 10 | Application.Initialize; 11 | Application.MainFormOnTaskbar := True; 12 | Application.CreateForm(TForm1, Form1); 13 | Application.Run; 14 | end. 15 | -------------------------------------------------------------------------------- /ExtLib/IGDIPlus/Demo/DelphiXE3/Unit1.dfm: -------------------------------------------------------------------------------- 1 | object Form1: TForm1 2 | Left = 208 3 | Top = 149 4 | Caption = 'IGDI+ Demo' 5 | ClientHeight = 333 6 | ClientWidth = 595 7 | Color = clBtnFace 8 | Font.Charset = DEFAULT_CHARSET 9 | Font.Color = clWindowText 10 | Font.Height = -11 11 | Font.Name = 'Microsoft Sans Serif' 12 | Font.Style = [] 13 | OldCreateOrder = False 14 | OnPaint = FormPaint 15 | PixelsPerInch = 96 16 | TextHeight = 13 17 | end 18 | -------------------------------------------------------------------------------- /ExtLib/IGDIPlus/Demo/DelphiXE4/IGDIPlusDemo.dpr: -------------------------------------------------------------------------------- 1 | program IGDIPlusDemo; 2 | 3 | uses 4 | Vcl.Forms, 5 | Unit1 in 'Unit1.pas' {Form1}; 6 | 7 | {$R *.res} 8 | 9 | begin 10 | Application.Initialize; 11 | Application.MainFormOnTaskbar := True; 12 | Application.CreateForm(TForm1, Form1); 13 | Application.Run; 14 | end. 15 | -------------------------------------------------------------------------------- /ExtLib/IGDIPlus/Demo/DelphiXE4/Unit1.dfm: -------------------------------------------------------------------------------- 1 | object Form1: TForm1 2 | Left = 208 3 | Top = 149 4 | Caption = 'IGDI+ Demo' 5 | ClientHeight = 333 6 | ClientWidth = 595 7 | Color = clBtnFace 8 | Font.Charset = DEFAULT_CHARSET 9 | Font.Color = clWindowText 10 | Font.Height = -11 11 | Font.Name = 'Microsoft Sans Serif' 12 | Font.Style = [] 13 | OldCreateOrder = False 14 | OnPaint = FormPaint 15 | PixelsPerInch = 96 16 | TextHeight = 13 17 | end 18 | -------------------------------------------------------------------------------- /ExtLib/NLDJoystick/NLDJoystick.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/NLDJoystick/NLDJoystick.dcr -------------------------------------------------------------------------------- /ExtLib/OmniXML/README.md: -------------------------------------------------------------------------------- 1 | # OmniXML 2 | Simple way to use XML in Delphi 3 | 4 | OmniXML is a XML parser written in Delphi. 5 | 6 | * Full support for Document Object Model (DOM) Level 1 specification. 7 | * Supports Extensible Markup Language (XML) 1.0 (Second Edition) specification. 8 | * Has built-in support for different code pages (main 8-bit code pages, UTF-8, UTF-16). 9 | * Is compatible with MS XML parser. 10 | * Fast parsing even large and highly structured documents. 11 | * Includes helper functions to ease processing XML documents. 12 | 13 | OmniXML is developed by Miha Remec, Primož Gabrijelčič and contributors. Copyright © 2002-2016 by Miha Remec and Primož Gabrijelčič. 14 | -------------------------------------------------------------------------------- /ExtLib/SQLite3/SQLite3BtnArrow.bmp: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/SQLite3/SQLite3BtnArrow.bmp -------------------------------------------------------------------------------- /ExtLib/SQLite3/SQLite3BtnOk.bmp: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/SQLite3/SQLite3BtnOk.bmp -------------------------------------------------------------------------------- /ExtLib/SafeMM/SafeMMInstall.pas: -------------------------------------------------------------------------------- 1 | unit SafeMMInstall; 2 | 3 | interface 4 | 5 | {.$MESSAGE warn 'SafeMM on'} 6 | {$WARN SYMBOL_PLATFORM OFF} 7 | 8 | 9 | implementation 10 | 11 | uses 12 | SafeMM; 13 | 14 | var 15 | FOldManager: TMemoryManagerEx; 16 | 17 | procedure InstallSafeMemoryManager; 18 | begin 19 | Assert(GetHeapStatus.TotalAllocated=0); 20 | GetMemoryManager(FOldManager); 21 | 22 | SetMemoryManager(SafeMemoryManager); 23 | 24 | SafeMMPrepare; 25 | end; 26 | 27 | procedure UninstallSafeMemoryManager; 28 | begin 29 | SetMemoryManager(FOldManager); 30 | end; 31 | 32 | initialization 33 | 34 | InstallSafeMemoryManager; 35 | 36 | finalization 37 | 38 | UninstallSafeMemoryManager; 39 | 40 | end. 41 | -------------------------------------------------------------------------------- /ExtLib/SynTaskDialog.rc: -------------------------------------------------------------------------------- 1 | btnok 2 SQlite3\SQLite3btnok.bmp 2 | btnarrow 2 SQlite3\SQLite3btnarrow.bmp 3 | -------------------------------------------------------------------------------- /ExtLib/SynTaskDialog.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/ExtLib/SynTaskDialog.res -------------------------------------------------------------------------------- /Files/Config/uDIniFile.pas: -------------------------------------------------------------------------------- 1 | unit uDIniFile deprecated 'Use uMainCfg or uLocalMainCfg'; 2 | 3 | interface 4 | 5 | uses 6 | uSxIniFile; 7 | 8 | function MainIni: TSxIniFile; 9 | 10 | function LocalMainIni: TSxIniFile; 11 | 12 | implementation 13 | 14 | uses 15 | uLocalMainCfg, 16 | uMainCfg; 17 | 18 | function MainIni; 19 | begin 20 | Result := MainCfg; 21 | end; 22 | 23 | function LocalMainIni; 24 | begin 25 | Result := LocalMainCfg; 26 | end; 27 | 28 | end. 29 | -------------------------------------------------------------------------------- /Files/Config/uGUIMainCfg.pas: -------------------------------------------------------------------------------- 1 | unit uGUIMainCfg; 2 | 3 | interface 4 | 5 | uses 6 | uVCLIniFile; 7 | 8 | var 9 | GUIMainCfg: TVCLIniFile; // TODO FMX 10 | 11 | implementation 12 | 13 | end. 14 | -------------------------------------------------------------------------------- /Files/Config/uLocalMainCfg.pas: -------------------------------------------------------------------------------- 1 | unit uLocalMainCfg; 2 | 3 | interface 4 | 5 | uses 6 | uSxIniFile; 7 | 8 | var 9 | LocalMainCfg: TSxIniFile; 10 | 11 | implementation 12 | 13 | end. 14 | -------------------------------------------------------------------------------- /Files/Config/uMainCfg.pas: -------------------------------------------------------------------------------- 1 | unit uMainCfg; 2 | 3 | interface 4 | 5 | uses 6 | uSxIniFile; 7 | 8 | var 9 | MainCfg: TSxIniFile; 10 | 11 | implementation 12 | 13 | end. 14 | -------------------------------------------------------------------------------- /Files/Database/uDBFTest.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Files/Database/uDBFTest.pas -------------------------------------------------------------------------------- /Files/uFileTest.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Files/uFileTest.pas -------------------------------------------------------------------------------- /Files/uTextFileTest.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Files/uTextFileTest.pas -------------------------------------------------------------------------------- /Formatter/uBinaryPrefix.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Formatter/uBinaryPrefix.pas -------------------------------------------------------------------------------- /Formatter/uByteFormatter.pas: -------------------------------------------------------------------------------- 1 | unit uByteFormatter; 2 | 3 | interface 4 | 5 | uses 6 | uTypes, 7 | uFormatter; 8 | 9 | type 10 | TByteFormatter = class(TFormatter) 11 | public 12 | function Format(const AValue: S8): string; override; 13 | function Format(const AValue: FG): string; override; 14 | end; 15 | 16 | implementation 17 | 18 | uses 19 | uOutputFormat; 20 | 21 | { TByteFormatter } 22 | 23 | function TByteFormatter.Format(const AValue: S8): string; 24 | begin 25 | Result := BToStr(AValue); 26 | end; 27 | 28 | function TByteFormatter.Format(const AValue: FG): string; 29 | begin 30 | Result := BToStr(Round(AValue)); 31 | end; 32 | 33 | end. 34 | -------------------------------------------------------------------------------- /Formatter/uFormatter.pas: -------------------------------------------------------------------------------- 1 | {$TYPEINFO OFF} 2 | unit uFormatter; 3 | 4 | interface 5 | 6 | uses uTypes; 7 | 8 | type 9 | TFormatter = class 10 | function Format(const AValue: S8): string; overload; virtual; abstract; 11 | function Format(const AValue: FG): string; overload; virtual; abstract; 12 | end; 13 | 14 | implementation 15 | 16 | end. 17 | -------------------------------------------------------------------------------- /Formatter/uFrequencyFormatter.pas: -------------------------------------------------------------------------------- 1 | unit uFrequencyFormatter; 2 | 3 | interface 4 | 5 | uses 6 | uUnitFormatter; 7 | 8 | type 9 | TFrequencyFormatter = class(TUnitFormatter) 10 | public 11 | constructor Create; 12 | end; 13 | 14 | implementation 15 | 16 | { TFrequencyFormatter } 17 | 18 | constructor TFrequencyFormatter.Create; 19 | begin 20 | inherited; 21 | 22 | UnitNameSuffix := 'Hz'; 23 | end; 24 | 25 | end. 26 | -------------------------------------------------------------------------------- /Formatter/uMetricPrefix.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Formatter/uMetricPrefix.pas -------------------------------------------------------------------------------- /Formatter/uPercentFormatter.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Formatter/uPercentFormatter.pas -------------------------------------------------------------------------------- /Formatter/uPercentFormatterTest.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Formatter/uPercentFormatterTest.pas -------------------------------------------------------------------------------- /Formatter/uTimeFormatter.pas: -------------------------------------------------------------------------------- 1 | unit uTimeFormatter; 2 | 3 | interface 4 | 5 | uses 6 | uTypes, 7 | uNumberFormatter; 8 | 9 | type 10 | TTimeFormatter = class(TNumberFormatter) 11 | public 12 | function Format(const AValue: S8): string; override; 13 | end; 14 | 15 | implementation 16 | 17 | uses 18 | uTimeSpan, 19 | uOutputFormat; 20 | 21 | { TTimeFormatter } 22 | 23 | function TTimeFormatter.Format(const AValue: S8): string; 24 | var 25 | TimeSpan: TTimeSpan; 26 | begin 27 | TimeSpan.Ticks := AValue; 28 | Result := MsToStr(TimeSpan.Milliseconds, TDisplay.diMSD, Precision); 29 | end; 30 | 31 | end. 32 | -------------------------------------------------------------------------------- /Formatter/uTimePrefix.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Formatter/uTimePrefix.pas -------------------------------------------------------------------------------- /Formatter/uTwoDigitFormatter.pas: -------------------------------------------------------------------------------- 1 | unit uTwoDigitFormatter; 2 | 3 | interface 4 | 5 | uses 6 | uTypes, 7 | uMaskFormatter; 8 | 9 | type 10 | TTwoDigitFormatter = class(TMaskFormatter) 11 | public 12 | constructor Create; 13 | end; 14 | 15 | implementation 16 | 17 | 18 | { TTwoDigitFormatter } 19 | 20 | constructor TTwoDigitFormatter.Create; 21 | begin 22 | inherited; 23 | 24 | Mask := '#0'; 25 | end; 26 | 27 | end. 28 | -------------------------------------------------------------------------------- /GUI/VCL/Components/uCustomDTimer.pas: -------------------------------------------------------------------------------- 1 | unit uCustomDTimer; 2 | 3 | interface 4 | 5 | uses 6 | Classes; 7 | 8 | type 9 | TCustomDTimer = class abstract(TComponent) 10 | public 11 | procedure Step; virtual; abstract; 12 | end; 13 | 14 | implementation 15 | 16 | end. 17 | 18 | -------------------------------------------------------------------------------- /GUI/VCL/Components/uDMemo.pas: -------------------------------------------------------------------------------- 1 | unit uDMemo; 2 | 3 | interface 4 | 5 | uses 6 | Classes, 7 | Vcl.StdCtrls; 8 | 9 | type 10 | TDMemo = class(TMemo) 11 | private 12 | { Private declarations } 13 | public 14 | { Public declarations } 15 | procedure KeyDown(var Key: Word; Shift: TShiftState); override; 16 | published 17 | { Published declarations } 18 | end; 19 | 20 | implementation 21 | 22 | uses uTypes; 23 | 24 | procedure TDMemo.KeyDown(var Key: Word; Shift: TShiftState); 25 | begin 26 | if (Key = Ord('A')) and (Shift = [ssCtrl]) then 27 | SelectAll 28 | else 29 | inherited; 30 | end; 31 | 32 | end. 33 | -------------------------------------------------------------------------------- /GUI/VCL/Frames/rOkCancel.dfm: -------------------------------------------------------------------------------- 1 | object FrameOkCancel: TFrameOkCancel 2 | Left = 0 3 | Top = 0 4 | Width = 319 5 | Height = 44 6 | TabOrder = 0 7 | OnResize = FrameResize 8 | object Bevel: TBevel 9 | Left = 0 10 | Top = 0 11 | Width = 319 12 | Height = 2 13 | Align = alTop 14 | end 15 | object ButtonOk: TDButton 16 | Left = 144 17 | Top = 8 18 | Width = 75 19 | Height = 25 20 | Caption = '&OK' 21 | Default = True 22 | TabOrder = 0 23 | end 24 | object ButtonCancel: TDButton 25 | Left = 232 26 | Top = 8 27 | Width = 75 28 | Height = 25 29 | Cancel = True 30 | Caption = '&Cancel' 31 | TabOrder = 1 32 | end 33 | end 34 | -------------------------------------------------------------------------------- /GUI/efBLoop.inc: -------------------------------------------------------------------------------- 1 | @Loop: 2 | -------------------------------------------------------------------------------- /GUI/efELoop.inc: -------------------------------------------------------------------------------- 1 | add esi, BPP 2 | add edi, BPP 3 | cmp edi, ecx 4 | jb @Loop 5 | 6 | -------------------------------------------------------------------------------- /GUI/uDBitmapTest.pas: -------------------------------------------------------------------------------- 1 | unit uDBitmapTest; 2 | 3 | interface 4 | 5 | uses 6 | uTypes, 7 | TestFrameWork; 8 | 9 | type 10 | TDBitmapTest = class(TTestCase) 11 | published 12 | procedure Test; 13 | end; 14 | 15 | implementation 16 | 17 | uses 18 | uDBitmap, 19 | uSystemPaths; 20 | 21 | { TDBitmapTest } 22 | 23 | procedure TDBitmapTest.Test; 24 | var 25 | B: TDBitmap; 26 | begin 27 | B := TDBitmap.Create; 28 | try 29 | B.LoadFromFile(SystemPaths.DataDir + 'Example Raster Graphics\Abalone.png'); 30 | B.ResizeUp(600, 800); 31 | finally 32 | B.Free; 33 | end; 34 | end; 35 | 36 | initialization 37 | RegisterTest('DBitmap Test', TDBitmapTest.Suite); 38 | end. 39 | -------------------------------------------------------------------------------- /GUI/uDesktopWindowTest.pas: -------------------------------------------------------------------------------- 1 | unit uDesktopWindowTest; 2 | 3 | interface 4 | 5 | uses 6 | uTypes, 7 | TestFrameWork; 8 | 9 | type 10 | TDesktopWindowTest = class(TTestCase) 11 | published 12 | procedure Test; 13 | end; 14 | 15 | implementation 16 | 17 | uses 18 | Winapi.Windows, 19 | 20 | uDesktopWindow, 21 | uFiles; 22 | 23 | { TDesktopWindowTest } 24 | 25 | procedure TDesktopWindowTest.Test; 26 | begin 27 | CheckTrue(DesktopWindow.WindowHandle <> INVALID_HANDLE_VALUE); 28 | CheckTrue(DesktopWindow.DeviceContext <> 0); 29 | end; 30 | 31 | initialization 32 | RegisterTest('Desktop Window Test', TDesktopWindowTest.Suite); 33 | end. 34 | -------------------------------------------------------------------------------- /GUI/uIgnore.pas: -------------------------------------------------------------------------------- 1 | unit uIgnore; 2 | 3 | interface 4 | 5 | uses 6 | uTypes; 7 | 8 | type 9 | TIgnoreAll = (iaNone, iaSame, iaAll); 10 | 11 | PIgnore = ^TIgnore; 12 | TIgnore = packed record // 32 13 | MsgType: TMessageLevel; // 1 14 | Retry: B1; // 1 15 | Ignore: TIgnoreAll; // 1 16 | Reserved: U1; 17 | 18 | Text: string; // 4 19 | Param: array of string; // 4 20 | Res: S4; // 4 21 | 22 | Buttons: array of string; // 4 23 | 24 | DateTime: TDateTime; // 8 25 | TimeLeft: U2; // 4 26 | end; 27 | 28 | implementation 29 | 30 | end. 31 | -------------------------------------------------------------------------------- /GUI/uPropertiesDialog.pas: -------------------------------------------------------------------------------- 1 | unit uPropertiesDialog; 2 | 3 | interface 4 | 5 | uses 6 | SysUtils; 7 | 8 | procedure PropertiesDialog(const FileName: TFileName); 9 | 10 | implementation 11 | 12 | uses 13 | uMsg, 14 | Winapi.ShellAPI; 15 | 16 | procedure PropertiesDialog(const FileName: TFileName); 17 | var 18 | sei: TShellExecuteInfo; 19 | begin 20 | sei := Default(TShellExecuteInfo); 21 | sei.cbSize := SizeOf(sei); 22 | sei.lpFile := PChar(FileName); 23 | sei.lpVerb := 'properties'; 24 | sei.fMask := SEE_MASK_INVOKEIDLIST; 25 | if ShellExecuteEx(@sei) = False then 26 | IOError(FileName, GetLastError); 27 | end; 28 | 29 | end. 30 | -------------------------------------------------------------------------------- /GUI/uRGBColor.pas: -------------------------------------------------------------------------------- 1 | unit uRGBColor; 2 | 3 | interface 4 | 5 | uses 6 | uTypes; 7 | 8 | type 9 | TRGBColor = record 10 | R: FG; 11 | G: FG; 12 | B: FG; 13 | end; 14 | 15 | implementation 16 | 17 | end. 18 | -------------------------------------------------------------------------------- /GUI/uRenderer.pas: -------------------------------------------------------------------------------- 1 | unit uRenderer; 2 | 3 | interface 4 | 5 | type 6 | TRenderer = class 7 | public 8 | procedure Render; virtual; abstract; 9 | end; 10 | 11 | implementation 12 | 13 | end. 14 | -------------------------------------------------------------------------------- /Game/Turn-based/Common/uForsythEdwardsNotation.pas: -------------------------------------------------------------------------------- 1 | unit uForsythEdwardsNotation; 2 | 3 | interface 4 | 5 | uses 6 | uChar; 7 | 8 | type 9 | TForsythEdwardsNotation = class 10 | public 11 | const 12 | None = '-'; 13 | Separator = CharSpace; 14 | class function SideColorToChar(const ASideString: string): Char; 15 | end; 16 | 17 | implementation 18 | 19 | uses 20 | uStrings; 21 | 22 | { TForsythEdwardsNotation } 23 | 24 | class function TForsythEdwardsNotation.SideColorToChar(const ASideString: string): Char; 25 | begin 26 | Result := LowCase(FirstChar(ASideString)); 27 | end; 28 | 29 | end. 30 | -------------------------------------------------------------------------------- /Game/Turn-based/Common/uMove.pas: -------------------------------------------------------------------------------- 1 | unit uMove; 2 | 3 | interface 4 | 5 | uses 6 | uTypes; 7 | 8 | type 9 | PMove = ^TMove; 10 | TMove = packed record // Dynamic type, do not use SizeOf(TMove) 11 | Size: U1; 12 | // ... 13 | end; 14 | 15 | implementation 16 | 17 | end. 18 | -------------------------------------------------------------------------------- /Game/Turn-based/Common/uMoveList.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Game/Turn-based/Common/uMoveList.pas -------------------------------------------------------------------------------- /Game/Turn-based/Common/uSquare.pas: -------------------------------------------------------------------------------- 1 | unit uSquare; 2 | 3 | interface 4 | 5 | uses 6 | uTypes; 7 | 8 | type 9 | TSide = U1; // 0..PlayerMax 10 | 11 | TSquare = S1; // S1 is fastest, but S4 is similar 12 | TPiece = S1; // S1 is fastest, but S4 is similar 13 | 14 | TSquareIndex = S1; // S1 or U1 is the fastest 15 | TSquares = array of TSquare; 16 | const 17 | PlayerMax = 1; 18 | 19 | sqEmpty = 0; 20 | sqOut = 127; // sqNone 21 | 22 | function SquareToSide(const ASquare: TSquare): TSide; inline; 23 | 24 | implementation 25 | 26 | function SquareToSide(const ASquare: TSquare): TSide; 27 | begin 28 | Assert(ASquare <> sqEmpty); 29 | Assert(ASquare <> sqOut); 30 | Result := U1(ASquare) shr 7; 31 | end; 32 | 33 | end. 34 | -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Common/uSubtreeStatus.pas: -------------------------------------------------------------------------------- 1 | unit uSubtreeStatus; 2 | 3 | interface 4 | 5 | uses 6 | uTypes, 7 | 8 | uScore, 9 | uVariationCut; 10 | 11 | type 12 | TSubtreeStatus = record 13 | Score: TScore; // 2 14 | ScoreBound: TScoreBound; // 1 15 | VariationCut: TVariationCut; // 1 16 | MoveCount: U1; // 1 17 | end; 18 | 19 | implementation 20 | 21 | end. 22 | -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Common/uVariationCut.pas: -------------------------------------------------------------------------------- 1 | unit uVariationCut; 2 | 3 | interface 4 | 5 | type 6 | TVariationCut = ( 7 | vcNone, // "unterminated": game not terminated. 8 | // "normal": game terminated in a normal fashion. 9 | // Engine only 10 | vcGameFinished, 11 | vcSpecific, 12 | vcAlpha, // FailLow 13 | vcBeta, // FailHigh 14 | vcLimit, 15 | vcCalm, 16 | vcDepth, 17 | vcSelectivity, 18 | vcFutility, 19 | vcMaxDepth, 20 | vcHashAlpha, 21 | vcHashBeta, 22 | vcMovesRule, 23 | vcRepetition 24 | ); 25 | 26 | implementation 27 | 28 | end. 29 | -------------------------------------------------------------------------------- /Game/Turn-based/Engine/External/uStartWriter.pas: -------------------------------------------------------------------------------- 1 | unit uStartWriter; 2 | 3 | interface 4 | 5 | uses 6 | uCustomEngineWriter; 7 | 8 | type 9 | TStartWriter = class(TCustomEngineWriter) 10 | public 11 | procedure Quit; override; 12 | end; 13 | 14 | implementation 15 | 16 | { TStartWriter } 17 | 18 | procedure TStartWriter.Quit; 19 | begin 20 | inherited; 21 | 22 | SendCommand('quit'); 23 | end; 24 | 25 | end. 26 | -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Internal/uStopCause.pas: -------------------------------------------------------------------------------- 1 | unit uStopCause; 2 | 3 | interface 4 | 5 | type 6 | TStopCause = ( 7 | scNone, 8 | 9 | scUserAbort, 10 | scNoChoise, 11 | scNoIncrement, 12 | scWinScore, 13 | scLoseScore, 14 | 15 | scLevelOnNode, 16 | scLevelOnMove, 17 | scLevelOnAnalysis, 18 | scLevelOnDepth 19 | ); 20 | 21 | var 22 | StopCauseStrings: array[TStopCause] of string; 23 | 24 | implementation 25 | 26 | uses 27 | uStrings; 28 | 29 | initialization 30 | EnumToStr(TypeInfo(TStopCause), StopCauseStrings); 31 | end. 32 | -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Protocols/Commands/UCI/uPonderHitCommand.pas: -------------------------------------------------------------------------------- 1 | unit uPonderHitCommand; 2 | 3 | interface 4 | 5 | uses 6 | uSimpleEngineCommand; 7 | 8 | type 9 | TPonderHitCommand = class(TSimpleEngineCommand) 10 | public 11 | constructor Create; 12 | 13 | procedure ExecuteNoParam; override; 14 | end; 15 | 16 | implementation 17 | 18 | { TPonderHitCommand } 19 | 20 | constructor TPonderHitCommand.Create; 21 | begin 22 | inherited; 23 | 24 | Description := 'Used if the engine was told to ponder on the same move.'; 25 | end; 26 | 27 | procedure TPonderHitCommand.ExecuteNoParam; 28 | begin 29 | inherited; 30 | 31 | // TODO : Implement 32 | end; 33 | 34 | end. 35 | -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Protocols/Commands/XBoard/uBkCommand.pas: -------------------------------------------------------------------------------- 1 | unit uBkCommand; 2 | 3 | interface 4 | 5 | uses 6 | uSimpleEngineCommand; 7 | 8 | type 9 | TBkCommand = class(TSimpleEngineCommand) 10 | public 11 | constructor Create; 12 | 13 | procedure ExecuteNoParam; override; 14 | end; 15 | 16 | implementation 17 | 18 | { TBkCommand } 19 | 20 | constructor TBkCommand.Create; 21 | begin 22 | inherited; 23 | 24 | Description := 'Show book moves from this position, if any.'; 25 | end; 26 | 27 | procedure TBkCommand.ExecuteNoParam; 28 | begin 29 | inherited; 30 | 31 | InternalEngine.BookMoves; 32 | end; 33 | 34 | end. 35 | 36 | -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Protocols/Commands/XBoard/uComputerCommand.pas: -------------------------------------------------------------------------------- 1 | unit uComputerCommand; 2 | 3 | interface 4 | 5 | uses 6 | uSimpleEngineCommand; 7 | 8 | type 9 | TComputerCommand = class(TSimpleEngineCommand) 10 | public 11 | constructor Create; 12 | 13 | procedure ExecuteNoParam; override; 14 | end; 15 | 16 | implementation 17 | 18 | { TComputerCommand } 19 | 20 | constructor TComputerCommand.Create; 21 | begin 22 | inherited; 23 | 24 | Description := 'The opponent is also a computer chess engine.'; 25 | end; 26 | 27 | procedure TComputerCommand.ExecuteNoParam; 28 | begin 29 | inherited; 30 | 31 | end; 32 | 33 | end. 34 | 35 | -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Protocols/Commands/XBoard/uCoresCommand.pas: -------------------------------------------------------------------------------- 1 | unit uCoresCommand; 2 | 3 | interface 4 | 5 | uses 6 | uUnsupportedCommand; 7 | 8 | type 9 | TCoresCommand = class(TUnsupportedCommand) 10 | protected 11 | function GetSyntax: string; override; 12 | public 13 | constructor Create; 14 | end; 15 | 16 | implementation 17 | 18 | { TCoresCommand } 19 | 20 | constructor TCoresCommand.Create; 21 | begin 22 | inherited; 23 | 24 | Description := 'How many CPU cores it is allowed to use maximally.'; 25 | end; 26 | 27 | function TCoresCommand.GetSyntax: string; 28 | begin 29 | Result := ''; 30 | end; 31 | 32 | end. 33 | 34 | -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Protocols/Commands/XBoard/uEGTPathCommand.pas: -------------------------------------------------------------------------------- 1 | unit uEGTPathCommand; 2 | 3 | interface 4 | 5 | uses 6 | uUnsupportedCommand; 7 | 8 | type 9 | TEGTPathCommand = class(TUnsupportedCommand) 10 | protected 11 | function GetSyntax: string; override; 12 | public 13 | constructor Create; 14 | end; 15 | 16 | implementation 17 | 18 | { TEGTPathCommand } 19 | 20 | constructor TEGTPathCommand.Create; 21 | begin 22 | inherited; 23 | 24 | Description := 'Which directory (given by the PATH argument) it can find end-game tables of the specified TYPE.'; 25 | end; 26 | 27 | function TEGTPathCommand.GetSyntax: string; 28 | begin 29 | Result := '[Type Path]'; 30 | end; 31 | 32 | end. 33 | 34 | -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Protocols/Commands/XBoard/uEasyCommand.pas: -------------------------------------------------------------------------------- 1 | unit uEasyCommand; 2 | 3 | interface 4 | 5 | uses 6 | uSimpleEngineCommand; 7 | 8 | type 9 | TEasyCommand = class(TSimpleEngineCommand) 10 | public 11 | constructor Create; 12 | 13 | procedure ExecuteNoParam; override; 14 | end; 15 | 16 | implementation 17 | 18 | { TEasyCommand } 19 | 20 | constructor TEasyCommand.Create; 21 | begin 22 | inherited; 23 | 24 | Description := 'Turn off pondering (thinking on the opponent''s time, also known as "permanent brain").'; 25 | end; 26 | 27 | procedure TEasyCommand.ExecuteNoParam; 28 | begin 29 | inherited; 30 | 31 | InternalEngine.CommonOptions.Ponder.Value := False; 32 | end; 33 | 34 | end. 35 | -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Protocols/Commands/XBoard/uEditCommand.pas: -------------------------------------------------------------------------------- 1 | unit uEditCommand; 2 | 3 | interface 4 | 5 | uses 6 | uUnsupportedCommand; 7 | 8 | type 9 | TEditCommand = class(TUnsupportedCommand) 10 | protected 11 | function GetSyntax: string; override; 12 | public 13 | constructor Create; 14 | end; 15 | 16 | implementation 17 | 18 | { TEditCommand } 19 | 20 | constructor TEditCommand.Create; 21 | begin 22 | inherited; 23 | 24 | Description := 'The edit command puts the chess engine into a special mode, where it accepts subcommands.'; 25 | end; 26 | 27 | function TEditCommand.GetSyntax: string; 28 | begin 29 | Result := ''; 30 | end; 31 | 32 | end. 33 | 34 | -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Protocols/Commands/XBoard/uExcludeAllCommand.pas: -------------------------------------------------------------------------------- 1 | unit uExcludeAllCommand; 2 | 3 | interface 4 | 5 | uses 6 | uSimpleEngineCommand; 7 | 8 | type 9 | TExcludeAllCommand = class(TSimpleEngineCommand) 10 | public 11 | constructor Create; 12 | 13 | procedure ExecuteNoParam; override; 14 | end; 15 | 16 | implementation 17 | 18 | { TExcludeAllCommand } 19 | 20 | constructor TExcludeAllCommand.Create; 21 | begin 22 | inherited; 23 | 24 | Description := 'No moves are possible. After this command call "Include" commands.'; 25 | end; 26 | 27 | procedure TExcludeAllCommand.ExecuteNoParam; 28 | begin 29 | inherited; 30 | 31 | InternalEngine.RootMoves.ExcludeAll; 32 | end; 33 | 34 | end. 35 | 36 | -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Protocols/Commands/XBoard/uHardCommand.pas: -------------------------------------------------------------------------------- 1 | unit uHardCommand; 2 | 3 | interface 4 | 5 | uses 6 | uSimpleEngineCommand; 7 | 8 | type 9 | THardCommand = class(TSimpleEngineCommand) 10 | public 11 | constructor Create; 12 | procedure ExecuteNoParam; override; 13 | end; 14 | 15 | implementation 16 | 17 | { THardCommand } 18 | 19 | constructor THardCommand.Create; 20 | begin 21 | inherited; 22 | 23 | Description := 'Turn on pondering (thinking on the opponent''s time, also known as "permanent brain").'; 24 | end; 25 | 26 | procedure THardCommand.ExecuteNoParam; 27 | begin 28 | inherited; 29 | 30 | InternalEngine.CommonOptions.Ponder.Value := True; 31 | end; 32 | 33 | end. 34 | -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Protocols/Commands/XBoard/uMemoryCommand.pas: -------------------------------------------------------------------------------- 1 | unit uMemoryCommand; 2 | 3 | interface 4 | 5 | uses 6 | uUnsupportedCommand; 7 | 8 | type 9 | TMemoryCommand = class(TUnsupportedCommand) 10 | protected 11 | function GetSyntax: string; override; 12 | public 13 | constructor Create; 14 | end; 15 | 16 | implementation 17 | 18 | uses 19 | SysUtils; 20 | 21 | { TMemoryCommand } 22 | 23 | constructor TMemoryCommand.Create; 24 | begin 25 | inherited; 26 | 27 | Description := 'How much memory it is allowed to use maximally, in MegaBytes.'; 28 | end; 29 | 30 | function TMemoryCommand.GetSyntax: string; 31 | begin 32 | Result := '[MegaBytes]'; 33 | end; 34 | 35 | end. 36 | 37 | -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Protocols/Commands/XBoard/uPostCommand.pas: -------------------------------------------------------------------------------- 1 | unit uPostCommand; 2 | 3 | interface 4 | 5 | uses 6 | uSimpleEngineCommand; 7 | 8 | type 9 | TPostCommand = class(TSimpleEngineCommand) 10 | public 11 | constructor Create; 12 | 13 | procedure ExecuteNoParam; override; 14 | end; 15 | 16 | implementation 17 | 18 | uses 19 | uXBoardEngineOutput; 20 | 21 | { TPostCommand } 22 | 23 | constructor TPostCommand.Create; 24 | begin 25 | inherited; 26 | 27 | Description := 'Turn on thinking/pondering output.'; 28 | end; 29 | 30 | procedure TPostCommand.ExecuteNoParam; 31 | begin 32 | inherited; 33 | 34 | TXBoardEngineOutput(InternalEngine.Output).Enabled := True; 35 | end; 36 | 37 | end. 38 | 39 | -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Protocols/Commands/XBoard/uQuestionMarkCommand.pas: -------------------------------------------------------------------------------- 1 | unit uQuestionMarkCommand; 2 | 3 | interface 4 | 5 | uses 6 | uStopCommand, 7 | uEngineCommand; 8 | 9 | type 10 | TQuestionMarkCommand = class(TStopCommand) 11 | 12 | end; 13 | 14 | implementation 15 | 16 | { TQuestionMarkCommand } 17 | 18 | end. 19 | 20 | -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Protocols/Commands/XBoard/uRemoveCommand.pas: -------------------------------------------------------------------------------- 1 | unit uRemoveCommand; 2 | 3 | interface 4 | 5 | uses 6 | uSimpleEngineCommand; 7 | 8 | type 9 | TRemoveCommand = class(TSimpleEngineCommand) 10 | public 11 | constructor Create; 12 | 13 | procedure ExecuteNoParam; override; 14 | end; 15 | 16 | implementation 17 | 18 | { TRemoveCommand } 19 | 20 | constructor TRemoveCommand.Create; 21 | begin 22 | inherited; 23 | 24 | Description := 'Retract a move. It sends this command only when the user is on move.'; 25 | end; 26 | 27 | procedure TRemoveCommand.ExecuteNoParam; 28 | begin 29 | inherited; 30 | 31 | InternalEngine.Undo; 32 | InternalEngine.Undo; 33 | end; 34 | 35 | end. 36 | 37 | -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Protocols/Commands/XBoard/uResumeCommand.pas: -------------------------------------------------------------------------------- 1 | unit uResumeCommand; 2 | 3 | interface 4 | 5 | uses 6 | uSimpleEngineCommand; 7 | 8 | type 9 | TResumeCommand = class(TSimpleEngineCommand) 10 | public 11 | constructor Create; 12 | 13 | procedure ExecuteNoParam; override; 14 | end; 15 | 16 | implementation 17 | 18 | { TResumeCommand } 19 | 20 | constructor TResumeCommand.Create; 21 | begin 22 | inherited; 23 | 24 | Description := 'Wake up engine from pause mode.'; 25 | end; 26 | 27 | procedure TResumeCommand.ExecuteNoParam; 28 | begin 29 | inherited; 30 | 31 | InternalEngine.Resume; 32 | end; 33 | 34 | end. 35 | 36 | -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Protocols/Commands/XBoard/uUndoCommand.pas: -------------------------------------------------------------------------------- 1 | unit uUndoCommand; 2 | 3 | interface 4 | 5 | uses 6 | uSimpleEngineCommand; 7 | 8 | type 9 | TUndoCommand = class(TSimpleEngineCommand) 10 | public 11 | constructor Create; 12 | 13 | procedure ExecuteNoParam; override; 14 | end; 15 | 16 | implementation 17 | 18 | { TUndoCommand } 19 | 20 | constructor TUndoCommand.Create; 21 | begin 22 | inherited; 23 | 24 | Description := 'Back up one move and only in analyze mode start analyzing.'; 25 | end; 26 | 27 | procedure TUndoCommand.ExecuteNoParam; 28 | begin 29 | inherited; 30 | 31 | InternalEngine.Undo; 32 | end; 33 | 34 | end. 35 | 36 | -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Protocols/Commands/XBoard/uXBoardProtocolCommand.pas: -------------------------------------------------------------------------------- 1 | // Ancestor for Commands 2 | 3 | unit uXBoardProtocolCommand; 4 | 5 | interface 6 | 7 | uses 8 | uEngineCommand, 9 | uXBoardProtocol; 10 | 11 | type 12 | TXBoardProtocolCommand = class(TEngineCommand) 13 | private 14 | FXBoardProtocol: TXBoardProtocol; 15 | procedure SetXBoardProtocol(const Value: TXBoardProtocol); 16 | public 17 | property XBoardProtocol: TXBoardProtocol read FXBoardProtocol write SetXBoardProtocol; 18 | end; 19 | 20 | implementation 21 | 22 | { TXBoardProtocolCommand } 23 | 24 | procedure TXBoardProtocolCommand.SetXBoardProtocol(const Value: TXBoardProtocol); 25 | begin 26 | FXBoardProtocol := Value; 27 | end; 28 | 29 | end. 30 | -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Protocols/Commands/uBenchmarkCommand.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Game/Turn-based/Engine/Protocols/Commands/uBenchmarkCommand.pas -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Protocols/Commands/uEngineCommand.pas: -------------------------------------------------------------------------------- 1 | // Ancestor for Commands 2 | 3 | unit uEngineCommand; 4 | 5 | interface 6 | 7 | uses 8 | uInternalEngine, 9 | uCustomCommand; 10 | 11 | type 12 | TEngineCommand = class(TCustomCommand) 13 | private 14 | FInternalEngine: TInternalEngine; 15 | procedure SetInternalEngine(const Value: TInternalEngine); 16 | public 17 | property InternalEngine: TInternalEngine read FInternalEngine write SetInternalEngine; 18 | end; 19 | 20 | implementation 21 | 22 | { TEngineCommand } 23 | 24 | procedure TEngineCommand.SetInternalEngine(const Value: TInternalEngine); 25 | begin 26 | FInternalEngine := Value; 27 | end; 28 | 29 | end. 30 | -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Protocols/Commands/uEngineStateCommand.pas: -------------------------------------------------------------------------------- 1 | unit uEngineStateCommand; 2 | 3 | interface 4 | 5 | uses 6 | uSimpleEngineCommand; 7 | 8 | type 9 | TEngineStateCommand = class(TSimpleEngineCommand) 10 | public 11 | constructor Create; 12 | 13 | procedure ExecuteNoParam; override; 14 | end; 15 | 16 | implementation 17 | 18 | { TEngineState } 19 | 20 | constructor TEngineStateCommand.Create; 21 | begin 22 | inherited; 23 | 24 | Description := 'Displays engine state.'; 25 | end; 26 | 27 | procedure TEngineStateCommand.ExecuteNoParam; 28 | begin 29 | inherited; 30 | 31 | InternalEngine.EngineStateToConsole; 32 | end; 33 | 34 | end. 35 | -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Protocols/Commands/uEvalCommand.pas: -------------------------------------------------------------------------------- 1 | unit uEvalCommand; 2 | 3 | interface 4 | 5 | uses 6 | uSimpleEngineCommand; 7 | 8 | type 9 | TEvalCommand = class(TSimpleEngineCommand) 10 | public 11 | constructor Create; 12 | 13 | procedure ExecuteNoParam; override; 14 | end; 15 | 16 | implementation 17 | 18 | { TEvalCommand } 19 | 20 | constructor TEvalCommand.Create; 21 | begin 22 | inherited; 23 | 24 | Description := 'Displays evaluation of current position.'; 25 | end; 26 | 27 | procedure TEvalCommand.ExecuteNoParam; 28 | begin 29 | inherited; 30 | 31 | InternalEngine.EvalToConsole; 32 | end; 33 | 34 | end. 35 | -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Protocols/Commands/uNewGameCommand.pas: -------------------------------------------------------------------------------- 1 | unit uNewGameCommand; 2 | 3 | interface 4 | 5 | uses 6 | uSimpleEngineCommand; 7 | 8 | type 9 | TNewGameCommand = class(TSimpleEngineCommand) 10 | public 11 | constructor Create; 12 | 13 | procedure ExecuteNoParam; override; 14 | end; 15 | 16 | implementation 17 | 18 | { TNewGameCommand } 19 | 20 | constructor TNewGameCommand.Create; 21 | begin 22 | inherited; 23 | 24 | Description := 'Used when the next search will be from a different game.'; 25 | end; 26 | 27 | procedure TNewGameCommand.ExecuteNoParam; 28 | begin 29 | inherited; 30 | 31 | InternalEngine.SetStartPos; 32 | end; 33 | 34 | end. 35 | -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Protocols/Commands/uProtocolCommand.pas: -------------------------------------------------------------------------------- 1 | // Ancestor for protocol specification commands (uci, xboard) 2 | 3 | unit uProtocolCommand; 4 | 5 | interface 6 | 7 | uses 8 | uConsoleEngine, 9 | uSimpleCommand; 10 | 11 | type 12 | TProtocolCommand = class(TSimpleCommand) 13 | private 14 | FConsoleEngine: TConsoleEngine; 15 | procedure SetConsoleEngine(const Value: TConsoleEngine); 16 | public 17 | property ConsoleEngine: TConsoleEngine read FConsoleEngine write SetConsoleEngine; 18 | end; 19 | 20 | implementation 21 | 22 | { TProtocolCommand } 23 | 24 | procedure TProtocolCommand.SetConsoleEngine(const Value: TConsoleEngine); 25 | begin 26 | FConsoleEngine := Value; 27 | end; 28 | 29 | end. 30 | -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Protocols/Commands/uShowBoardCommand.pas: -------------------------------------------------------------------------------- 1 | unit uShowBoardCommand; 2 | 3 | interface 4 | 5 | uses 6 | uSimpleEngineCommand; 7 | 8 | type 9 | TShowBoardCommand = class(TSimpleEngineCommand) 10 | public 11 | constructor Create; 12 | 13 | procedure ExecuteNoParam; override; 14 | end; 15 | 16 | implementation 17 | 18 | { TShowBoardCommand } 19 | 20 | constructor TShowBoardCommand.Create; 21 | begin 22 | inherited; 23 | 24 | Description := 'Displays board of current position.'; 25 | end; 26 | 27 | procedure TShowBoardCommand.ExecuteNoParam; 28 | begin 29 | inherited; 30 | 31 | InternalEngine.WriteBoardToConsole; 32 | end; 33 | 34 | end. 35 | -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Protocols/Commands/uSimpleEngineCommand.pas: -------------------------------------------------------------------------------- 1 | // Ancestor for Commands 2 | 3 | unit uSimpleEngineCommand; 4 | 5 | interface 6 | 7 | uses 8 | uInternalEngine, 9 | uSimpleCommand; 10 | 11 | type 12 | TSimpleEngineCommand = class(TSimpleCommand) 13 | private 14 | FInternalEngine: TInternalEngine; 15 | procedure SetInternalEngine(const Value: TInternalEngine); 16 | public 17 | property InternalEngine: TInternalEngine read FInternalEngine write SetInternalEngine; 18 | end; 19 | 20 | implementation 21 | 22 | { TSimpleEngineCommand } 23 | 24 | procedure TSimpleEngineCommand.SetInternalEngine(const Value: TInternalEngine); 25 | begin 26 | FInternalEngine := Value; 27 | end; 28 | 29 | end. 30 | -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Protocols/Commands/uStopCommand.pas: -------------------------------------------------------------------------------- 1 | unit uStopCommand; 2 | 3 | interface 4 | 5 | uses 6 | uSimpleEngineCommand; 7 | 8 | type 9 | TStopCommand = class(TSimpleEngineCommand) 10 | public 11 | constructor Create; 12 | 13 | procedure ExecuteNoParam; override; 14 | end; 15 | 16 | implementation 17 | 18 | { TStopCommand } 19 | 20 | constructor TStopCommand.Create; 21 | begin 22 | inherited; 23 | 24 | Description := 'Stop calculating as soon as possible.'; 25 | end; 26 | 27 | procedure TStopCommand.ExecuteNoParam; 28 | begin 29 | inherited; 30 | 31 | InternalEngine.Stop; 32 | end; 33 | 34 | end. 35 | -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Protocols/uTextType.pas: -------------------------------------------------------------------------------- 1 | unit uTextType; 2 | 3 | interface 4 | 5 | type 6 | TTextType = (ccDebug, ccError, ccInfo, ccKeyword, ccValue, ccFalseValue, ccTrueValue); 7 | 8 | implementation 9 | 10 | end. 11 | -------------------------------------------------------------------------------- /Game/Turn-based/Levels/uInfiniteLevel.pas: -------------------------------------------------------------------------------- 1 | unit uInfiniteLevel; 2 | 3 | interface 4 | 5 | uses 6 | uTypes, 7 | uCustomLevel; 8 | 9 | type 10 | TInfiniteLevel = class(TCustomLevel) 11 | public 12 | function GetAsString: string; override; 13 | end; 14 | 15 | implementation 16 | 17 | { TInfiniteLevel } 18 | 19 | function TInfiniteLevel.GetAsString: string; 20 | begin 21 | Result := 'Infinite'; 22 | end; 23 | 24 | end. 25 | -------------------------------------------------------------------------------- /Hardware/uCPU.pas: -------------------------------------------------------------------------------- 1 | unit uCPU; 2 | 3 | interface 4 | 5 | {$ifdef MSWINDOWS} 6 | uses 7 | uWindowsCPU; 8 | type 9 | TSpecificCPU = TWindowsCPU; 10 | {$else} 11 | uses 12 | uCustomCPU; 13 | type 14 | TSpecificCPU = TCustomCPU; 15 | {$endif} 16 | 17 | function CPU: TSpecificCPU; 18 | 19 | implementation 20 | 21 | uses 22 | SysUtils; 23 | 24 | var 25 | GCPU: TSpecificCPU; 26 | 27 | function CPU: TSpecificCPU; 28 | begin 29 | Result := GCPU; 30 | end; 31 | 32 | initialization 33 | {$IFNDEF NoInitialization} 34 | GCPU := TSpecificCPU.Create; 35 | {$ENDIF NoInitialization} 36 | 37 | finalization 38 | {$IFNDEF NoFinalization} 39 | FreeAndNil(GCPU); 40 | {$ENDIF NoFinalization} 41 | end. 42 | -------------------------------------------------------------------------------- /Logger/uMainLog.pas: -------------------------------------------------------------------------------- 1 | unit uMainLog; 2 | 3 | interface 4 | 5 | uses 6 | uDateTimeLogger; 7 | 8 | var 9 | MainLog: TDateTimeLogger; 10 | 11 | implementation 12 | 13 | end. 14 | -------------------------------------------------------------------------------- /Math/uEvenNumbersSet.pas: -------------------------------------------------------------------------------- 1 | unit uEvenNumbersSet; 2 | 3 | interface 4 | 5 | uses 6 | uTypes, 7 | uNumericalSet; 8 | 9 | type 10 | TEvenNumericalSet = class(TNumericalSet) 11 | public 12 | function Contains(const ANumber: S8): BG; override; 13 | function Description: string; override; 14 | end; 15 | 16 | implementation 17 | 18 | { TEvenNumericalSet } 19 | 20 | function TEvenNumericalSet.Contains(const ANumber: S8): BG; 21 | begin 22 | Result := (ANumber and 1) = 0; 23 | end; 24 | 25 | function TEvenNumericalSet.Description: string; 26 | begin 27 | Result := 'Odd number'; 28 | end; 29 | 30 | end. 31 | 32 | -------------------------------------------------------------------------------- /Math/uNegativeNumberSet.pas: -------------------------------------------------------------------------------- 1 | unit uNegativeNumberSet; 2 | 3 | interface 4 | 5 | uses 6 | uTypes, 7 | uNumericalSet; 8 | 9 | type 10 | TNegativeNumberSet = class(TNumericalSet) 11 | public 12 | function Contains(const ANumber: S8): BG; override; 13 | function Description: string; override; 14 | end; 15 | 16 | implementation 17 | 18 | { TNegativeNumberSet } 19 | 20 | function TNegativeNumberSet.Contains(const ANumber: S8): BG; 21 | begin 22 | Result := ANumber < 0; 23 | end; 24 | 25 | function TNegativeNumberSet.Description: string; 26 | begin 27 | Result := 'Negative number'; 28 | end; 29 | 30 | end. 31 | 32 | -------------------------------------------------------------------------------- /Math/uNonNegativeNumberSet.pas: -------------------------------------------------------------------------------- 1 | unit uNonNegativeNumberSet; 2 | 3 | interface 4 | 5 | uses 6 | uTypes, 7 | uNumericalSet; 8 | 9 | type 10 | TNonNegativeNumberSet = class(TNumericalSet) 11 | public 12 | function Contains(const ANumber: S8): BG; override; 13 | function Description: string; override; 14 | end; 15 | 16 | implementation 17 | 18 | { TNonNegativeNumberSet } 19 | 20 | function TNonNegativeNumberSet.Contains(const ANumber: S8): BG; 21 | begin 22 | Result := ANumber >= 0; 23 | end; 24 | 25 | function TNonNegativeNumberSet.Description: string; 26 | begin 27 | Result := 'Non-negative number'; 28 | end; 29 | 30 | end. 31 | 32 | -------------------------------------------------------------------------------- /Math/uNonPositiveNumberSet.pas: -------------------------------------------------------------------------------- 1 | unit uNonPositiveNumberSet; 2 | 3 | interface 4 | 5 | uses 6 | uTypes, 7 | uNumericalSet; 8 | 9 | type 10 | TNonPositiveNumberSet = class(TNumericalSet) 11 | public 12 | function Contains(const ANumber: S8): BG; override; 13 | function Description: string; override; 14 | end; 15 | 16 | implementation 17 | 18 | { TNonPositiveNumberSet } 19 | 20 | function TNonPositiveNumberSet.Contains(const ANumber: S8): BG; 21 | begin 22 | Result := ANumber <= 0; 23 | end; 24 | 25 | function TNonPositiveNumberSet.Description: string; 26 | begin 27 | Result := 'Non-negative number'; 28 | end; 29 | 30 | end. 31 | 32 | -------------------------------------------------------------------------------- /Math/uNumericalSet.pas: -------------------------------------------------------------------------------- 1 | // Integers or Rational Numbers Set 2 | 3 | unit uNumericalSet; 4 | 5 | interface 6 | 7 | uses 8 | uTypes; 9 | 10 | type 11 | TNumericalSet = class 12 | public 13 | function Contains(const ANumber: S8): BG; overload; virtual; abstract; 14 | function Contains(const ANumber: FG): BG; overload; virtual; abstract; 15 | function Description: string; virtual; abstract; 16 | end; 17 | 18 | implementation 19 | 20 | end. 21 | -------------------------------------------------------------------------------- /Math/uOddNumbersSet.pas: -------------------------------------------------------------------------------- 1 | unit uOddNumbersSet; 2 | 3 | interface 4 | 5 | uses 6 | uTypes, 7 | uNumericalSet; 8 | 9 | type 10 | TOddNumericalSet = class(TNumericalSet) 11 | public 12 | function Contains(const ANumber: S8): BG; override; 13 | function Description: string; override; 14 | end; 15 | 16 | implementation 17 | 18 | { TOddNumericalSet } 19 | 20 | function TOddNumericalSet.Contains(const ANumber: S8): BG; 21 | begin 22 | Result := (ANumber and 1) <> 0; 23 | end; 24 | 25 | function TOddNumericalSet.Description: string; 26 | begin 27 | Result := 'Odd number'; 28 | end; 29 | 30 | end. 31 | -------------------------------------------------------------------------------- /Math/uPositiveNumberSet.pas: -------------------------------------------------------------------------------- 1 | unit uPositiveNumberSet; 2 | 3 | interface 4 | 5 | uses 6 | uTypes, 7 | uNumericalSet; 8 | 9 | type 10 | TPositiveNumberlSet = class(TNumericalSet) 11 | public 12 | function Contains(const ANumber: S8): BG; override; 13 | function Description: string; override; 14 | end; 15 | 16 | implementation 17 | 18 | { TPositiveNumberlSet } 19 | 20 | function TPositiveNumberlSet.Contains(const ANumber: S8): BG; 21 | begin 22 | Result := ANumber > 0; 23 | end; 24 | 25 | function TPositiveNumberlSet.Description: string; 26 | begin 27 | Result := 'Positive number'; 28 | end; 29 | 30 | end. 31 | -------------------------------------------------------------------------------- /Packages/Graphics/Lib.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Packages/Graphics/Lib.ico -------------------------------------------------------------------------------- /Packages/uDButton.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Packages/uDButton.dcr -------------------------------------------------------------------------------- /Packages/uDForm.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Packages/uDForm.dcr -------------------------------------------------------------------------------- /Packages/uDGauge.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Packages/uDGauge.dcr -------------------------------------------------------------------------------- /Packages/uDImage.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Packages/uDImage.dcr -------------------------------------------------------------------------------- /Packages/uDLabel.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Packages/uDLabel.dcr -------------------------------------------------------------------------------- /Packages/uDPanel.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Packages/uDPanel.dcr -------------------------------------------------------------------------------- /Packages/uDTimer.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Packages/uDTimer.dcr -------------------------------------------------------------------------------- /Packages/uDView.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Packages/uDView.dcr -------------------------------------------------------------------------------- /Packages/uOpenedFiles.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Packages/uOpenedFiles.dcr -------------------------------------------------------------------------------- /Packages/uSxPathEdit.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Packages/uSxPathEdit.dcr -------------------------------------------------------------------------------- /Packages/uSxRibbon.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Packages/uSxRibbon.dcr -------------------------------------------------------------------------------- /Packages/uSxToolBar.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Packages/uSxToolBar.dcr -------------------------------------------------------------------------------- /Parser/uBigDecimalParser.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Parser/uBigDecimalParser.pas -------------------------------------------------------------------------------- /Parser/uCustomParser.pas: -------------------------------------------------------------------------------- 1 | unit uCustomParser; 2 | 3 | interface 4 | 5 | type 6 | ICustomParser = interface(IInterface) 7 | procedure Parse(const AText: string); 8 | end; 9 | 10 | implementation 11 | 12 | end. 13 | -------------------------------------------------------------------------------- /Parser/uMathExpressionParser.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Parser/uMathExpressionParser.pas -------------------------------------------------------------------------------- /Parser/uMathExpressionParserTest.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Parser/uMathExpressionParserTest.pas -------------------------------------------------------------------------------- /RandomGenerator/uBorlandCRandomGenerator.pas: -------------------------------------------------------------------------------- 1 | unit uBorlandCRandomGenerator; 2 | 3 | interface 4 | 5 | uses 6 | uTypes, 7 | uLinearCongruentialGenerator; 8 | 9 | type 10 | TBorlandCRandomGenerator = class(TLinearCongruentialGenerator) 11 | public 12 | constructor Create; 13 | end; 14 | 15 | implementation 16 | 17 | uses 18 | uMath; 19 | 20 | { TBorlandCRandomGenerator } 21 | 22 | constructor TBorlandCRandomGenerator.Create; 23 | begin 24 | inherited; 25 | 26 | Multiplicand := 22695477; 27 | Addition := 1; 28 | end; 29 | 30 | end. 31 | 32 | -------------------------------------------------------------------------------- /RandomGenerator/uGNUCRandomGenerator.pas: -------------------------------------------------------------------------------- 1 | unit uGNUCRandomGenerator; 2 | 3 | interface 4 | 5 | uses 6 | uTypes, 7 | uLinearCongruentialGenerator; 8 | 9 | type 10 | TGNUCRandomGenerator = class(TLinearCongruentialGenerator) 11 | public 12 | constructor Create; 13 | end; 14 | 15 | implementation 16 | 17 | uses 18 | uMath; 19 | 20 | { TGNUCRandomGenerator } 21 | 22 | constructor TGNUCRandomGenerator.Create; 23 | begin 24 | inherited; 25 | 26 | Multiplicand := 1103515245; 27 | Addition := 12345; 28 | end; 29 | 30 | end. 31 | 32 | -------------------------------------------------------------------------------- /RandomGenerator/uNumericalRecepiesRandomGenerator.pas: -------------------------------------------------------------------------------- 1 | // https://en.wikipedia.org/wiki/Numerical_Recipes 2 | 3 | unit uNumericalRecepiesRandomGenerator; 4 | 5 | interface 6 | 7 | uses 8 | uTypes, 9 | uLinearCongruentialGenerator; 10 | 11 | type 12 | TNumericalRecepiesRandomGenerator = class(TLinearCongruentialGenerator) 13 | public 14 | constructor Create; 15 | end; 16 | 17 | implementation 18 | 19 | uses 20 | uMath; 21 | 22 | { TNumericalRecepiesRandomGenerator } 23 | 24 | constructor TNumericalRecepiesRandomGenerator.Create; 25 | begin 26 | inherited; 27 | 28 | Multiplicand := 1664525; 29 | Addition := 1013904223; 30 | end; 31 | 32 | end. 33 | -------------------------------------------------------------------------------- /RandomGenerator/uShuffleGenerator.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/RandomGenerator/uShuffleGenerator.pas -------------------------------------------------------------------------------- /RandomGenerator/uSxRandomGenerator.pas: -------------------------------------------------------------------------------- 1 | unit uSxRandomGenerator; 2 | 3 | interface 4 | 5 | uses 6 | uTypes, 7 | uLinearCongruentialGenerator; 8 | 9 | type 10 | TSxRandomGenerator = class(TLinearCongruentialGenerator) 11 | public 12 | constructor Create; 13 | end; 14 | 15 | implementation 16 | 17 | { TSxRandomGenerator } 18 | 19 | constructor TSxRandomGenerator.Create; 20 | begin 21 | inherited; 22 | 23 | // MMIX by Donald Knuth 24 | Multiplicand := 6364136223846793005; 25 | Addition := 1442695040888963407; 26 | end; 27 | 28 | end. 29 | -------------------------------------------------------------------------------- /Regional/uRegionalCodePage.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Regional/uRegionalCodePage.pas -------------------------------------------------------------------------------- /Regional/uRegionalCodePageTest.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Regional/uRegionalCodePageTest.pas -------------------------------------------------------------------------------- /Renderer/uBarRenderer.pas: -------------------------------------------------------------------------------- 1 | unit uBarRenderer; 2 | 3 | interface 4 | 5 | type 6 | TBar = class 7 | 8 | 9 | end; 10 | 11 | implementation 12 | 13 | end. 14 | -------------------------------------------------------------------------------- /Renderer/uCircle.pas: -------------------------------------------------------------------------------- 1 | unit uCircle; 2 | 3 | interface 4 | 5 | implementation 6 | 7 | end. 8 | -------------------------------------------------------------------------------- /Renderer/uClip.pas: -------------------------------------------------------------------------------- 1 | unit uClip; 2 | 3 | interface 4 | 5 | uses 6 | uDBitmap, 7 | uClipping; 8 | 9 | type 10 | TClip = record 11 | Bitmap: TDBitmap; 12 | Clipping: TClipping; 13 | end; 14 | 15 | implementation 16 | 17 | end. 18 | -------------------------------------------------------------------------------- /Renderer/uEllipse.pas: -------------------------------------------------------------------------------- 1 | unit uEllipse; 2 | 3 | interface 4 | 5 | implementation 6 | 7 | end. 8 | -------------------------------------------------------------------------------- /Renderer/uFill.pas: -------------------------------------------------------------------------------- 1 | unit uFill; 2 | 3 | interface 4 | 5 | uses 6 | UITypes; 7 | 8 | type 9 | TFill = class 10 | private 11 | FColor: TColor; 12 | procedure SetColor(const Value: TColor); 13 | public 14 | property Color: TColor read FColor write SetColor; 15 | end; 16 | 17 | implementation 18 | 19 | { TFill } 20 | 21 | procedure TFill.SetColor(const Value: TColor); 22 | begin 23 | FColor := Value; 24 | end; 25 | 26 | end. 27 | -------------------------------------------------------------------------------- /Renderer/uGradientBar.pas: -------------------------------------------------------------------------------- 1 | unit uGradientBar; 2 | 3 | interface 4 | 5 | uses 6 | uBar; 7 | 8 | type 9 | TGradientBar = class(TBar) 10 | 11 | end; 12 | 13 | implementation 14 | 15 | end. 16 | -------------------------------------------------------------------------------- /Renderer/uGraphicObjects.pas: -------------------------------------------------------------------------------- 1 | unit uGraphicObjects; 2 | 3 | interface 4 | 5 | uses 6 | Generics.Collections, 7 | uGraphicObject; 8 | 9 | type 10 | TGraphicObjects = class(TObjectList) 11 | 12 | end; 13 | 14 | implementation 15 | 16 | end. 17 | -------------------------------------------------------------------------------- /Renderer/uPolygon.pas: -------------------------------------------------------------------------------- 1 | unit uPolygon; 2 | 3 | interface 4 | 5 | implementation 6 | 7 | end. 8 | -------------------------------------------------------------------------------- /Renderer/uPolyline.pas: -------------------------------------------------------------------------------- 1 | unit uPolyline; 2 | 3 | interface 4 | 5 | implementation 6 | 7 | end. 8 | -------------------------------------------------------------------------------- /Renderer/uStroke.pas: -------------------------------------------------------------------------------- 1 | unit uStroke; 2 | 3 | interface 4 | 5 | uses 6 | uTypes, 7 | UITypes; 8 | 9 | type 10 | TStroke = class 11 | private 12 | FWidth: SG; 13 | FColor: TColor; 14 | procedure SetColor(const Value: TColor); 15 | procedure SetWidth(const Value: SG); 16 | public 17 | property Color: TColor read FColor write SetColor; 18 | property Width: SG read FWidth write SetWidth; 19 | end; 20 | 21 | implementation 22 | 23 | { TStroke } 24 | 25 | procedure TStroke.SetColor(const Value: TColor); 26 | begin 27 | FColor := Value; 28 | end; 29 | 30 | procedure TStroke.SetWidth(const Value: SG); 31 | begin 32 | FWidth := Value; 33 | end; 34 | 35 | end. 36 | -------------------------------------------------------------------------------- /Round/uAlternatingTieBreakRound.pas: -------------------------------------------------------------------------------- 1 | unit uAlternatingTieBreakRound; 2 | 3 | interface 4 | 5 | uses 6 | uTypes, 7 | uRound; 8 | 9 | type 10 | TAlternatingTieBreakRound = class(TRound) 11 | private 12 | FTowardsZero: BG; 13 | public 14 | function RoundF8(const AF8: F8): F8; 15 | end; 16 | 17 | implementation 18 | 19 | { TAlternatingTieBreakRound } 20 | 21 | function TAlternatingTieBreakRound.RoundF8(const AF8: F8): F8; 22 | begin 23 | if FTowardsZero then 24 | Result := Trunc(AF8) 25 | else 26 | Result := AwayFromZero(AF8); 27 | 28 | FTowardsZero := not FTowardsZero; 29 | end; 30 | 31 | end. 32 | -------------------------------------------------------------------------------- /Round/uRandomRound.pas: -------------------------------------------------------------------------------- 1 | unit uRandomRound; 2 | 3 | interface 4 | 5 | uses 6 | uRound, 7 | uSxRandomGenerator; 8 | 9 | type 10 | TRandomRound = class(TRound) 11 | protected 12 | FSxRandomGenerator: TSxRandomGenerator; 13 | public 14 | constructor Create; 15 | destructor Destroy; override; 16 | end; 17 | 18 | implementation 19 | 20 | { TRandomRound } 21 | 22 | constructor TRandomRound.Create; 23 | begin 24 | inherited; 25 | 26 | FSxRandomGenerator := TSxRandomGenerator.Create; 27 | end; 28 | 29 | destructor TRandomRound.Destroy; 30 | begin 31 | try 32 | FSxRandomGenerator.Free; 33 | finally 34 | inherited; 35 | end; 36 | end; 37 | 38 | end. 39 | -------------------------------------------------------------------------------- /Round/uRandomTieBreakRound.pas: -------------------------------------------------------------------------------- 1 | unit uRandomTieBreakRound; 2 | 3 | interface 4 | 5 | uses 6 | uTypes, 7 | uRandomRound; 8 | 9 | type 10 | TRandomTieBreakRound = class(TRandomRound) 11 | private 12 | FTowardsZero: BG; 13 | public 14 | function RoundF8(const AF8: F8): F8; 15 | end; 16 | 17 | implementation 18 | 19 | { TRandomTieBreakRound } 20 | 21 | function TRandomTieBreakRound.RoundF8(const AF8: F8): F8; 22 | begin 23 | if Frac(AF8) = 0.5 then 24 | begin 25 | if FSxRandomGenerator.RandomU1 <= 127 then 26 | Result := Trunc(AF8) 27 | else 28 | Result := AwayFromZero(AF8); 29 | end 30 | else 31 | Result := Round(AF8); 32 | end; 33 | 34 | end. 35 | 36 | -------------------------------------------------------------------------------- /Round/uRound.pas: -------------------------------------------------------------------------------- 1 | unit uRound; 2 | 3 | interface 4 | 5 | uses 6 | uTypes; 7 | 8 | type 9 | TRound = class 10 | public 11 | class function AwayFromZero(AF8: F8): F8; 12 | end; 13 | 14 | implementation 15 | 16 | { TRound } 17 | 18 | class function TRound.AwayFromZero(AF8: F8): F8; 19 | begin 20 | if Frac(AF8) = 0 then 21 | Result := AF8 22 | else if AF8 > 0 then 23 | Result := Trunc(AF8) + 1 24 | else 25 | Result := Trunc(AF8) - 1; 26 | end; 27 | 28 | end. 29 | -------------------------------------------------------------------------------- /Round/uStochasticRound.pas: -------------------------------------------------------------------------------- 1 | unit uStochasticRound; 2 | 3 | interface 4 | 5 | uses 6 | uTypes, 7 | uRandomRound; 8 | 9 | type 10 | TStochasticRound = class(TRandomRound) 11 | public 12 | function RoundF8(const AF8: F8): F8; 13 | end; 14 | 15 | implementation 16 | 17 | uses 18 | Math; 19 | 20 | { TStochasticRound } 21 | 22 | function TStochasticRound.RoundF8(const AF8: F8): F8; 23 | var 24 | FractionPart: F8; 25 | begin 26 | FractionPart := Frac(AF8); 27 | 28 | if FSxRandomGenerator.RandomU4 >= FractionPart * (High(U4) + 1) then 29 | Result := Trunc(AF8) 30 | else 31 | Result := AwayFromZero(AF8); 32 | end; 33 | 34 | end. 35 | -------------------------------------------------------------------------------- /Sound/Channels/uMonoChannels.pas: -------------------------------------------------------------------------------- 1 | unit uMonoChannels; 2 | 3 | interface 4 | 5 | uses 6 | uChannels; 7 | 8 | type 9 | TMonoChannels = class(TChannels) 10 | public 11 | constructor Create; 12 | end; 13 | 14 | implementation 15 | 16 | uses 17 | uGeometry2D, 18 | uChannel, 19 | uSpeakerId; 20 | 21 | { TMonoChannels } 22 | 23 | constructor TMonoChannels.Create; 24 | begin 25 | inherited; 26 | 27 | SetLength(FChannelList, 1); 28 | 29 | FChannelList[0].SpeakerId := siFrontCenter; 30 | FChannelList[0].Position := CreatePoint2D(0, -1); 31 | end; 32 | 33 | end. 34 | -------------------------------------------------------------------------------- /Sound/Channels/uSpeakerId.pas: -------------------------------------------------------------------------------- 1 | unit uSpeakerId; 2 | 3 | interface 4 | 5 | type 6 | TSpeakerId = ( 7 | siFrontLeft = $1, 8 | siFrontRight = $2, 9 | siFrontCenter = $4, 10 | siLowFrequency = $8, 11 | siBackLeft = $10, 12 | siBackRight = $20, 13 | siFrontLeftOfCenter = $40, 14 | siFrontRightOfCenter = $80, 15 | siBackCenter = $100, 16 | siSideLeft = $200, 17 | siSideRight = $400, 18 | siTopCenter = $800, 19 | siTopFrontLeft = $1000, 20 | siTopFrontCenter = $2000, 21 | siTopFrontRight = $4000, 22 | siTopBackLeft = $8000, 23 | siTopBackCenter = $10000, 24 | siTopBackRight = $20000 25 | ); 26 | 27 | implementation 28 | 29 | end. 30 | -------------------------------------------------------------------------------- /Sound/Channels/uStereoChannels.pas: -------------------------------------------------------------------------------- 1 | unit uStereoChannels; 2 | 3 | interface 4 | 5 | uses 6 | uChannels; 7 | 8 | type 9 | TStereoChannels = class(TChannels) 10 | public 11 | constructor Create; 12 | end; 13 | 14 | implementation 15 | 16 | uses 17 | uGeometry2D, 18 | uChannel, 19 | uSpeakerId; 20 | 21 | { TStereoChannels } 22 | 23 | constructor TStereoChannels.Create; 24 | begin 25 | inherited; 26 | 27 | SetLength(FChannelList, 2); 28 | 29 | FChannelList[0].SpeakerId := siFrontLeft; 30 | FChannelList[0].Position := CreatePoint2D(-1, 0); 31 | 32 | FChannelList[1].SpeakerId := siFrontRight; 33 | FChannelList[1].Position := CreatePoint2D(+1, 0); 34 | end; 35 | 36 | end. 37 | -------------------------------------------------------------------------------- /Sound/Players/uWavePlayer.pas: -------------------------------------------------------------------------------- 1 | unit uWavePlayer; 2 | 3 | interface 4 | 5 | uses 6 | uTypes, 7 | uWaveCommon; 8 | 9 | type 10 | TWavePlayer = class(TWaveCommon) 11 | private 12 | public 13 | constructor Create; 14 | destructor Destroy; override; 15 | end; 16 | 17 | implementation 18 | 19 | uses 20 | SysUtils; 21 | 22 | { TWavePlayer } 23 | 24 | constructor TWavePlayer.Create; 25 | begin 26 | IsWavePlayer := True; 27 | inherited Create; 28 | end; 29 | 30 | destructor TWavePlayer.Destroy; 31 | begin 32 | 33 | inherited Destroy; 34 | end; 35 | 36 | end. 37 | -------------------------------------------------------------------------------- /Sound/Players/uWaveRecorder.pas: -------------------------------------------------------------------------------- 1 | unit uWaveRecorder; 2 | 3 | interface 4 | 5 | type 6 | TOnReciveBuffrerEvent = procedure(Sender: TObject; Buffer: PWaveSample) of object; 7 | 8 | TWaveRecorder = class(TWaveCommon) 9 | private 10 | FOnReciveBuffrer: TOnReciveBuffrerEvent; 11 | public 12 | property OnReciveBuffrer: TOnReciveBuffrerEvent read FOnReciveBuffrer write FOnReciveBuffrer; 13 | end; 14 | 15 | 16 | implementation 17 | 18 | end. 19 | -------------------------------------------------------------------------------- /Sound/SoundItems/uBlueNoise.pas: -------------------------------------------------------------------------------- 1 | unit uBlueNoise; 2 | 3 | interface 4 | 5 | implementation 6 | 7 | end. 8 | -------------------------------------------------------------------------------- /Sound/SoundItems/uBrownNoise.pas: -------------------------------------------------------------------------------- 1 | unit uBrownNoise; 2 | 3 | interface 4 | 5 | implementation 6 | 7 | end. 8 | -------------------------------------------------------------------------------- /Sound/SoundItems/uGreyNoise.pas: -------------------------------------------------------------------------------- 1 | unit uGreyNoise; 2 | 3 | interface 4 | 5 | implementation 6 | 7 | end. 8 | -------------------------------------------------------------------------------- /Sound/SoundItems/uISoundItem.pas: -------------------------------------------------------------------------------- 1 | unit uISoundItem; 2 | 3 | interface 4 | 5 | uses 6 | uTypes; 7 | 8 | type 9 | TSampleF4 = F4; 10 | 11 | ISoundItem = interface(IInterface) 12 | function GetSample: TSampleF4; 13 | end; 14 | 15 | implementation 16 | 17 | end. 18 | -------------------------------------------------------------------------------- /Sound/SoundItems/uPinkNoise.pas: -------------------------------------------------------------------------------- 1 | unit uPinkNoise; 2 | 3 | interface 4 | 5 | implementation 6 | 7 | end. 8 | -------------------------------------------------------------------------------- /Sound/SoundItems/uSoundItem2D.pas: -------------------------------------------------------------------------------- 1 | unit uSoundItem2D; 2 | 3 | interface 4 | 5 | uses 6 | uGeometry2D, 7 | uSoundItem; 8 | 9 | type 10 | TSoundItem2D = class(TSoundItem) 11 | private 12 | FPosition: TPoint2D; 13 | procedure SetPosition(const Value: TPoint2D); 14 | public 15 | property Position: TPoint2D read FPosition write SetPosition; 16 | end; 17 | 18 | implementation 19 | 20 | { TSoundItem2D } 21 | 22 | procedure TSoundItem2D.SetPosition(const Value: TPoint2D); 23 | begin 24 | FPosition := Value; 25 | end; 26 | 27 | end. 28 | -------------------------------------------------------------------------------- /Sound/SoundItems/uVioletNoise.pas: -------------------------------------------------------------------------------- 1 | unit uVioletNoise; 2 | 3 | interface 4 | 5 | implementation 6 | 7 | end. 8 | -------------------------------------------------------------------------------- /Table/uICell.pas: -------------------------------------------------------------------------------- 1 | unit uICell; 2 | 3 | interface 4 | 5 | uses 6 | uTypes; 7 | 8 | type 9 | ICell = class // interface(IInterface) 10 | public 11 | function GetData: Variant; virtual; abstract; 12 | procedure SetData(const AData: Variant); virtual; abstract; 13 | end; 14 | 15 | implementation 16 | 17 | end. 18 | -------------------------------------------------------------------------------- /Table/uIRow.pas: -------------------------------------------------------------------------------- 1 | unit uIRow; 2 | 3 | interface 4 | 5 | uses 6 | uTypes, 7 | uICell; 8 | 9 | type 10 | { IRow = class// interface(IInterface) 11 | public 12 | function GetCell(const AColumnIndex: SG): ICell; virtual; abstract; 13 | procedure SetCell(const AColumnIndex: SG; const ACell: ICell); virtual; abstract; 14 | function GetColumnCount: SG; virtual; abstract; 15 | end;} 16 | IRow = interface(IInterface) 17 | function GetCell(const AColumnIndex: SG): ICell; 18 | procedure SetCell(const AColumnIndex: SG; const ACell: ICell); 19 | function GetColumnCount: SG; 20 | function GetHeight: SG; 21 | end; 22 | 23 | implementation 24 | 25 | end. 26 | -------------------------------------------------------------------------------- /Table/uItemType.pas: -------------------------------------------------------------------------------- 1 | unit uItemType; 2 | 3 | interface 4 | 5 | type 6 | TItemType = (itHorizontal, itVertical, itVerticalAndRight, itVerticalAndLeft, itVerticalAndHorizontal, itDownAndRight, 7 | itDownAndHorizontal, itDownAndLeft, itUpAndRight, itUpAndHorizontal, itUpAndLeft); 8 | 9 | implementation 10 | 11 | end. 12 | 13 | -------------------------------------------------------------------------------- /Table/uTableBorderInvisibleSet.pas: -------------------------------------------------------------------------------- 1 | unit uTableBorderInvisibleSet; 2 | 3 | interface 4 | 5 | uses 6 | uTableBorderSet, 7 | uItemType, 8 | uStrings; 9 | 10 | type 11 | TTableBorderInvisibleSet = class(TTableBorderSet) 12 | public 13 | class function Get(const Value: TItemType): string; override; 14 | end; 15 | 16 | implementation 17 | 18 | { TTableBorderInvisibleSet } 19 | 20 | class function TTableBorderInvisibleSet.Get(const Value: TItemType): string; 21 | begin 22 | Result := CharSpace; 23 | end; 24 | 25 | end. 26 | 27 | -------------------------------------------------------------------------------- /Table/uTableBorderSet.pas: -------------------------------------------------------------------------------- 1 | unit uTableBorderSet; 2 | 3 | interface 4 | 5 | uses 6 | uItemType; 7 | 8 | type 9 | TTableBorderSet = class 10 | public 11 | class function Get(const Value: TItemType): string; virtual; abstract; 12 | end; 13 | 14 | implementation 15 | 16 | { TTableBorderSet } 17 | 18 | end. 19 | 20 | -------------------------------------------------------------------------------- /Table/uTableBorderTextSet.pas: -------------------------------------------------------------------------------- 1 | unit uTableBorderTextSet; 2 | 3 | interface 4 | 5 | uses 6 | uTableBorderSet, uItemType, uStrings; 7 | 8 | type 9 | TTableBorderTextSet = class(TTableBorderSet) 10 | public 11 | class function Get(const Value: TItemType): string; override; 12 | end; 13 | 14 | implementation 15 | 16 | { TTableBorderTextSet } 17 | 18 | class function TTableBorderTextSet.Get(const Value: TItemType): string; 19 | begin 20 | case Value of 21 | itHorizontal: 22 | Result := '-'; 23 | itVertical: 24 | Result := '|'; 25 | else 26 | Result := '+'; 27 | end; 28 | end; 29 | 30 | end. 31 | 32 | -------------------------------------------------------------------------------- /Test/DUnitXTests/DUnitXTests.dpr: -------------------------------------------------------------------------------- 1 | program DUnitXTests; 2 | 3 | {$IFNDEF TESTINSIGHT} 4 | {$APPTYPE CONSOLE} 5 | {$ENDIF} 6 | 7 | {$STRONGLINKTYPES ON} 8 | 9 | uses 10 | uDUnitXApplication, 11 | Unit1 in 'Unit1.pas'; 12 | 13 | var 14 | TestsApplication: TDUnitXApplication; 15 | begin 16 | TestsApplication := TDUnitXApplication.Create; 17 | try 18 | TestsApplication.Run; 19 | finally 20 | TestsApplication.Free; 21 | end; 22 | end. 23 | -------------------------------------------------------------------------------- /Test/Data/CSV/Correct.csv: -------------------------------------------------------------------------------- 1 | #Length,Text 2 | 0, 3 | 0,"" 4 | 5,a dog 5 | 5,"a dog" 6 | 5,"a""b""c" 7 | 7,"a""b""c""d" 8 | 10,a""b""c""d 9 | 5,""abc"" 10 | -------------------------------------------------------------------------------- /Test/Data/CSV/Empty.csv: -------------------------------------------------------------------------------- 1 | #No data -------------------------------------------------------------------------------- /Test/Data/CSV/Incorrect1.csv: -------------------------------------------------------------------------------- 1 | # 2 | fdfd -------------------------------------------------------------------------------- /Test/Data/CSV/Incorrect2.csv: -------------------------------------------------------------------------------- 1 | ,,,,,,,,,,,, 2 | #vvv 3 | ,,,,,,,,,,,,,,,,,,,, 4 | dfdf fdf ,,, ffd,f d,f""" -------------------------------------------------------------------------------- /Test/Data/DBF/Cz-1250.dbf: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Test/Data/DBF/Cz-1250.dbf -------------------------------------------------------------------------------- /Test/Data/DBF/Cz-852.dbf: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Test/Data/DBF/Cz-852.dbf -------------------------------------------------------------------------------- /Test/Data/DBF/Cz.ods: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Test/Data/DBF/Cz.ods -------------------------------------------------------------------------------- /Test/Data/Example Raster Graphics/Abalone.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Test/Data/Example Raster Graphics/Abalone.png -------------------------------------------------------------------------------- /Test/Data/Example Scalable Vector Graphics/lime.svg: -------------------------------------------------------------------------------- 1 | 2 | 3 | -------------------------------------------------------------------------------- /Test/Data/Music/Music0.mid: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Test/Data/Music/Music0.mid -------------------------------------------------------------------------------- /Test/Data/Music/Music1.mid: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Test/Data/Music/Music1.mid -------------------------------------------------------------------------------- /Test/Data/Music/Music2.mid: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Test/Data/Music/Music2.mid -------------------------------------------------------------------------------- /Test/Data/Music/Music3.mid: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Test/Data/Music/Music3.mid -------------------------------------------------------------------------------- /Test/Data/Parser/BasicMath.csv: -------------------------------------------------------------------------------- 1 | #Expression,Result 2 | Inc(77.3),78.3 3 | Dec(77.3),76.3 4 | Inc(-77.3),−76.3 5 | Dec(-77.3),−78.3 6 | Frac(-13.77),0.77 7 | Frac(13.77),0.77 8 | Abs(13.77),13.77 9 | Abs(-13.77),13.77 10 | Neg(10),−10 11 | Neg(-7.5),7.5 12 | -------------------------------------------------------------------------------- /Test/Data/Parser/Comparison.csv: -------------------------------------------------------------------------------- 1 | #Expression,Result 2 | "Equal(1;1)",1 3 | "Equal(8;7)",0 4 | "Greater(8;7)",1 5 | "Greater(7;8)",0 6 | "Greater(7;7)",0 7 | "Less(8;7)",0 8 | "Less(7;8)",1 9 | "Less(7;7)",0 10 | "GreaterOrEqual(8;7)",1 11 | "GreaterOrEqual(7;7)",1 12 | "GreaterOrEqual(7;8)",0 13 | "LessOrEqual(7;8)",1 14 | "LessOrEqual(7;7)",1 15 | "LessOrEqual(8;7)",0 16 | "IfElse(1>2;7.5;8.5)",8.5 17 | "IfElse(1<2;7.5;8.5)",7.5 18 | -------------------------------------------------------------------------------- /Test/Data/Parser/Constants.csv: -------------------------------------------------------------------------------- 1 | #Expression,Result 2 | E,2.7182818284590452353602874713526624977572470936999595749669676277240766303535475945713821785251664274… 3 | Pi,3.14159265358979323846264338327950288419716939937510582097494459230781640628620899862803482534211706798… 4 | C,299792458 5 | -------------------------------------------------------------------------------- /Test/Data/Parser/ELO.csv: -------------------------------------------------------------------------------- 1 | #Expression,Result 2 | Elo(1/2),0 3 | Elo(3/4),193 4 | Elo(1/4),−193 5 | Elo(0),−765 6 | Elo(1),765 7 | ArcElo(0),0.5 8 | ArcElo(193),0.75 9 | ArcElo(-193),0.25 10 | ArcElo(-765),0 11 | ArcElo(765),1 12 | "EloPerfo(1670; 1700; 1/2; 1850; 0; 1620; 1)",1723 13 | "EloDif(15; 1670; 1700; 1/2; 1850; 0; 1620; 1)",3.15 14 | "EloC(1700; 1700; 1/2)",1700 15 | "EloC(1700; 1700; 3/4)",1893 16 | "EloC(1700; 1700; 1/4)",1507 17 | # "EloC(15; 1700; 1700; 1/2)",0 18 | "EloC(15; 1700; 1700; 1)",7.5 19 | "EloC(15; 1700; 1700; 0)",−7.5 20 | -------------------------------------------------------------------------------- /Test/Data/Parser/EmptyInput.csv: -------------------------------------------------------------------------------- 1 | #Expression,Result 2 | , 3 | -------------------------------------------------------------------------------- /Test/Data/Parser/Errors.csv: -------------------------------------------------------------------------------- 1 | #Expression,Result,Errors 2 | 1+,,1 3 | 1-,,1 4 | 1*,,1 5 | 1/,,1 6 | 1/0,,1 7 | -1/0,,1 8 | 0/0,,1 9 | 1 mod -10,,1 10 | 9 mod -10,,1 11 | 10 mod -10,,1 12 | -------------------------------------------------------------------------------- /Test/Data/Parser/Goniometric.csv: -------------------------------------------------------------------------------- 1 | #Expression,Result 2 | sin(0),0 3 | cos(0),1 4 | sin(pi/2),1 5 | # cos(pi/2),0 6 | # sin(pi),0 7 | cos(pi),−1 8 | tan(0),0 9 | # tan(pi),0 10 | arcSin(1),1.570796326794896… 11 | arcCos(0),1.570796326794896… 12 | Round(1e10*sin(pi)),0 13 | -------------------------------------------------------------------------------- /Test/Data/Parser/Hyperbolic.csv: -------------------------------------------------------------------------------- 1 | #Expression,Result 2 | sinh(0),0 3 | cosh(0),1 4 | sinh(pi),11.5487393572577… 5 | cosh(pi),11.5919532755215… 6 | tanh(0),0 7 | tanh(pi),0.9962720762207499… 8 | arSinh(1),0.8813735870195… 9 | arCosh(1),0 10 | artanh(0.56),0.63283318666563… 11 | -------------------------------------------------------------------------------- /Test/Data/Parser/Logic.csv: -------------------------------------------------------------------------------- 1 | #Expression,Result 2 | false,0 3 | true,1 4 | 1 shl 2,4 5 | 1 shl 64,18446744073709551616 6 | 1 shr 2,0.25 7 | 1024 shr 2,256 8 | 8 and 7,0 9 | 6 and 7,6 10 | 1 or 2,3 11 | 1 nor 3,−4 12 | 1 xor 3,2 13 | 1 xnor 3,−3 14 | Not(0),−1 15 | Not(1),−2 16 | Not(-1),0 17 | Not(-2),1 18 | (¬5^2),36 19 | ¬(5^2),−26 20 | -------------------------------------------------------------------------------- /Test/Data/Parser/Operators.csv: -------------------------------------------------------------------------------- 1 | #Expression,Result 2 | 3+2,5 3 | -7-(-7),0 4 | 100000*0.004,400 5 | 3+2*5,13 6 | 1/2;0.5 7 | 1/3,0.3333333333333333333333333333333333333333333333333333333333333333 8 | 1/7+1/7*6,1.0000000000000000000000000000000000000000000000000000000000000003 9 | 7 mod 6,1 10 | 77 mod 100,77 11 | 55 mod 55,0 12 | 55.7 mod 55,0.7 13 | 7 mod 6.3,0.7 14 | # 0.1 mod 0.01,0 15 | 0.015 mod 0.01,0.005 16 | -1 mod 10,−1 17 | -9 mod 10,−9 18 | -10 mod 10,0 19 | -21 mod 10,−1 20 | -17.7 mod 7,−3.7 21 | # 4.5 mod 1.5,0 22 | -------------------------------------------------------------------------------- /Test/Data/Parser/Physics.csv: -------------------------------------------------------------------------------- 1 | #Expression,Result 2 | EarthGravityOnSurface,9.80665 3 | EarthGravity(6378000/2),4.903325 4 | EarthGravity(6378000),9.80665 5 | EarthGravity(2*6378000),2.4516625 6 | -------------------------------------------------------------------------------- /Test/Data/StartupEnvironment/Reference.txt: -------------------------------------------------------------------------------- 1 | A: test B: test2 -------------------------------------------------------------------------------- /Test/Data/StartupEnvironment/Test.txt: -------------------------------------------------------------------------------- 1 | A: %testVariable% B: %testVariable2% -------------------------------------------------------------------------------- /Test/Data/Text1.txt: -------------------------------------------------------------------------------- 1 | +dog 2 | +cat 3 | +frog 4 | -bear 5 | -aaac -------------------------------------------------------------------------------- /Test/Data/Text2.txt: -------------------------------------------------------------------------------- 1 | +dog 2 | +pinguin 3 | -frog 4 | -bear 5 | +fish 6 | +aaad -------------------------------------------------------------------------------- /Test/Data/Text3.txt: -------------------------------------------------------------------------------- 1 | $D +cat 2 | $U +dog 3 | $A +pinguin 4 | $M -frog 5 | $U -bear 6 | $A +fish 7 | $M +aaad 8 | -------------------------------------------------------------------------------- /Test/Data/Wave/4ch.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Test/Data/Wave/4ch.wav -------------------------------------------------------------------------------- /Test/Data/Wave/6_Channel_ID.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Test/Data/Wave/6_Channel_ID.wav -------------------------------------------------------------------------------- /Test/Data/Wave/8_Channel_ID.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Test/Data/Wave/8_Channel_ID.wav -------------------------------------------------------------------------------- /Test/Data/Wave/M1F1-Alaw-AFsp.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Test/Data/Wave/M1F1-Alaw-AFsp.wav -------------------------------------------------------------------------------- /Test/Data/Wave/M1F1-AlawWE-AFsp.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Test/Data/Wave/M1F1-AlawWE-AFsp.wav -------------------------------------------------------------------------------- /Test/Data/Wave/M1F1-float32-AFsp.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Test/Data/Wave/M1F1-float32-AFsp.wav -------------------------------------------------------------------------------- /Test/Data/Wave/M1F1-float32WE-AFsp.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Test/Data/Wave/M1F1-float32WE-AFsp.wav -------------------------------------------------------------------------------- /Test/Data/Wave/M1F1-float64-AFsp.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Test/Data/Wave/M1F1-float64-AFsp.wav -------------------------------------------------------------------------------- /Test/Data/Wave/M1F1-float64WE-AFsp.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Test/Data/Wave/M1F1-float64WE-AFsp.wav -------------------------------------------------------------------------------- /Test/Data/Wave/M1F1-int12-AFsp.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Test/Data/Wave/M1F1-int12-AFsp.wav -------------------------------------------------------------------------------- /Test/Data/Wave/M1F1-int12WE-AFsp.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Test/Data/Wave/M1F1-int12WE-AFsp.wav -------------------------------------------------------------------------------- /Test/Data/Wave/M1F1-int16-AFsp.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Test/Data/Wave/M1F1-int16-AFsp.wav -------------------------------------------------------------------------------- /Test/Data/Wave/M1F1-int16WE-AFsp.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Test/Data/Wave/M1F1-int16WE-AFsp.wav -------------------------------------------------------------------------------- /Test/Data/Wave/M1F1-int24-AFsp.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Test/Data/Wave/M1F1-int24-AFsp.wav -------------------------------------------------------------------------------- /Test/Data/Wave/M1F1-int24WE-AFsp.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Test/Data/Wave/M1F1-int24WE-AFsp.wav -------------------------------------------------------------------------------- /Test/Data/Wave/M1F1-mulaw-AFsp.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Test/Data/Wave/M1F1-mulaw-AFsp.wav -------------------------------------------------------------------------------- /Test/Data/Wave/M1F1-mulawWE-AFsp.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Test/Data/Wave/M1F1-mulawWE-AFsp.wav -------------------------------------------------------------------------------- /Test/Data/Wave/M1F1-uint8-AFsp.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Test/Data/Wave/M1F1-uint8-AFsp.wav -------------------------------------------------------------------------------- /Test/Data/Wave/drmapan.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Test/Data/Wave/drmapan.wav -------------------------------------------------------------------------------- /Test/Data/Wave/stereofl.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Test/Data/Wave/stereofl.wav -------------------------------------------------------------------------------- /Test/Data/Wave/stereol.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Test/Data/Wave/stereol.wav -------------------------------------------------------------------------------- /Test/DllForTest/DllForTest_Icon.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Test/DllForTest/DllForTest_Icon.ico -------------------------------------------------------------------------------- /Test/Echo/Echo.dpr: -------------------------------------------------------------------------------- 1 | program Echo; 2 | 3 | {$APPTYPE CONSOLE} 4 | 5 | {$R *.res} 6 | 7 | uses 8 | System.SysUtils, 9 | 10 | uTypes, 11 | uMainLog; 12 | 13 | var 14 | Line, Command: string; 15 | begin 16 | try 17 | InitializeMainLog; 18 | while True do 19 | begin 20 | Readln(Line); 21 | if MainLog.IsLoggerFor(mlDebug) then 22 | MainLog.Add('Readed ' + IntToStr(Length(Line)) + ' chars: ' + Line, mlDebug); 23 | 24 | Command := UpperCase(Line); 25 | if (Command = 'QUIT') or (Command = 'EXIT') then 26 | Break; 27 | Writeln(Line); 28 | Flush(Output); 29 | end; 30 | except 31 | on E: Exception do 32 | Writeln(E.ClassName, ': ', E.Message); 33 | end; 34 | end. 35 | -------------------------------------------------------------------------------- /Test/Graphics/LibTest.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/Test/Graphics/LibTest.ico -------------------------------------------------------------------------------- /Test/Test_prjgroup.tvsconfig: -------------------------------------------------------------------------------- 1 | 2 | -------------------------------------------------------------------------------- /docs/SxLib.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/1419e777ec13a7106c030031c68cecc90ecb7e91/docs/SxLib.png --------------------------------------------------------------------------------