├── GUI ├── efBLoop.inc ├── efELoop.inc ├── uRenderer.pas ├── uRGBColor.pas ├── VCL │ ├── Components │ │ ├── uCustomDTimer.pas │ │ └── uDMemo.pas │ └── Frames │ │ └── rOkCancel.dfm ├── uIgnore.pas ├── uPropertiesDialog.pas ├── uDesktopWindowTest.pas └── uDBitmapTest.pas ├── Test ├── Data │ ├── CSV │ │ ├── Empty.csv │ │ ├── Incorrect1.csv │ │ ├── Incorrect2.csv │ │ └── Correct.csv │ ├── StartupEnvironment │ │ ├── Reference.txt │ │ └── Test.txt │ ├── Parser │ │ ├── EmptyInput.csv │ │ ├── Physics.csv │ │ ├── Errors.csv │ │ ├── BasicMath.csv │ │ ├── Goniometric.csv │ │ ├── Constants.csv │ │ ├── Hyperbolic.csv │ │ ├── Logic.csv │ │ ├── Comparison.csv │ │ ├── Operators.csv │ │ ├── ELO.csv │ │ └── AdvancedMath.csv │ ├── Text1.txt │ ├── Text2.txt │ ├── DBF │ │ ├── Cz.ods │ │ ├── Cz-1250.dbf │ │ └── Cz-852.dbf │ ├── Wave │ │ ├── 4ch.wav │ │ ├── drmapan.wav │ │ ├── stereofl.wav │ │ ├── stereol.wav │ │ ├── 6_Channel_ID.wav │ │ ├── 8_Channel_ID.wav │ │ ├── M1F1-Alaw-AFsp.wav │ │ ├── M1F1-AlawWE-AFsp.wav │ │ ├── M1F1-int12-AFsp.wav │ │ ├── M1F1-int16-AFsp.wav │ │ ├── M1F1-int24-AFsp.wav │ │ ├── M1F1-mulaw-AFsp.wav │ │ ├── M1F1-uint8-AFsp.wav │ │ ├── M1F1-float32-AFsp.wav │ │ ├── M1F1-float64-AFsp.wav │ │ ├── M1F1-int12WE-AFsp.wav │ │ ├── M1F1-int16WE-AFsp.wav │ │ ├── M1F1-int24WE-AFsp.wav │ │ ├── M1F1-mulawWE-AFsp.wav │ │ ├── M1F1-float32WE-AFsp.wav │ │ └── M1F1-float64WE-AFsp.wav │ ├── Music │ │ ├── Music0.mid │ │ ├── Music1.mid │ │ ├── Music2.mid │ │ └── Music3.mid │ ├── Text3.txt │ ├── Example Raster Graphics │ │ └── Abalone.png │ └── Example Scalable Vector Graphics │ │ └── lime.svg ├── Graphics │ └── LibTest.ico ├── Test_prjgroup.tvsconfig ├── DllForTest │ └── DllForTest_Icon.ico ├── DUnitXTests │ └── DUnitXTests.dpr └── Echo │ └── Echo.dpr ├── ExtLib ├── GraphicEx │ ├── Demos │ │ ├── .gitignore │ │ ├── Browser │ │ │ ├── Main.dfm │ │ │ └── Browser.dpr │ │ ├── Convert │ │ │ ├── Main.dfm │ │ │ └── Convert.dpr │ │ ├── OneImage │ │ │ └── OneImage.dpr │ │ └── SaveAs │ │ │ └── SaveAsDemo.dpr │ ├── GraphicEx.chm │ ├── GraphicEx.pas │ ├── 3rd party │ │ ├── DelphiZlib │ │ │ ├── win32 │ │ │ │ ├── adler32.obj │ │ │ │ ├── crc32.obj │ │ │ │ ├── deflate.obj │ │ │ │ ├── infback.obj │ │ │ │ ├── inffast.obj │ │ │ │ ├── inflate.obj │ │ │ │ ├── trees.obj │ │ │ │ ├── compress.obj │ │ │ │ └── inftrees.obj │ │ │ ├── win64 │ │ │ │ ├── adler32.obj │ │ │ │ ├── crc32.obj │ │ │ │ ├── deflate.obj │ │ │ │ ├── infback.obj │ │ │ │ ├── inffast.obj │ │ │ │ ├── inflate.obj │ │ │ │ ├── trees.obj │ │ │ │ ├── compress.obj │ │ │ │ └── inftrees.obj │ │ │ └── zlib │ │ │ │ └── inffast.h │ │ └── AutoResourceStr │ │ │ └── variantWrapper.pas │ └── AllGraphicStrings.pas ├── FastMM │ ├── FullDebugMode DLL │ │ ├── FastMM_FullDebugMode.info.plist │ │ ├── FastMM_FullDebugMode.res │ │ ├── FastMM_FullDebugMode_Icon.ico │ │ ├── Precompiled │ │ │ ├── FastMM_FullDebugMode.dll │ │ │ ├── FastMM_FullDebugMode64.dll │ │ │ └── libFastMM_FullDebugMode.dylib │ │ ├── CPP Builder Support │ │ │ ├── Readme.txt │ │ │ └── FastMM_FullDebugMode.lib │ │ └── FastMM_FullDebugMode.entitlements │ ├── Replacement BorlndMM DLL │ │ ├── CB2006 │ │ │ ├── Readme.txt │ │ │ ├── Precompiled │ │ │ │ └── BorlndMM.dll │ │ │ └── BorlndMM.bpf │ │ ├── CB2007 │ │ │ ├── Readme.txt │ │ │ └── Precompiled │ │ │ │ └── BorlndMM.dll │ │ ├── BCB6 │ │ │ ├── BorlndMM.res │ │ │ ├── BorlndMM.bpf │ │ │ └── Precompiled │ │ │ │ └── BorlndMM.dll │ │ ├── Delphi │ │ │ ├── BorlndMM.res │ │ │ └── Precompiled │ │ │ │ ├── for Delphi IDE │ │ │ │ ├── Debug │ │ │ │ │ └── BorlndMM.dll │ │ │ │ └── Performance │ │ │ │ │ └── BorlndMM.dll │ │ │ │ └── for Applications │ │ │ │ ├── Debug │ │ │ │ └── BorlndMM.dll │ │ │ │ └── Performance │ │ │ │ └── BorlndMM.dll │ │ └── BCB5 │ │ │ ├── Precompiled │ │ │ └── BorlndMM.dll │ │ │ └── BorlndMM.bpf │ ├── FastMM4.pas │ ├── Translations │ │ ├── Czech │ │ │ └── FastMM4Messages.pas │ │ ├── French │ │ │ └── FastMM4Messages.pas │ │ ├── Italian │ │ │ └── FastMM4Messages.pas │ │ ├── Polish │ │ │ └── FastMM4Messages.pas │ │ ├── Russian │ │ │ └── FastMM4Messages.pas │ │ ├── Spanish │ │ │ └── FastMM4Messages.pas │ │ ├── Afrikaans │ │ │ └── FastMM4Messages.pas │ │ ├── Portuguese │ │ │ └── FastMM4Messages.pas │ │ ├── Ukrainian │ │ │ └── FastMM4Messages.pas │ │ ├── Belarussian │ │ │ └── FastMM4Messages.pas │ │ ├── Chinese (Simplified) │ │ │ ├── FastMM4Messages.pas │ │ │ └── FastMM4Options.inc │ │ ├── Portuguese (Brazil) │ │ │ └── FastMM4Messages.pas │ │ └── German │ │ │ ├── by Thomas Speck │ │ │ └── FastMM4Messages.pas │ │ │ └── by Uwe Queisser │ │ │ └── FastMM4Messages.pas │ └── Demos │ │ ├── Dynamically Loaded DLL │ │ ├── TestDLL.res │ │ ├── TestApplication.res │ │ ├── TestApplication.dpr │ │ └── TestDLL.dpr │ │ ├── Usage Tracker │ │ ├── UsageTrackerDemo.res │ │ ├── UsageTrackerDemo.dpr │ │ ├── DemoForm.pas │ │ └── DemoForm.dfm │ │ └── Replacement borlndmm DLL │ │ ├── BorlndMM.dll │ │ ├── FullDebugModeDemo.res │ │ ├── FastMM_FullDebugMode.dll │ │ └── FullDebugModeDemo.dpr ├── DUnit │ ├── Contrib │ │ ├── XPGen │ │ │ ├── TEST_SyncToken.txt │ │ │ ├── TEST_Parse_Unit_Heading.txt │ │ │ ├── testNextToken.txt │ │ │ ├── xpLex.pas │ │ │ ├── xpgen.dpr │ │ │ ├── xpmain.dfm │ │ │ ├── xpmain.pas │ │ │ ├── parsedef.pas │ │ │ ├── testXpgen.dpr │ │ │ ├── testunit.pas │ │ │ ├── xpCodeGen.pas │ │ │ ├── xpParse.pas │ │ │ ├── listsupport.pas │ │ │ ├── suite_xpgen.pas │ │ │ ├── test_xpLex.pas │ │ │ ├── testXpgenLib.dpr │ │ │ ├── test_xpParse.pas │ │ │ ├── TEST_Parse_uses_clause.txt │ │ │ ├── test_ParseEventDef.txt │ │ │ ├── TEST_Parse_var_paragraph.txt │ │ │ ├── Makefile │ │ │ ├── test_Get_Token.txt │ │ │ └── testunit.dfm │ │ ├── DUnitWizard │ │ │ ├── Source │ │ │ │ └── DelphiExperts │ │ │ │ │ ├── DUnitProject │ │ │ │ │ ├── UsesTestedUnit.txt │ │ │ │ │ ├── TestMethodDecl.txt │ │ │ │ │ ├── XPDUnitTestClassWizard.rc │ │ │ │ │ ├── TestSuiteReg.txt │ │ │ │ │ ├── XPDUnitTestModuleWizard.rc │ │ │ │ │ ├── dunit_project.bmp │ │ │ │ │ ├── dunit_project16.ico │ │ │ │ │ ├── dunit_project256.ico │ │ │ │ │ ├── dunit_testclass.bmp │ │ │ │ │ ├── dunit_testmodule.bmp │ │ │ │ │ ├── dunit_testmodule16.ico │ │ │ │ │ ├── dunit_testmodule256.ico │ │ │ │ │ ├── XPDUnitProjectWizard.rc │ │ │ │ │ ├── TestModule.txt │ │ │ │ │ ├── XPTextTemplates.rc │ │ │ │ │ ├── TestClassDecl.txt │ │ │ │ │ ├── dunit │ │ │ │ │ │ └── WizardFormsDemo.dpr │ │ │ │ │ └── ProjectSource.txt │ │ │ │ │ └── Common │ │ │ │ │ ├── XPPascalScanner.pas │ │ │ │ │ └── XP_OTAEditorUtils.pas │ │ │ └── Docs │ │ │ │ ├── menu.jpg │ │ │ │ ├── menu.png │ │ │ │ ├── applet.png │ │ │ │ ├── newClass.png │ │ │ │ ├── behaviour.png │ │ │ │ ├── newProject.png │ │ │ │ ├── parameters.png │ │ │ │ ├── dunit_wizard.png │ │ │ │ ├── newTestModule.png │ │ │ │ ├── default.css │ │ │ │ ├── title.htm │ │ │ │ └── index.htm │ │ └── XMLReporting │ │ │ └── XMLTestRunner.pas │ ├── release.ini │ ├── want.xml │ ├── doc │ │ ├── DUNIT.HLP │ │ ├── index.html │ │ ├── images │ │ │ ├── tw.jpg │ │ │ ├── usa.gif │ │ │ ├── china.gif │ │ │ ├── xtao128.png │ │ │ ├── xtao16.png │ │ │ ├── xtao256.png │ │ │ ├── xtao32.png │ │ │ ├── xtao64.png │ │ │ ├── xtao16-16.png │ │ │ ├── dunit_name.png │ │ │ ├── screenshot.png │ │ │ ├── xtao128_new.png │ │ │ ├── xtao16-256.png │ │ │ ├── xtao32-256.png │ │ │ ├── wincvs_setup_1.jpg │ │ │ ├── wincvs_setup_2.jpg │ │ │ ├── project_options.jpg │ │ │ ├── environment_options.jpg │ │ │ ├── screenshot_running.png │ │ │ └── jira_button_120wx60h.gif │ │ ├── tutorial.doc │ │ ├── README_CHT.html │ │ └── tutorial_files │ │ │ ├── image002.gif │ │ │ ├── image003.png │ │ │ ├── image004.jpg │ │ │ ├── image006.gif │ │ │ ├── image007.png │ │ │ └── image008.jpg │ ├── src │ │ ├── dunit.dpr │ │ ├── DUnitW32.dpr │ │ ├── DunitAbout.pas │ │ ├── GUITesting.pas │ │ ├── TestModules.pas │ │ ├── dunit_Icon.ico │ │ ├── images │ │ │ ├── logo.bmp │ │ │ ├── dunit.ico │ │ │ ├── dunit16.ico │ │ │ ├── dunit_new.ico │ │ │ ├── dunit16_new.ico │ │ │ ├── list_images.bmp │ │ │ ├── run_images.bmp │ │ │ ├── state_images.bmp │ │ │ └── actions_images.bmp │ │ ├── DUnitMainForm.pas │ │ ├── GUITestRunner.pas │ │ ├── QGUITestRunner.pas │ │ ├── TestExtensions.pas │ │ ├── TestFramework.pas │ │ ├── TextTestRunner.pas │ │ ├── FastMMMemLeakMonitor.pas │ │ ├── Makefile │ │ ├── versioninfo.inc │ │ ├── dunit.ini │ │ └── versioninfo.rc │ ├── tests │ │ ├── UnitTests.dpr │ │ ├── DUnitTestLib.dpr │ │ ├── UnitTestsW32.dpr │ │ ├── UnitTests4Net.dpr │ │ ├── DUnitTestLibW32.dpr │ │ ├── FastMMMonitorTest.pas │ │ ├── UnitTestFramework.pas │ │ ├── UnitTestExtensions.pas │ │ ├── UnitTestGUITesting.pas │ │ ├── UnitTestGUITestRunner.pas │ │ └── Makefile │ ├── helpsrc │ │ ├── TestFramework.HPJ │ │ └── Makefile │ ├── examples │ │ ├── cmdline │ │ │ ├── runtest.cmd │ │ │ ├── Project1.dpr │ │ │ ├── Makefile │ │ │ ├── Unit1.pas │ │ │ └── Unit2.pas │ │ ├── registration │ │ │ ├── UnitReg.dpr │ │ │ ├── TestUnit1.pas │ │ │ ├── TestUnit2.pas │ │ │ ├── TestUnit3.pas │ │ │ └── Makefile │ │ ├── MemLeakDetect │ │ │ ├── LeakTestDemo.dpr │ │ │ ├── UnitTestLeak.pas │ │ │ └── UnitTestSetup.pas │ │ ├── testexception │ │ │ ├── Project1Test.dpr │ │ │ ├── Project1.dpr │ │ │ └── Unit2.pas │ │ ├── HaltRepeating │ │ │ ├── DemoHaltOnError.dpr │ │ │ └── DemoHaltRepeatingOnError.pas │ │ ├── structure │ │ │ ├── diffunit │ │ │ │ ├── Project1Test.dpr │ │ │ │ ├── UnitStructure.png │ │ │ │ ├── Project1.dpr │ │ │ │ ├── Unit1.pas │ │ │ │ └── Unit2.pas │ │ │ ├── sameunit │ │ │ │ ├── Project1Test.dpr │ │ │ │ └── Project1.dpr │ │ │ ├── Makefile │ │ │ └── readme.html │ │ ├── embeddable │ │ │ └── EmbeddableGUITestRunner.dfm │ │ ├── ChecklessTests │ │ │ ├── FailChecklessTestsDemo.dpr │ │ │ └── TestFailChecklessTests.pas │ │ ├── TListTest │ │ │ └── Makefile │ │ └── registry │ │ │ ├── Makefile │ │ │ ├── Step2 │ │ │ └── RegistryTest.dpr │ │ │ ├── Step1 │ │ │ └── RegistryTest.dpr │ │ │ └── Step3 │ │ │ └── RegistryTest.dpr │ ├── readme.html │ └── etc │ │ └── versioninfo.template.inc ├── Exif.pas ├── ExtLib.dof ├── FFTs │ └── Complexs.pas ├── SynTaskDialog.res ├── Delphi7 │ ├── Graphics.pas │ ├── PngImage │ │ ├── pnglang.pas │ │ ├── PngImage.pas │ │ ├── obj │ │ │ ├── trees.obj │ │ │ ├── adler32.obj │ │ │ ├── deflate.obj │ │ │ ├── infblock.obj │ │ │ ├── infcodes.obj │ │ │ ├── inffast.obj │ │ │ ├── inflate.obj │ │ │ ├── inftrees.obj │ │ │ └── infutil.obj │ │ └── pngimage.chm │ └── UITypes.pas ├── SynTaskDialog.rc ├── DCPCrypt │ ├── DCPciphers.dcr │ ├── DCPdelphi4.dof │ ├── DCPdelphi5.dof │ ├── DCPdelphi6.dof │ ├── DCPhashes.dcr │ ├── DCPdelphi6_Icon.ico │ ├── DCPdelphi6_Icon1.ico │ ├── DCPdelphi6_Icon2.ico │ ├── Docs │ │ └── osi-certified-120x100.png │ └── DCPkylix.conf ├── SQLite3 │ ├── SQLite3BtnOk.bmp │ └── SQLite3BtnArrow.bmp ├── NLDJoystick │ ├── NLDJoystick.dcr │ └── NLDJoystick70.dpk ├── CoolTrayIcon │ ├── CoolTrayIcon.chm │ ├── CoolTrayIcon.dcr │ ├── TextTrayIcon.dcr │ ├── docs │ │ └── History - CoolTrayIcon.txt │ ├── readme.txt │ └── convert_st_projects.txt ├── IGDIPlus │ └── Demo │ │ ├── Delphi2009 │ │ ├── IGDIPlusDemo.dpr │ │ └── Unit1.dfm │ │ ├── Delphi2010 │ │ ├── IGDIPlusDemo.dpr │ │ └── Unit1.dfm │ │ ├── DelphiXE │ │ ├── IGDIPlusDemo.dpr │ │ └── Unit1.dfm │ │ ├── DelphiXE2 │ │ ├── IGDIPlusDemo.dpr │ │ └── Unit1.dfm │ │ ├── DelphiXE3 │ │ ├── IGDIPlusDemo.dpr │ │ └── Unit1.dfm │ │ └── DelphiXE4 │ │ ├── IGDIPlusDemo.dpr │ │ └── Unit1.dfm ├── OmniXML │ └── README.md └── SafeMM │ └── SafeMMInstall.pas ├── Core ├── uChar.pas ├── uStrings.pas ├── uToHTML.pas ├── uVector.pas ├── uMathTest.pas ├── uCharsetTest.pas ├── uProcessMemory.pas ├── uCommonOutput.pas ├── uETimeOutException.pas ├── uIntegerList.pas ├── uCustomWriter.pas ├── uPowerRequest.pas ├── uMessageLevel.pas ├── uNamedObject.pas ├── uEReadFileException.pas ├── uNumberFormater.pas ├── uEExternalApplication.pas ├── uUsageInfoTest.pas ├── uDistanceFormater.pas ├── uObjectFactoryTest.pas ├── uEIOException.pas ├── uUndo.pas ├── uBackupTest.pas └── uEscapeTest.pas ├── docs └── SxLib.png ├── Configure IDE ├── bpl.txt ├── SxConfDelphi.exe ├── -autoconf.cmd └── autoconf.cmd ├── Files ├── uFileTest.pas ├── uTextFileTest.pas ├── Database │ └── uDBFTest.pas └── Config │ ├── uMainCfg.pas │ ├── uLocalMainCfg.pas │ ├── uGUIMainCfg.pas │ └── uDIniFile.pas ├── Packages ├── uDForm.dcr ├── uDGauge.dcr ├── uDImage.dcr ├── uDLabel.dcr ├── uDPanel.dcr ├── uDTimer.dcr ├── uDView.dcr ├── uDButton.dcr ├── uSxRibbon.dcr ├── Graphics │ └── Lib.ico ├── uOpenedFiles.dcr ├── uSxPathEdit.dcr └── uSxToolBar.dcr ├── Formatter ├── uTimePrefix.pas ├── uBinaryPrefix.pas ├── uMetricPrefix.pas ├── uPercentFormatter.pas ├── uPercentFormatterTest.pas ├── uFormatter.pas ├── uFrequencyFormatter.pas ├── uTwoDigitFormatter.pas ├── uTimeFormatter.pas └── uByteFormatter.pas ├── Renderer ├── uCircle.pas ├── uEllipse.pas ├── uPolygon.pas ├── uPolyline.pas ├── uBarRenderer.pas ├── uGradientBar.pas ├── uClip.pas ├── uGraphicObjects.pas ├── uFill.pas └── uStroke.pas ├── Parser ├── uBigDecimalParser.pas ├── uMathExpressionParser.pas ├── uMathExpressionParserTest.pas └── uCustomParser.pas ├── Regional ├── uRegionalCodePage.pas └── uRegionalCodePageTest.pas ├── Benchmark └── uHardwareBenchmark.pas ├── Executable ├── uDUnitApplication.pas ├── uDUnitXApplication.pas ├── ReadMe.txt ├── uCustomSplashScreen.pas ├── uLargeAddressAware.pas └── uFirst.pas ├── Sound ├── SoundItems │ ├── uBlueNoise.pas │ ├── uBrownNoise.pas │ ├── uGreyNoise.pas │ ├── uPinkNoise.pas │ ├── uVioletNoise.pas │ ├── uISoundItem.pas │ └── uSoundItem2D.pas ├── Players │ ├── uWaveRecorder.pas │ └── uWavePlayer.pas └── Channels │ ├── uMonoChannels.pas │ ├── uSpeakerId.pas │ └── uStereoChannels.pas ├── Game └── Turn-based │ ├── Common │ ├── uMoveList.pas │ ├── uMove.pas │ ├── uForsythEdwardsNotation.pas │ ├── uSquare.pas │ └── uCustomForsythEdwardsNotationWriter.pas │ ├── Engine │ ├── Protocols │ │ ├── Commands │ │ │ ├── uBenchmarkCommand.pas │ │ │ ├── XBoard │ │ │ │ ├── uQuestionMarkCommand.pas │ │ │ │ ├── uBkCommand.pas │ │ │ │ ├── uCoresCommand.pas │ │ │ │ ├── uComputerCommand.pas │ │ │ │ ├── uResumeCommand.pas │ │ │ │ ├── uUndoCommand.pas │ │ │ │ ├── uEditCommand.pas │ │ │ │ ├── uMemoryCommand.pas │ │ │ │ ├── uEGTPathCommand.pas │ │ │ │ ├── uHardCommand.pas │ │ │ │ ├── uEasyCommand.pas │ │ │ │ ├── uRemoveCommand.pas │ │ │ │ ├── uExcludeAllCommand.pas │ │ │ │ ├── uPostCommand.pas │ │ │ │ ├── uXBoardProtocolCommand.pas │ │ │ │ ├── uIncludeAllCommand.pas │ │ │ │ └── uNoPostCommand.pas │ │ │ ├── uStopCommand.pas │ │ │ ├── uEvalCommand.pas │ │ │ ├── uEngineStateCommand.pas │ │ │ ├── uShowBoardCommand.pas │ │ │ ├── uNewGameCommand.pas │ │ │ ├── UCI │ │ │ │ └── uPonderHitCommand.pas │ │ │ ├── uEngineCommand.pas │ │ │ ├── uSimpleEngineCommand.pas │ │ │ └── uProtocolCommand.pas │ │ └── uTextType.pas │ ├── Common │ │ ├── uSubtreeStatus.pas │ │ ├── uVariationCut.pas │ │ └── uAnalysis.pas │ ├── External │ │ └── uStartWriter.pas │ └── Internal │ │ └── uStopCause.pas │ └── Levels │ └── uInfiniteLevel.pas ├── RandomGenerator ├── uShuffleGenerator.pas ├── uGNUCRandomGenerator.pas ├── uSxRandomGenerator.pas ├── uBorlandCRandomGenerator.pas └── uNumericalRecepiesRandomGenerator.pas ├── Logger └── uMainLog.pas ├── Table ├── uICell.pas ├── uItemType.pas ├── uTableBorderSet.pas ├── uTableBorderInvisibleSet.pas ├── uTableBorderTextSet.pas └── uIRow.pas ├── Math ├── uNumericalSet.pas ├── uOddNumbersSet.pas ├── uEvenNumbersSet.pas ├── uPositiveNumberSet.pas ├── uNegativeNumberSet.pas ├── uNonNegativeNumberSet.pas └── uNonPositiveNumberSet.pas ├── Arguments └── uByteArgument.pas ├── Round ├── uRound.pas ├── uAlternatingTieBreakRound.pas ├── uStochasticRound.pas ├── uRandomRound.pas └── uRandomTieBreakRound.pas ├── Console └── uCodePage.pas ├── Commands ├── uUnsupportedCommand.pas ├── uRestartCommand.pas └── uExitCommand.pas ├── ApplicationModule ├── uCorrectApplicationModule.pas └── uBrokenApplicationModule.pas ├── .github └── ISSUE_TEMPLATE │ ├── feature_request.md │ └── bug_report.md └── Hardware └── uCPU.pas /GUI/efBLoop.inc: -------------------------------------------------------------------------------- 1 | @Loop: 2 | -------------------------------------------------------------------------------- /Test/Data/CSV/Empty.csv: -------------------------------------------------------------------------------- 1 | #No data -------------------------------------------------------------------------------- /ExtLib/GraphicEx/Demos/.gitignore: -------------------------------------------------------------------------------- 1 | *.ini -------------------------------------------------------------------------------- /Test/Data/CSV/Incorrect1.csv: -------------------------------------------------------------------------------- 1 | # 2 | fdfd -------------------------------------------------------------------------------- /Test/Data/StartupEnvironment/Reference.txt: -------------------------------------------------------------------------------- 1 | A: test B: test2 -------------------------------------------------------------------------------- /ExtLib/FastMM/FullDebugMode DLL/FastMM_FullDebugMode.info.plist: -------------------------------------------------------------------------------- 1 | -------------------------------------------------------------------------------- /Test/Data/Parser/EmptyInput.csv: -------------------------------------------------------------------------------- 1 | #Expression,Result 2 | , 3 | -------------------------------------------------------------------------------- /Test/Data/Text1.txt: -------------------------------------------------------------------------------- 1 | +dog 2 | +cat 3 | +frog 4 | -bear 5 | -aaac -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/TEST_SyncToken.txt: -------------------------------------------------------------------------------- 1 | unit TEST_xpParse; 2 | -------------------------------------------------------------------------------- /Test/Data/StartupEnvironment/Test.txt: -------------------------------------------------------------------------------- 1 | A: %testVariable% B: %testVariable2% -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/TEST_Parse_Unit_Heading.txt: -------------------------------------------------------------------------------- 1 | unit TEST_xpParse; 2 | -------------------------------------------------------------------------------- /Core/uChar.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Core/uChar.pas -------------------------------------------------------------------------------- /ExtLib/Exif.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/Exif.pas -------------------------------------------------------------------------------- /Test/Data/Text2.txt: -------------------------------------------------------------------------------- 1 | +dog 2 | +pinguin 3 | -frog 4 | -bear 5 | +fish 6 | +aaad -------------------------------------------------------------------------------- /docs/SxLib.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/docs/SxLib.png -------------------------------------------------------------------------------- /Core/uStrings.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Core/uStrings.pas -------------------------------------------------------------------------------- /Core/uToHTML.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Core/uToHTML.pas -------------------------------------------------------------------------------- /Core/uVector.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Core/uVector.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/release.ini: -------------------------------------------------------------------------------- 1 | [releases] 2 | current=9.4.0 3 | last_date=2008-08-21 4 | -------------------------------------------------------------------------------- /Configure IDE/bpl.txt: -------------------------------------------------------------------------------- 1 | -$(sx-library) 2 | $(sx-library)\Packages\LibD%DelphiShortName%.bpl -------------------------------------------------------------------------------- /Core/uMathTest.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Core/uMathTest.pas -------------------------------------------------------------------------------- /Files/uFileTest.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Files/uFileTest.pas -------------------------------------------------------------------------------- /Packages/uDForm.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Packages/uDForm.dcr -------------------------------------------------------------------------------- /Packages/uDGauge.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Packages/uDGauge.dcr -------------------------------------------------------------------------------- /Packages/uDImage.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Packages/uDImage.dcr -------------------------------------------------------------------------------- /Packages/uDLabel.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Packages/uDLabel.dcr -------------------------------------------------------------------------------- /Packages/uDPanel.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Packages/uDPanel.dcr -------------------------------------------------------------------------------- /Packages/uDTimer.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Packages/uDTimer.dcr -------------------------------------------------------------------------------- /Packages/uDView.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Packages/uDView.dcr -------------------------------------------------------------------------------- /Test/Data/DBF/Cz.ods: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Test/Data/DBF/Cz.ods -------------------------------------------------------------------------------- /Core/uCharsetTest.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Core/uCharsetTest.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/want.xml: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/want.xml -------------------------------------------------------------------------------- /ExtLib/ExtLib.dof: -------------------------------------------------------------------------------- 1 | [Version Info Keys] 2 | FileDescription=External units and components for Delphi -------------------------------------------------------------------------------- /ExtLib/FastMM/Replacement BorlndMM DLL/CB2006/Readme.txt: -------------------------------------------------------------------------------- 1 | LoadDebugDLLDynamically must be defined. -------------------------------------------------------------------------------- /ExtLib/FastMM/Replacement BorlndMM DLL/CB2007/Readme.txt: -------------------------------------------------------------------------------- 1 | LoadDebugDLLDynamically must be defined. -------------------------------------------------------------------------------- /GUI/efELoop.inc: -------------------------------------------------------------------------------- 1 | add esi, BPP 2 | add edi, BPP 3 | cmp edi, ecx 4 | jb @Loop 5 | 6 | -------------------------------------------------------------------------------- /Packages/uDButton.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Packages/uDButton.dcr -------------------------------------------------------------------------------- /Packages/uSxRibbon.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Packages/uSxRibbon.dcr -------------------------------------------------------------------------------- /Test/Data/Wave/4ch.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Test/Data/Wave/4ch.wav -------------------------------------------------------------------------------- /Core/uProcessMemory.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Core/uProcessMemory.pas -------------------------------------------------------------------------------- /ExtLib/FFTs/Complexs.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FFTs/Complexs.pas -------------------------------------------------------------------------------- /ExtLib/FastMM/FastMM4.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/FastMM4.pas -------------------------------------------------------------------------------- /ExtLib/SynTaskDialog.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/SynTaskDialog.res -------------------------------------------------------------------------------- /Files/uTextFileTest.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Files/uTextFileTest.pas -------------------------------------------------------------------------------- /Formatter/uTimePrefix.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Formatter/uTimePrefix.pas -------------------------------------------------------------------------------- /Packages/Graphics/Lib.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Packages/Graphics/Lib.ico -------------------------------------------------------------------------------- /Packages/uOpenedFiles.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Packages/uOpenedFiles.dcr -------------------------------------------------------------------------------- /Packages/uSxPathEdit.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Packages/uSxPathEdit.dcr -------------------------------------------------------------------------------- /Packages/uSxToolBar.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Packages/uSxToolBar.dcr -------------------------------------------------------------------------------- /Renderer/uCircle.pas: -------------------------------------------------------------------------------- 1 | unit uCircle; 2 | 3 | interface 4 | 5 | implementation 6 | 7 | end. 8 | -------------------------------------------------------------------------------- /Test/Data/DBF/Cz-1250.dbf: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Test/Data/DBF/Cz-1250.dbf -------------------------------------------------------------------------------- /Test/Data/DBF/Cz-852.dbf: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Test/Data/DBF/Cz-852.dbf -------------------------------------------------------------------------------- /Test/Graphics/LibTest.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Test/Graphics/LibTest.ico -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/DUNIT.HLP: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/doc/DUNIT.HLP -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/index.html: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/doc/index.html -------------------------------------------------------------------------------- /ExtLib/DUnit/src/dunit.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/src/dunit.dpr -------------------------------------------------------------------------------- /ExtLib/Delphi7/Graphics.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/Delphi7/Graphics.pas -------------------------------------------------------------------------------- /ExtLib/SynTaskDialog.rc: -------------------------------------------------------------------------------- 1 | btnok 2 SQlite3\SQLite3btnok.bmp 2 | btnarrow 2 SQlite3\SQLite3btnarrow.bmp 3 | -------------------------------------------------------------------------------- /Files/Database/uDBFTest.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Files/Database/uDBFTest.pas -------------------------------------------------------------------------------- /Formatter/uBinaryPrefix.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Formatter/uBinaryPrefix.pas -------------------------------------------------------------------------------- /Formatter/uMetricPrefix.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Formatter/uMetricPrefix.pas -------------------------------------------------------------------------------- /Renderer/uEllipse.pas: -------------------------------------------------------------------------------- 1 | unit uEllipse; 2 | 3 | interface 4 | 5 | implementation 6 | 7 | end. 8 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /Test/Data/CSV/Incorrect2.csv: -------------------------------------------------------------------------------- 1 | ,,,,,,,,,,,, 2 | #vvv 3 | ,,,,,,,,,,,,,,,,,,,, 4 | dfdf fdf ,,, ffd,f d,f""" -------------------------------------------------------------------------------- /Test/Data/Music/Music0.mid: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Test/Data/Music/Music0.mid -------------------------------------------------------------------------------- /Test/Data/Music/Music1.mid: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Test/Data/Music/Music1.mid -------------------------------------------------------------------------------- /Test/Data/Music/Music2.mid: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Test/Data/Music/Music2.mid -------------------------------------------------------------------------------- /Test/Data/Music/Music3.mid: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Test/Data/Music/Music3.mid -------------------------------------------------------------------------------- /Test/Data/Wave/drmapan.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Test/Data/Wave/drmapan.wav -------------------------------------------------------------------------------- /Test/Data/Wave/stereofl.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Test/Data/Wave/stereofl.wav -------------------------------------------------------------------------------- /Test/Data/Wave/stereol.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Test/Data/Wave/stereol.wav -------------------------------------------------------------------------------- /Test/Test_prjgroup.tvsconfig: -------------------------------------------------------------------------------- 1 | 2 | -------------------------------------------------------------------------------- /Configure IDE/SxConfDelphi.exe: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Configure IDE/SxConfDelphi.exe -------------------------------------------------------------------------------- /ExtLib/DCPCrypt/DCPciphers.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DCPCrypt/DCPciphers.dcr -------------------------------------------------------------------------------- /ExtLib/DCPCrypt/DCPdelphi4.dof: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DCPCrypt/DCPdelphi4.dof -------------------------------------------------------------------------------- /ExtLib/DCPCrypt/DCPdelphi5.dof: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DCPCrypt/DCPdelphi5.dof -------------------------------------------------------------------------------- /ExtLib/DCPCrypt/DCPdelphi6.dof: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DCPCrypt/DCPdelphi6.dof -------------------------------------------------------------------------------- /ExtLib/DCPCrypt/DCPhashes.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DCPCrypt/DCPhashes.dcr -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/UsesTestedUnit.txt: -------------------------------------------------------------------------------- 1 | #TESTEDUNITNAME, 2 | -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/testNextToken.txt: -------------------------------------------------------------------------------- 1 | begin end 2 | if(a = b) then do 3 | 'this is a full string'; 4 | -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/tw.jpg: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/doc/images/tw.jpg -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/tutorial.doc: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/doc/tutorial.doc -------------------------------------------------------------------------------- /ExtLib/DUnit/src/DUnitW32.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/src/DUnitW32.dpr -------------------------------------------------------------------------------- /ExtLib/GraphicEx/GraphicEx.chm: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/GraphicEx/GraphicEx.chm -------------------------------------------------------------------------------- /ExtLib/GraphicEx/GraphicEx.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/GraphicEx/GraphicEx.pas -------------------------------------------------------------------------------- /Parser/uBigDecimalParser.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Parser/uBigDecimalParser.pas -------------------------------------------------------------------------------- /Regional/uRegionalCodePage.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Regional/uRegionalCodePage.pas -------------------------------------------------------------------------------- /Benchmark/uHardwareBenchmark.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Benchmark/uHardwareBenchmark.pas -------------------------------------------------------------------------------- /Executable/uDUnitApplication.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Executable/uDUnitApplication.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/TestMethodDecl.txt: -------------------------------------------------------------------------------- 1 | procedure #METHODNAME; 2 | -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/README_CHT.html: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/doc/README_CHT.html -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/usa.gif: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/doc/images/usa.gif -------------------------------------------------------------------------------- /ExtLib/DUnit/src/DunitAbout.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/src/DunitAbout.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/src/GUITesting.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/src/GUITesting.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/src/TestModules.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/src/TestModules.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/src/dunit_Icon.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/src/dunit_Icon.ico -------------------------------------------------------------------------------- /ExtLib/DUnit/src/images/logo.bmp: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/src/images/logo.bmp -------------------------------------------------------------------------------- /ExtLib/DUnit/tests/UnitTests.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/tests/UnitTests.dpr -------------------------------------------------------------------------------- /ExtLib/SQLite3/SQLite3BtnOk.bmp: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/SQLite3/SQLite3BtnOk.bmp -------------------------------------------------------------------------------- /Formatter/uPercentFormatter.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Formatter/uPercentFormatter.pas -------------------------------------------------------------------------------- /Parser/uMathExpressionParser.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Parser/uMathExpressionParser.pas -------------------------------------------------------------------------------- /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/uPinkNoise.pas: -------------------------------------------------------------------------------- 1 | unit uPinkNoise; 2 | 3 | interface 4 | 5 | implementation 6 | 7 | end. 8 | -------------------------------------------------------------------------------- /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/6_Channel_ID.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Test/Data/Wave/6_Channel_ID.wav -------------------------------------------------------------------------------- /Test/Data/Wave/8_Channel_ID.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Test/Data/Wave/8_Channel_ID.wav -------------------------------------------------------------------------------- /Executable/uDUnitXApplication.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Executable/uDUnitXApplication.pas -------------------------------------------------------------------------------- /ExtLib/DCPCrypt/DCPdelphi6_Icon.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DCPCrypt/DCPdelphi6_Icon.ico -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/china.gif: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/doc/images/china.gif -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/xtao128.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/doc/images/xtao128.png -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/xtao16.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/doc/images/xtao16.png -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/xtao256.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/doc/images/xtao256.png -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/xtao32.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/doc/images/xtao32.png -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/xtao64.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/doc/images/xtao64.png -------------------------------------------------------------------------------- /ExtLib/DUnit/src/DUnitMainForm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/src/DUnitMainForm.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/src/GUITestRunner.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/src/GUITestRunner.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/src/QGUITestRunner.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/src/QGUITestRunner.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/src/TestExtensions.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/src/TestExtensions.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/src/TestFramework.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/src/TestFramework.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/src/TextTestRunner.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/src/TextTestRunner.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/src/images/dunit.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/src/images/dunit.ico -------------------------------------------------------------------------------- /ExtLib/DUnit/src/images/dunit16.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/src/images/dunit16.ico -------------------------------------------------------------------------------- /ExtLib/DUnit/tests/DUnitTestLib.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/tests/DUnitTestLib.dpr -------------------------------------------------------------------------------- /ExtLib/DUnit/tests/UnitTestsW32.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/tests/UnitTestsW32.dpr -------------------------------------------------------------------------------- /ExtLib/Delphi7/PngImage/pnglang.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/Delphi7/PngImage/pnglang.pas -------------------------------------------------------------------------------- /ExtLib/NLDJoystick/NLDJoystick.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/NLDJoystick/NLDJoystick.dcr -------------------------------------------------------------------------------- /ExtLib/SQLite3/SQLite3BtnArrow.bmp: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/SQLite3/SQLite3BtnArrow.bmp -------------------------------------------------------------------------------- /Formatter/uPercentFormatterTest.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Formatter/uPercentFormatterTest.pas -------------------------------------------------------------------------------- /Regional/uRegionalCodePageTest.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Regional/uRegionalCodePageTest.pas -------------------------------------------------------------------------------- /Sound/SoundItems/uVioletNoise.pas: -------------------------------------------------------------------------------- 1 | unit uVioletNoise; 2 | 3 | interface 4 | 5 | implementation 6 | 7 | end. 8 | -------------------------------------------------------------------------------- /Test/Data/Wave/M1F1-Alaw-AFsp.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Test/Data/Wave/M1F1-Alaw-AFsp.wav -------------------------------------------------------------------------------- /Test/Data/Wave/M1F1-AlawWE-AFsp.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Test/Data/Wave/M1F1-AlawWE-AFsp.wav -------------------------------------------------------------------------------- /Test/Data/Wave/M1F1-int12-AFsp.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Test/Data/Wave/M1F1-int12-AFsp.wav -------------------------------------------------------------------------------- /Test/Data/Wave/M1F1-int16-AFsp.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Test/Data/Wave/M1F1-int16-AFsp.wav -------------------------------------------------------------------------------- /Test/Data/Wave/M1F1-int24-AFsp.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Test/Data/Wave/M1F1-int24-AFsp.wav -------------------------------------------------------------------------------- /Test/Data/Wave/M1F1-mulaw-AFsp.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Test/Data/Wave/M1F1-mulaw-AFsp.wav -------------------------------------------------------------------------------- /Test/Data/Wave/M1F1-uint8-AFsp.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Test/Data/Wave/M1F1-uint8-AFsp.wav -------------------------------------------------------------------------------- /Test/DllForTest/DllForTest_Icon.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Test/DllForTest/DllForTest_Icon.ico -------------------------------------------------------------------------------- /ExtLib/CoolTrayIcon/CoolTrayIcon.chm: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/CoolTrayIcon/CoolTrayIcon.chm -------------------------------------------------------------------------------- /ExtLib/CoolTrayIcon/CoolTrayIcon.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/CoolTrayIcon/CoolTrayIcon.dcr -------------------------------------------------------------------------------- /ExtLib/CoolTrayIcon/TextTrayIcon.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/CoolTrayIcon/TextTrayIcon.dcr -------------------------------------------------------------------------------- /ExtLib/DCPCrypt/DCPdelphi6_Icon1.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DCPCrypt/DCPdelphi6_Icon1.ico -------------------------------------------------------------------------------- /ExtLib/DCPCrypt/DCPdelphi6_Icon2.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DCPCrypt/DCPdelphi6_Icon2.ico -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/xpLex.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/Contrib/XPGen/xpLex.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/xpgen.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/Contrib/XPGen/xpgen.dpr -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/xpmain.dfm: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/Contrib/XPGen/xpmain.dfm -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/xpmain.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/Contrib/XPGen/xpmain.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/xtao16-16.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/doc/images/xtao16-16.png -------------------------------------------------------------------------------- /ExtLib/DUnit/src/images/dunit_new.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/src/images/dunit_new.ico -------------------------------------------------------------------------------- /ExtLib/DUnit/tests/UnitTests4Net.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/tests/UnitTests4Net.dpr -------------------------------------------------------------------------------- /ExtLib/Delphi7/PngImage/PngImage.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/Delphi7/PngImage/PngImage.pas -------------------------------------------------------------------------------- /ExtLib/Delphi7/PngImage/obj/trees.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/Delphi7/PngImage/obj/trees.obj -------------------------------------------------------------------------------- /ExtLib/Delphi7/PngImage/pngimage.chm: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/Delphi7/PngImage/pngimage.chm -------------------------------------------------------------------------------- /Game/Turn-based/Common/uMoveList.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Game/Turn-based/Common/uMoveList.pas -------------------------------------------------------------------------------- /Parser/uMathExpressionParserTest.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Parser/uMathExpressionParserTest.pas -------------------------------------------------------------------------------- /RandomGenerator/uShuffleGenerator.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/RandomGenerator/uShuffleGenerator.pas -------------------------------------------------------------------------------- /Test/Data/Wave/M1F1-float32-AFsp.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Test/Data/Wave/M1F1-float32-AFsp.wav -------------------------------------------------------------------------------- /Test/Data/Wave/M1F1-float64-AFsp.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Test/Data/Wave/M1F1-float64-AFsp.wav -------------------------------------------------------------------------------- /Test/Data/Wave/M1F1-int12WE-AFsp.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Test/Data/Wave/M1F1-int12WE-AFsp.wav -------------------------------------------------------------------------------- /Test/Data/Wave/M1F1-int16WE-AFsp.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Test/Data/Wave/M1F1-int16WE-AFsp.wav -------------------------------------------------------------------------------- /Test/Data/Wave/M1F1-int24WE-AFsp.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Test/Data/Wave/M1F1-int24WE-AFsp.wav -------------------------------------------------------------------------------- /Test/Data/Wave/M1F1-mulawWE-AFsp.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Test/Data/Wave/M1F1-mulawWE-AFsp.wav -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/parsedef.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/Contrib/XPGen/parsedef.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/testXpgen.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/Contrib/XPGen/testXpgen.dpr -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/testunit.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/Contrib/XPGen/testunit.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/xpCodeGen.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/Contrib/XPGen/xpCodeGen.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/xpParse.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/Contrib/XPGen/xpParse.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/dunit_name.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/doc/images/dunit_name.png -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/screenshot.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/doc/images/screenshot.png -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/xtao128_new.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/doc/images/xtao128_new.png -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/xtao16-256.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/doc/images/xtao16-256.png -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/xtao32-256.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/doc/images/xtao32-256.png -------------------------------------------------------------------------------- /ExtLib/DUnit/helpsrc/TestFramework.HPJ: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/helpsrc/TestFramework.HPJ -------------------------------------------------------------------------------- /ExtLib/DUnit/src/images/dunit16_new.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/src/images/dunit16_new.ico -------------------------------------------------------------------------------- /ExtLib/DUnit/src/images/list_images.bmp: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/src/images/list_images.bmp -------------------------------------------------------------------------------- /ExtLib/DUnit/src/images/run_images.bmp: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/src/images/run_images.bmp -------------------------------------------------------------------------------- /ExtLib/DUnit/src/images/state_images.bmp: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/src/images/state_images.bmp -------------------------------------------------------------------------------- /ExtLib/DUnit/tests/DUnitTestLibW32.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/tests/DUnitTestLibW32.dpr -------------------------------------------------------------------------------- /ExtLib/DUnit/tests/FastMMMonitorTest.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/tests/FastMMMonitorTest.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/tests/UnitTestFramework.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/tests/UnitTestFramework.pas -------------------------------------------------------------------------------- /ExtLib/Delphi7/PngImage/obj/adler32.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/Delphi7/PngImage/obj/adler32.obj -------------------------------------------------------------------------------- /ExtLib/Delphi7/PngImage/obj/deflate.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/Delphi7/PngImage/obj/deflate.obj -------------------------------------------------------------------------------- /ExtLib/Delphi7/PngImage/obj/infblock.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/Delphi7/PngImage/obj/infblock.obj -------------------------------------------------------------------------------- /ExtLib/Delphi7/PngImage/obj/infcodes.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/Delphi7/PngImage/obj/infcodes.obj -------------------------------------------------------------------------------- /ExtLib/Delphi7/PngImage/obj/inffast.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/Delphi7/PngImage/obj/inffast.obj -------------------------------------------------------------------------------- /ExtLib/Delphi7/PngImage/obj/inflate.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/Delphi7/PngImage/obj/inflate.obj -------------------------------------------------------------------------------- /ExtLib/Delphi7/PngImage/obj/inftrees.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/Delphi7/PngImage/obj/inftrees.obj -------------------------------------------------------------------------------- /ExtLib/Delphi7/PngImage/obj/infutil.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/Delphi7/PngImage/obj/infutil.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/Demos/Browser/Main.dfm: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/GraphicEx/Demos/Browser/Main.dfm -------------------------------------------------------------------------------- /ExtLib/GraphicEx/Demos/Convert/Main.dfm: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/GraphicEx/Demos/Convert/Main.dfm -------------------------------------------------------------------------------- /Test/Data/Wave/M1F1-float32WE-AFsp.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Test/Data/Wave/M1F1-float32WE-AFsp.wav -------------------------------------------------------------------------------- /Test/Data/Wave/M1F1-float64WE-AFsp.wav: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Test/Data/Wave/M1F1-float64WE-AFsp.wav -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/listsupport.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/Contrib/XPGen/listsupport.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/suite_xpgen.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/Contrib/XPGen/suite_xpgen.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/test_xpLex.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/Contrib/XPGen/test_xpLex.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/wincvs_setup_1.jpg: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/doc/images/wincvs_setup_1.jpg -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/wincvs_setup_2.jpg: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/doc/images/wincvs_setup_2.jpg -------------------------------------------------------------------------------- /ExtLib/DUnit/src/FastMMMemLeakMonitor.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/src/FastMMMemLeakMonitor.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/src/images/actions_images.bmp: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/src/images/actions_images.bmp -------------------------------------------------------------------------------- /ExtLib/DUnit/tests/UnitTestExtensions.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/tests/UnitTestExtensions.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/tests/UnitTestGUITesting.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/tests/UnitTestGUITesting.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/testXpgenLib.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/Contrib/XPGen/testXpgenLib.dpr -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/test_xpParse.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/Contrib/XPGen/test_xpParse.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/project_options.jpg: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/doc/images/project_options.jpg -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/tutorial_files/image002.gif: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/doc/tutorial_files/image002.gif -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/tutorial_files/image003.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/doc/tutorial_files/image003.png -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/tutorial_files/image004.jpg: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/doc/tutorial_files/image004.jpg -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/tutorial_files/image006.gif: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/doc/tutorial_files/image006.gif -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/tutorial_files/image007.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/doc/tutorial_files/image007.png -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/tutorial_files/image008.jpg: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/doc/tutorial_files/image008.jpg -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/cmdline/runtest.cmd: -------------------------------------------------------------------------------- 1 | echo off 2 | Project1Test.exe %1 3 | if ERRORLEVEL 1 echo ********* Test(s) failed! ******** 4 | -------------------------------------------------------------------------------- /ExtLib/DUnit/tests/UnitTestGUITestRunner.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/tests/UnitTestGUITestRunner.pas -------------------------------------------------------------------------------- /Test/Data/Example Raster Graphics/Abalone.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Test/Data/Example Raster Graphics/Abalone.png -------------------------------------------------------------------------------- /ExtLib/DCPCrypt/Docs/osi-certified-120x100.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DCPCrypt/Docs/osi-certified-120x100.png -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Docs/menu.jpg: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/Contrib/DUnitWizard/Docs/menu.jpg -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Docs/menu.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/Contrib/DUnitWizard/Docs/menu.png -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/environment_options.jpg: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/doc/images/environment_options.jpg -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/screenshot_running.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/doc/images/screenshot_running.png -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/registration/UnitReg.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/examples/registration/UnitReg.dpr -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Docs/applet.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/Contrib/DUnitWizard/Docs/applet.png -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Docs/newClass.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/Contrib/DUnitWizard/Docs/newClass.png -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/XPDUnitTestClassWizard.rc: -------------------------------------------------------------------------------- 1 | DUNIT_TESTCLASS_MENU BITMAP dunit_testclass.bmp 2 | 3 | -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XPGen/TEST_Parse_uses_clause.txt: -------------------------------------------------------------------------------- 1 | uses 2 | DUnit, 3 | // windows 4 | (*parseDef,*) 5 | {xpParse,} 6 | SysUtils; 7 | -------------------------------------------------------------------------------- /ExtLib/DUnit/doc/images/jira_button_120wx60h.gif: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/doc/images/jira_button_120wx60h.gif -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/registration/TestUnit1.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/examples/registration/TestUnit1.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/registration/TestUnit2.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/examples/registration/TestUnit2.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/registration/TestUnit3.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/examples/registration/TestUnit3.pas -------------------------------------------------------------------------------- /ExtLib/CoolTrayIcon/docs/History - CoolTrayIcon.txt: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/CoolTrayIcon/docs/History - CoolTrayIcon.txt -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Docs/behaviour.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/Contrib/DUnitWizard/Docs/behaviour.png -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Docs/newProject.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/Contrib/DUnitWizard/Docs/newProject.png -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Docs/parameters.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/Contrib/DUnitWizard/Docs/parameters.png -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/XMLReporting/XMLTestRunner.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/Contrib/XMLReporting/XMLTestRunner.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/MemLeakDetect/LeakTestDemo.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/examples/MemLeakDetect/LeakTestDemo.dpr -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/MemLeakDetect/UnitTestLeak.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/examples/MemLeakDetect/UnitTestLeak.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/testexception/Project1Test.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/examples/testexception/Project1Test.dpr -------------------------------------------------------------------------------- /ExtLib/FastMM/Translations/Czech/FastMM4Messages.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/Translations/Czech/FastMM4Messages.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Docs/dunit_wizard.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/Contrib/DUnitWizard/Docs/dunit_wizard.png -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Docs/newTestModule.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/Contrib/DUnitWizard/Docs/newTestModule.png -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/HaltRepeating/DemoHaltOnError.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/examples/HaltRepeating/DemoHaltOnError.dpr -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/MemLeakDetect/UnitTestSetup.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/examples/MemLeakDetect/UnitTestSetup.pas -------------------------------------------------------------------------------- /ExtLib/FastMM/Demos/Dynamically Loaded DLL/TestDLL.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/Demos/Dynamically Loaded DLL/TestDLL.res -------------------------------------------------------------------------------- /ExtLib/FastMM/Demos/Usage Tracker/UsageTrackerDemo.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/Demos/Usage Tracker/UsageTrackerDemo.res -------------------------------------------------------------------------------- /ExtLib/FastMM/Translations/French/FastMM4Messages.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/Translations/French/FastMM4Messages.pas -------------------------------------------------------------------------------- /ExtLib/FastMM/Translations/Italian/FastMM4Messages.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/Translations/Italian/FastMM4Messages.pas -------------------------------------------------------------------------------- /ExtLib/FastMM/Translations/Polish/FastMM4Messages.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/Translations/Polish/FastMM4Messages.pas -------------------------------------------------------------------------------- /ExtLib/FastMM/Translations/Russian/FastMM4Messages.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/Translations/Russian/FastMM4Messages.pas -------------------------------------------------------------------------------- /ExtLib/FastMM/Translations/Spanish/FastMM4Messages.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/Translations/Spanish/FastMM4Messages.pas -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win32/adler32.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/GraphicEx/3rd party/DelphiZlib/win32/adler32.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win32/crc32.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/GraphicEx/3rd party/DelphiZlib/win32/crc32.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win32/deflate.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/GraphicEx/3rd party/DelphiZlib/win32/deflate.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win32/infback.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/GraphicEx/3rd party/DelphiZlib/win32/infback.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win32/inffast.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/GraphicEx/3rd party/DelphiZlib/win32/inffast.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win32/inflate.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/GraphicEx/3rd party/DelphiZlib/win32/inflate.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win32/trees.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/GraphicEx/3rd party/DelphiZlib/win32/trees.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win64/adler32.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/GraphicEx/3rd party/DelphiZlib/win64/adler32.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win64/crc32.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/GraphicEx/3rd party/DelphiZlib/win64/crc32.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win64/deflate.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/GraphicEx/3rd party/DelphiZlib/win64/deflate.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win64/infback.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/GraphicEx/3rd party/DelphiZlib/win64/infback.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win64/inffast.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/GraphicEx/3rd party/DelphiZlib/win64/inffast.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win64/inflate.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/GraphicEx/3rd party/DelphiZlib/win64/inflate.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win64/trees.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/GraphicEx/3rd party/DelphiZlib/win64/trees.obj -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/TestSuiteReg.txt: -------------------------------------------------------------------------------- 1 | TestFramework.RegisterTest('#UNITNAME Suite', 2 | #CLASSNAME.Suite); 3 | -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/structure/diffunit/Project1Test.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/examples/structure/diffunit/Project1Test.dpr -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/structure/sameunit/Project1Test.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/examples/structure/sameunit/Project1Test.dpr -------------------------------------------------------------------------------- /ExtLib/FastMM/Demos/Replacement borlndmm DLL/BorlndMM.dll: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/Demos/Replacement borlndmm DLL/BorlndMM.dll -------------------------------------------------------------------------------- /ExtLib/FastMM/FullDebugMode DLL/FastMM_FullDebugMode.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/FullDebugMode DLL/FastMM_FullDebugMode.res -------------------------------------------------------------------------------- /ExtLib/FastMM/Replacement BorlndMM DLL/BCB6/BorlndMM.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/Replacement BorlndMM DLL/BCB6/BorlndMM.res -------------------------------------------------------------------------------- /ExtLib/FastMM/Translations/Afrikaans/FastMM4Messages.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/Translations/Afrikaans/FastMM4Messages.pas -------------------------------------------------------------------------------- /ExtLib/FastMM/Translations/Portuguese/FastMM4Messages.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/Translations/Portuguese/FastMM4Messages.pas -------------------------------------------------------------------------------- /ExtLib/FastMM/Translations/Ukrainian/FastMM4Messages.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/Translations/Ukrainian/FastMM4Messages.pas -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win32/compress.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/GraphicEx/3rd party/DelphiZlib/win32/compress.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win32/inftrees.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/GraphicEx/3rd party/DelphiZlib/win32/inftrees.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win64/compress.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/GraphicEx/3rd party/DelphiZlib/win64/compress.obj -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/DelphiZlib/win64/inftrees.obj: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/GraphicEx/3rd party/DelphiZlib/win64/inftrees.obj -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/embeddable/EmbeddableGUITestRunner.dfm: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/examples/embeddable/EmbeddableGUITestRunner.dfm -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/structure/diffunit/UnitStructure.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/examples/structure/diffunit/UnitStructure.png -------------------------------------------------------------------------------- /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/Delphi/BorlndMM.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/Replacement BorlndMM DLL/Delphi/BorlndMM.res -------------------------------------------------------------------------------- /ExtLib/FastMM/Translations/Belarussian/FastMM4Messages.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/Translations/Belarussian/FastMM4Messages.pas -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /ExtLib/FastMM/Demos/Dynamically Loaded DLL/TestApplication.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/Demos/Dynamically Loaded DLL/TestApplication.res -------------------------------------------------------------------------------- /ExtLib/FastMM/FullDebugMode DLL/FastMM_FullDebugMode_Icon.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/FullDebugMode DLL/FastMM_FullDebugMode_Icon.ico -------------------------------------------------------------------------------- /ExtLib/GraphicEx/3rd party/AutoResourceStr/variantWrapper.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/GraphicEx/3rd party/AutoResourceStr/variantWrapper.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/ChecklessTests/FailChecklessTestsDemo.dpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/examples/ChecklessTests/FailChecklessTestsDemo.dpr -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/ChecklessTests/TestFailChecklessTests.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/examples/ChecklessTests/TestFailChecklessTests.pas -------------------------------------------------------------------------------- /ExtLib/DUnit/examples/HaltRepeating/DemoHaltRepeatingOnError.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/examples/HaltRepeating/DemoHaltRepeatingOnError.pas -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Protocols/Commands/uBenchmarkCommand.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/Game/Turn-based/Engine/Protocols/Commands/uBenchmarkCommand.pas -------------------------------------------------------------------------------- /ExtLib/FastMM/Demos/Replacement borlndmm DLL/FullDebugModeDemo.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/Demos/Replacement borlndmm DLL/FullDebugModeDemo.res -------------------------------------------------------------------------------- /ExtLib/FastMM/Translations/Chinese (Simplified)/FastMM4Messages.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/Translations/Chinese (Simplified)/FastMM4Messages.pas -------------------------------------------------------------------------------- /ExtLib/FastMM/Translations/Chinese (Simplified)/FastMM4Options.inc: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/Translations/Chinese (Simplified)/FastMM4Options.inc -------------------------------------------------------------------------------- /ExtLib/FastMM/Translations/Portuguese (Brazil)/FastMM4Messages.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/Translations/Portuguese (Brazil)/FastMM4Messages.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 | -------------------------------------------------------------------------------- /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/FastMM/Demos/Replacement borlndmm DLL/FastMM_FullDebugMode.dll: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/Demos/Replacement borlndmm DLL/FastMM_FullDebugMode.dll -------------------------------------------------------------------------------- /ExtLib/FastMM/FullDebugMode DLL/Precompiled/FastMM_FullDebugMode.dll: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/FullDebugMode DLL/Precompiled/FastMM_FullDebugMode.dll -------------------------------------------------------------------------------- /ExtLib/FastMM/FullDebugMode DLL/Precompiled/FastMM_FullDebugMode64.dll: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/FullDebugMode DLL/Precompiled/FastMM_FullDebugMode64.dll -------------------------------------------------------------------------------- /ExtLib/FastMM/Replacement BorlndMM DLL/BCB5/Precompiled/BorlndMM.dll: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/Replacement BorlndMM DLL/BCB5/Precompiled/BorlndMM.dll -------------------------------------------------------------------------------- /ExtLib/FastMM/Replacement BorlndMM DLL/BCB6/Precompiled/BorlndMM.dll: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/Replacement BorlndMM DLL/BCB6/Precompiled/BorlndMM.dll -------------------------------------------------------------------------------- /ExtLib/FastMM/Replacement BorlndMM DLL/CB2006/Precompiled/BorlndMM.dll: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/Replacement BorlndMM DLL/CB2006/Precompiled/BorlndMM.dll -------------------------------------------------------------------------------- /ExtLib/FastMM/Replacement BorlndMM DLL/CB2007/Precompiled/BorlndMM.dll: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/Replacement BorlndMM DLL/CB2007/Precompiled/BorlndMM.dll -------------------------------------------------------------------------------- /ExtLib/FastMM/Translations/German/by Thomas Speck/FastMM4Messages.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/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/HEAD/ExtLib/FastMM/Translations/German/by Uwe Queisser/FastMM4Messages.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/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/Precompiled/libFastMM_FullDebugMode.dylib: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/FullDebugMode DLL/Precompiled/libFastMM_FullDebugMode.dylib -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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/FastMM/FullDebugMode DLL/CPP Builder Support/FastMM_FullDebugMode.lib: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/FullDebugMode DLL/CPP Builder Support/FastMM_FullDebugMode.lib -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/Common/XPPascalScanner.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/Common/XPPascalScanner.pas -------------------------------------------------------------------------------- /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/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/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/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/Contrib/DUnitWizard/Source/DelphiExperts/Common/XP_OTAEditorUtils.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/Common/XP_OTAEditorUtils.pas -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/dunit_project.bmp: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/dunit_project.bmp -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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/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 | -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/dunit_project16.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/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/HEAD/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/HEAD/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/HEAD/ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/dunit_testmodule.bmp -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/dunit_testmodule16.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/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/HEAD/ExtLib/DUnit/Contrib/DUnitWizard/Source/DelphiExperts/DUnitProject/dunit_testmodule256.ico -------------------------------------------------------------------------------- /ExtLib/FastMM/Replacement BorlndMM DLL/Delphi/Precompiled/for Delphi IDE/Debug/BorlndMM.dll: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/Replacement BorlndMM DLL/Delphi/Precompiled/for Delphi IDE/Debug/BorlndMM.dll -------------------------------------------------------------------------------- /ExtLib/FastMM/Replacement BorlndMM DLL/Delphi/Precompiled/for Applications/Debug/BorlndMM.dll: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/Replacement BorlndMM DLL/Delphi/Precompiled/for Applications/Debug/BorlndMM.dll -------------------------------------------------------------------------------- /ExtLib/FastMM/Replacement BorlndMM DLL/Delphi/Precompiled/for Delphi IDE/Performance/BorlndMM.dll: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/Replacement BorlndMM DLL/Delphi/Precompiled/for Delphi IDE/Performance/BorlndMM.dll -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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/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/Delphi/Precompiled/for Applications/Performance/BorlndMM.dll: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Safrad/Sx-Library/HEAD/ExtLib/FastMM/Replacement BorlndMM DLL/Delphi/Precompiled/for Applications/Performance/BorlndMM.dll -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 -------------------------------------------------------------------------------- /ExtLib/DUnit/readme.html: -------------------------------------------------------------------------------- 1 | 2 | 3 | 4 | 5 | 7 | 8 | 9 | 10 | 11 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /ExtLib/FastMM/FullDebugMode DLL/FastMM_FullDebugMode.entitlements: -------------------------------------------------------------------------------- 1 | 2 | 3 | 4 | 5 | 6 | 7 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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/Constants.csv: -------------------------------------------------------------------------------- 1 | #Expression,Result 2 | E,2.7182818284590452353602874713526624977572470936999595749669676277240766303535475945713821785251664274… 3 | Pi,3.14159265358979323846264338327950288419716939937510582097494459230781640628620899862803482534211706798… 4 | C,299792458 5 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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/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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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/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 | -------------------------------------------------------------------------------- /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 -------------------------------------------------------------------------------- /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/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/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/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/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/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/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/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 | -------------------------------------------------------------------------------- /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/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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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/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/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/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/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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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/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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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/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/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/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/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/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/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/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/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/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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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/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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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/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/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/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/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/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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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/title.htm: -------------------------------------------------------------------------------- 1 | 2 | 3 | Untitled Document 4 | 5 | 6 | 7 | 8 | 9 |
10 |

DUnitWizard 11 | 3.0 documentation

12 |
13 | 14 | 15 | -------------------------------------------------------------------------------- /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. -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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/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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /Test/Data/Example Scalable Vector Graphics/lime.svg: -------------------------------------------------------------------------------- 1 | 2 | 3 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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/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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /.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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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/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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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/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/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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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/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/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/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/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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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/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/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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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/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/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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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/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/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 | -------------------------------------------------------------------------------- /.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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /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 | -------------------------------------------------------------------------------- /ExtLib/FastMM/Demos/Usage Tracker/DemoForm.dfm: -------------------------------------------------------------------------------- 1 | object fDemo: TfDemo 2 | Left = 199 3 | Top = 114 4 | BorderIcons = [biSystemMenu] 5 | BorderStyle = bsSingle 6 | Caption = 'Usage Tracker Demo' 7 | ClientHeight = 53 8 | ClientWidth = 239 9 | Color = clBtnFace 10 | Font.Charset = DEFAULT_CHARSET 11 | Font.Color = clWindowText 12 | Font.Height = -11 13 | Font.Name = 'MS Sans Serif' 14 | Font.Style = [] 15 | OldCreateOrder = False 16 | Position = poScreenCenter 17 | PixelsPerInch = 96 18 | TextHeight = 13 19 | object bShowTracker: TButton 20 | Left = 8 21 | Top = 8 22 | Width = 221 23 | Height = 37 24 | Caption = 'Show Usage Tracker' 25 | TabOrder = 0 26 | OnClick = bShowTrackerClick 27 | end 28 | end 29 | -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Protocols/Commands/XBoard/uIncludeAllCommand.pas: -------------------------------------------------------------------------------- 1 | unit uIncludeAllCommand; 2 | 3 | interface 4 | 5 | uses 6 | uSimpleEngineCommand; 7 | 8 | type 9 | TIncludeAllCommand = class(TSimpleEngineCommand) 10 | public 11 | constructor Create; 12 | 13 | procedure ExecuteNoParam; override; 14 | end; 15 | 16 | implementation 17 | 18 | { TIncludeAllCommand } 19 | 20 | constructor TIncludeAllCommand.Create; 21 | begin 22 | inherited; 23 | 24 | Description := 'All moves are possible, default state. After this command call "Exclude" commands.'; 25 | end; 26 | 27 | procedure TIncludeAllCommand.ExecuteNoParam; 28 | begin 29 | inherited; 30 | 31 | InternalEngine.RootMoves.IncludeAll; 32 | end; 33 | 34 | end. 35 | 36 | -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Protocols/Commands/XBoard/uNoPostCommand.pas: -------------------------------------------------------------------------------- 1 | unit uNoPostCommand; 2 | 3 | interface 4 | 5 | uses 6 | uSimpleEngineCommand; 7 | 8 | type 9 | TNoPostCommand = class(TSimpleEngineCommand) 10 | public 11 | constructor Create; 12 | 13 | procedure ExecuteNoParam; override; 14 | end; 15 | 16 | implementation 17 | 18 | uses 19 | uXBoardEngineOutput; 20 | 21 | { TNoPostCommand } 22 | 23 | constructor TNoPostCommand.Create; 24 | begin 25 | inherited; 26 | 27 | Description := 'Turn off thinking/pondering output.'; 28 | end; 29 | 30 | procedure TNoPostCommand.ExecuteNoParam; 31 | begin 32 | inherited; 33 | 34 | TXBoardEngineOutput(InternalEngine.Output).Enabled := False; 35 | end; 36 | 37 | end. 38 | 39 | -------------------------------------------------------------------------------- /ExtLib/NLDJoystick/NLDJoystick70.dpk: -------------------------------------------------------------------------------- 1 | package NLDJoystick70; 2 | 3 | {$R *.res} 4 | {$R 'NLDjoystick.dcr'} 5 | {$ALIGN 8} 6 | {$ASSERTIONS OFF} 7 | {$BOOLEVAL OFF} 8 | {$DEBUGINFO OFF} 9 | {$EXTENDEDSYNTAX ON} 10 | {$IMPORTEDDATA ON} 11 | {$IOCHECKS ON} 12 | {$LOCALSYMBOLS OFF} 13 | {$LONGSTRINGS ON} 14 | {$OPENSTRINGS ON} 15 | {$OPTIMIZATION ON} 16 | {$OVERFLOWCHECKS OFF} 17 | {$RANGECHECKS OFF} 18 | {$REFERENCEINFO OFF} 19 | {$SAFEDIVIDE OFF} 20 | {$STACKFRAMES OFF} 21 | {$TYPEDADDRESS OFF} 22 | {$VARSTRINGCHECKS ON} 23 | {$WRITEABLECONST OFF} 24 | {$MINENUMSIZE 1} 25 | {$IMAGEBASE $400000} 26 | {$DESCRIPTION 'NLDJoystick'} 27 | {$IMPLICITBUILD OFF} 28 | 29 | requires 30 | rtl; 31 | 32 | contains 33 | NLDJoystick in 'NLDJoystick.pas'; 34 | 35 | end. 36 | -------------------------------------------------------------------------------- /Game/Turn-based/Common/uCustomForsythEdwardsNotationWriter.pas: -------------------------------------------------------------------------------- 1 | unit uCustomForsythEdwardsNotationWriter; 2 | 3 | interface 4 | 5 | uses 6 | uCustomWriter, 7 | 8 | uPosition; 9 | 10 | type 11 | TCustomForsythEdwardsNotationWriter = class(TInterfacedObject, ICustomWriter) 12 | private 13 | FPosition: TPosition; 14 | procedure SetPosition(const Value: TPosition); 15 | public 16 | function AsString: string; virtual; abstract; 17 | 18 | property Position: TPosition read FPosition write SetPosition; 19 | end; 20 | 21 | implementation 22 | 23 | { TCustomForsythEdwardsNotationWriter } 24 | 25 | procedure TCustomForsythEdwardsNotationWriter.SetPosition(const Value: TPosition); 26 | begin 27 | FPosition := Value; 28 | end; 29 | 30 | end. 31 | -------------------------------------------------------------------------------- /ApplicationModule/uBrokenApplicationModule.pas: -------------------------------------------------------------------------------- 1 | unit uBrokenApplicationModule; 2 | 3 | interface 4 | 5 | uses 6 | uApplicationModule; 7 | 8 | type 9 | TBrokenApplicationModule = class(TApplicationModule) 10 | protected 11 | procedure OnLoad; override; 12 | procedure OnUnload; override; 13 | end; 14 | 15 | implementation 16 | 17 | uses 18 | SysUtils; 19 | 20 | { TBrokenApplicationModule } 21 | 22 | procedure TBrokenApplicationModule.OnLoad; 23 | begin 24 | inherited; 25 | 26 | raise Exception.Create('Unspecified load problem for testing.'); 27 | end; 28 | 29 | procedure TBrokenApplicationModule.OnUnload; 30 | begin 31 | inherited; 32 | 33 | raise Exception.Create('Unspecified unload problem for testing.'); 34 | end; 35 | 36 | end. 37 | -------------------------------------------------------------------------------- /Executable/uFirst.pas: -------------------------------------------------------------------------------- 1 | unit uFirst; 2 | 3 | {$WARN SYMBOL_PLATFORM OFF} 4 | 5 | interface 6 | 7 | {.$define FastMM4} // Optional 8 | 9 | uses 10 | {$ifdef FastMM4} 11 | FastMM4, 12 | {$endif} 13 | uTypes; 14 | 15 | var 16 | ApplicationStartTicks: U8; 17 | 18 | implementation 19 | 20 | uses 21 | Diagnostics; 22 | 23 | initialization 24 | {$IFNDEF NoInitialization} 25 | NoErrMsg := IsRelease; 26 | Diagnostics.TStopwatch.Create; // required for hi resolution GetTimeStamp (calls InitStopwatchType) 27 | ApplicationStartTicks := Diagnostics.TStopwatch.GetTimeStamp; 28 | 29 | {$ifndef FastMM4} 30 | ReportMemoryLeaksOnShutdown := IsDebug; // Optional, can take long time for many unfreed objects 31 | {$endif} 32 | {$ENDIF NoInitialization} 33 | end. 34 | -------------------------------------------------------------------------------- /ExtLib/GraphicEx/Demos/SaveAs/SaveAsDemo.dpr: -------------------------------------------------------------------------------- 1 | program SaveAsDemo; 2 | 3 | {%File '..\..\3rd party\DelphiZlib\readme.txt'} 4 | 5 | uses 6 | Forms, 7 | mainform in 'mainform.pas' {Form1}, 8 | GraphicEx in '..\..\GraphicEx.pas', 9 | GraphicCompression in '..\..\GraphicCompression.pas', 10 | ZLibEx in '..\..\3rd party\DelphiZlib\ZLibEx.pas', 11 | ZLibExApi in '..\..\3rd party\DelphiZlib\ZLibExApi.pas', 12 | GraphicStrings in '..\..\GraphicStrings.pas', 13 | GraphicColor in '..\..\GraphicColor.pas', 14 | JpegCompression in '..\..\JpegCompression.pas', 15 | MZLib in '..\..\MZLib.pas', 16 | TIFF in '..\..\TIFF.pas'; 17 | 18 | {$R *.res} 19 | 20 | begin 21 | Application.Initialize; 22 | Application.CreateForm(TForm1, Form1); 23 | Application.Run; 24 | end. 25 | -------------------------------------------------------------------------------- /Game/Turn-based/Engine/Common/uAnalysis.pas: -------------------------------------------------------------------------------- 1 | unit uAnalysis; 2 | 3 | interface 4 | 5 | uses 6 | uTypes, 7 | uTimeSpan, 8 | 9 | uSubtreeStatus; 10 | 11 | type 12 | PAnalysis = ^TAnalysis; 13 | TAnalysis = record 14 | ElapsedTime: TTimeSpan; 15 | Nodes: U8; 16 | Status: TSubtreeStatus; 17 | Depth: U1; 18 | SelDepth: U1; 19 | ActMove: U1; 20 | Reserved: U1; 21 | Moves: array of string; 22 | function GetAvg: U8; 23 | end; 24 | 25 | implementation 26 | 27 | uses 28 | uMath; 29 | 30 | { TAnalysis } 31 | 32 | function TAnalysis.GetAvg: U8; 33 | begin 34 | if ElapsedTime.Ticks > 0 then 35 | begin 36 | Result := RoundU8(Nodes / ElapsedTime.SecondsAsF); 37 | end 38 | else 39 | Result := 0; 40 | end; 41 | 42 | end. 43 | -------------------------------------------------------------------------------- /Test/Data/Parser/AdvancedMath.csv: -------------------------------------------------------------------------------- 1 | #Expression,Result 2 | "Power(2;3)",8 3 | 2^3,8 4 | 4^3^2,262144 5 | 2^3^4,2417851639229258349412352 6 | 2**3,8 7 | "1.5^1.5",1.83711730708738… 8 | # "Log(10;1000)",3 9 | # "Log(2;8)",3 10 | Ln(e),1 11 | Sqr(10),100 12 | Sqrt(100),10 13 | Sqrt(e),1.648721270700128… 14 | Exp(0),1 15 | Exp(1),2.7182818284590452353602874713526624977572470936999595749669676277240766303535475945713821785251664274… 16 | Exp(ln(1)),1 17 | 18 | Fact(5),120 19 | fact(7),5040 20 | 5!,120 21 | Gamma(6),120 22 | 4.5!,52.3427777845535… 23 | Gamma(5.5),52.3427777845535… 24 | Gamma(-1.5),2.36327180120735… 25 | Gamma(5/2),1.329340388179137… 26 | 27 | "GCD(48;180)",12 28 | "GCD(48;180;30)",6 29 | "LCM(8;10)",40 30 | # "LCM(81;231;3465)",31185 31 | # "LCM(7;77;777)",8547 32 | --------------------------------------------------------------------------------