├── .gitignore ├── Addon ├── DataAbstract │ ├── DataAbstract_Scripting.lpk │ ├── DataAbstract_Scripting.pas │ ├── DataAbstract_Scripting_D10.bdsproj │ ├── DataAbstract_Scripting_D10.cfg │ ├── DataAbstract_Scripting_D10.dpk │ ├── DataAbstract_Scripting_D10.dproj │ ├── DataAbstract_Scripting_D10.res │ ├── DataAbstract_Scripting_D11.dpk │ ├── DataAbstract_Scripting_D11.dproj │ ├── DataAbstract_Scripting_D11.res │ ├── DataAbstract_Scripting_D12.dpk │ ├── DataAbstract_Scripting_D12.dproj │ ├── DataAbstract_Scripting_D12.res │ ├── DataAbstract_Scripting_D14.dpk │ ├── DataAbstract_Scripting_D14.dproj │ ├── DataAbstract_Scripting_D14.res │ ├── DataAbstract_Scripting_D15.dpk │ ├── DataAbstract_Scripting_D15.dproj │ ├── DataAbstract_Scripting_D15.res │ ├── DataAbstract_Scripting_D16.dpk │ ├── DataAbstract_Scripting_D16.dproj │ ├── DataAbstract_Scripting_D16.res │ ├── DataAbstract_Scripting_D17.dpk │ ├── DataAbstract_Scripting_D17.dproj │ ├── DataAbstract_Scripting_D17.res │ ├── DataAbstract_Scripting_D18.dpk │ ├── DataAbstract_Scripting_D18.dproj │ ├── DataAbstract_Scripting_D18.res │ ├── DataAbstract_Scripting_D19.dpk │ ├── DataAbstract_Scripting_D19.dproj │ ├── DataAbstract_Scripting_D19.res │ ├── DataAbstract_Scripting_D20.dpk │ ├── DataAbstract_Scripting_D20.dproj │ ├── DataAbstract_Scripting_D20.res │ ├── DataAbstract_Scripting_D21.dpk │ ├── DataAbstract_Scripting_D21.dproj │ ├── DataAbstract_Scripting_D21.res │ ├── DataAbstract_Scripting_D22.dpk │ ├── DataAbstract_Scripting_D22.dproj │ ├── DataAbstract_Scripting_D22.res │ ├── DataAbstract_Scripting_D23.dpk │ ├── DataAbstract_Scripting_D23.dproj │ ├── DataAbstract_Scripting_D23.res │ ├── DataAbstract_Scripting_D24.dpk │ ├── DataAbstract_Scripting_D24.dproj │ ├── DataAbstract_Scripting_D24.res │ ├── DataAbstract_Scripting_D25.dpk │ ├── DataAbstract_Scripting_D25.dproj │ ├── DataAbstract_Scripting_D25.res │ ├── DataAbstract_Scripting_D26.dpk │ ├── DataAbstract_Scripting_D26.dproj │ ├── DataAbstract_Scripting_D26.res │ ├── DataAbstract_Scripting_D27.dpk │ ├── DataAbstract_Scripting_D27.dproj │ ├── DataAbstract_Scripting_D27.res │ ├── DataAbstract_Scripting_D28.dpk │ ├── DataAbstract_Scripting_D28.dproj │ ├── DataAbstract_Scripting_D28.res │ ├── DataAbstract_Scripting_D29.dpk │ ├── DataAbstract_Scripting_D29.dproj │ ├── DataAbstract_Scripting_D29.res │ ├── DataAbstract_Scripting_D6.cfg │ ├── DataAbstract_Scripting_D6.dof │ ├── DataAbstract_Scripting_D6.dpk │ ├── DataAbstract_Scripting_D6.res │ ├── DataAbstract_Scripting_D7.cfg │ ├── DataAbstract_Scripting_D7.dof │ ├── DataAbstract_Scripting_D7.dpk │ ├── DataAbstract_Scripting_D7.res │ ├── DataAbstract_Scripting_D9.bdsproj │ ├── DataAbstract_Scripting_D9.cfg │ ├── DataAbstract_Scripting_D9.dpk │ ├── DataAbstract_Scripting_D9.res │ ├── DataAbstract_Scripting_Glyphs.RES │ ├── DataAbstract_Scripting_Glyphs.lrs │ ├── DataAbstract_Scripting_Glyphs.rc │ ├── DataAbstract_Scripting_Reg.pas │ ├── Glyphs │ │ ├── TDAPSScriptingProvider.bmp │ │ └── TDAPSScriptingProvider16.bmp │ ├── uDAPSScriptingProvider.pas │ └── uDAPascalScript.pas └── RemObjects SDK │ ├── Glyphs │ └── TPSRemObjectsSdkPlugin.bmp │ ├── PascalScript_RO_D10.bdsproj │ ├── PascalScript_RO_D10.cfg │ ├── PascalScript_RO_D10.dpk │ ├── PascalScript_RO_D10.res │ ├── PascalScript_RO_D11.dpk │ ├── PascalScript_RO_D11.dproj │ ├── PascalScript_RO_D11.res │ ├── PascalScript_RO_D12.dpk │ ├── PascalScript_RO_D12.dproj │ ├── PascalScript_RO_D12.res │ ├── PascalScript_RO_D14.dpk │ ├── PascalScript_RO_D14.dproj │ ├── PascalScript_RO_D14.res │ ├── PascalScript_RO_D15.dpk │ ├── PascalScript_RO_D15.dproj │ ├── PascalScript_RO_D15.res │ ├── PascalScript_RO_D16.dpk │ ├── PascalScript_RO_D16.dproj │ ├── PascalScript_RO_D16.res │ ├── PascalScript_RO_D17.dpk │ ├── PascalScript_RO_D17.dproj │ ├── PascalScript_RO_D17.res │ ├── PascalScript_RO_D18.dpk │ ├── PascalScript_RO_D18.dproj │ ├── PascalScript_RO_D18.res │ ├── PascalScript_RO_D19.dpk │ ├── PascalScript_RO_D19.dproj │ ├── PascalScript_RO_D19.res │ ├── PascalScript_RO_D20.dpk │ ├── PascalScript_RO_D20.dproj │ ├── PascalScript_RO_D20.res │ ├── PascalScript_RO_D21.dpk │ ├── PascalScript_RO_D21.dproj │ ├── PascalScript_RO_D21.res │ ├── PascalScript_RO_D22.dpk │ ├── PascalScript_RO_D22.dproj │ ├── PascalScript_RO_D22.res │ ├── PascalScript_RO_D23.dpk │ ├── PascalScript_RO_D23.dproj │ ├── PascalScript_RO_D23.res │ ├── PascalScript_RO_D24.dpk │ ├── PascalScript_RO_D24.dproj │ ├── PascalScript_RO_D24.res │ ├── PascalScript_RO_D25.dpk │ ├── PascalScript_RO_D25.dproj │ ├── PascalScript_RO_D25.res │ ├── PascalScript_RO_D26.dpk │ ├── PascalScript_RO_D26.dproj │ ├── PascalScript_RO_D26.res │ ├── PascalScript_RO_D27.dpk │ ├── PascalScript_RO_D27.dproj │ ├── PascalScript_RO_D27.res │ ├── PascalScript_RO_D28.dpk │ ├── PascalScript_RO_D28.dproj │ ├── PascalScript_RO_D28.res │ ├── PascalScript_RO_D29.dpk │ ├── PascalScript_RO_D29.dproj │ ├── PascalScript_RO_D29.res │ ├── PascalScript_RO_D6.dof │ ├── PascalScript_RO_D6.dpk │ ├── PascalScript_RO_D6.res │ ├── PascalScript_RO_D7.cfg │ ├── PascalScript_RO_D7.dof │ ├── PascalScript_RO_D7.dpk │ ├── PascalScript_RO_D7.res │ ├── PascalScript_RO_D9.bdsproj │ ├── PascalScript_RO_D9.cfg │ ├── PascalScript_RO_D9.dpk │ ├── PascalScript_RO_D9.res │ ├── PascalScript_RO_Glyphs.RES │ ├── PascalScript_RO_Glyphs.rc │ ├── PascalScript_RO_Reg.pas │ ├── uROPSImports.pas │ └── uROPSServerLink.pas ├── Articles ├── Using Classes with RemObjects PascalScript │ ├── Images_-1C72A37E-60C1-4D71-91D1-844140034A07-.png │ ├── Images_-46D0599E-8750-448E-ACE1-D71968B4EAF9-.png │ ├── Images_-787B7711-2BF3-41AA-8E56-91D63344D5E0-.png │ ├── Images_-8821D7ED-4999-4343-A0BB-7822BCD292D5-.png │ ├── Images_-B70E9BCC-4513-4133-A790-DE8246179CAD-.png │ ├── Images_-E3CBD245-D791-406D-820D-CC1F9C9CA125-.png │ ├── Images_-EA8FCBEF-97D4-47B2-8140-74761B71A83F-.png │ ├── Images_-F65AD44E-8A42-4A47-A9A4-B329D0DF4CD3-.png │ ├── Images_-FEAD5D0B-5E5F-48C4-9D4F-AA44EB5FD131-.png │ └── index.html └── Using RemObjects Pascal Script │ ├── Images_-2BDBA214-FEF1-4A54-AA23-93F70EE217C9-.png │ ├── Images_-437262DA-CA48-473A-8890-2161A932852F-.png │ ├── Images_-7331DD6C-58D8-40D3-8BCC-D65E975EC424-.png │ ├── Images_-7AEF4D36-18ED-4465-B887-4C9665DDBE0C-.png │ ├── Images_-A8439C86-1330-42FE-944F-31BD046504D1-.png │ ├── Images_-C3B60367-A372-4053-942E-A9220AE2F7DA-.png │ ├── Images_-C914388E-AAF5-4E0C-90B0-6568433352F2-.png │ ├── Images_-CCEE9133-9036-4715-87A1-FC47B9AADC00-.png │ └── index.html ├── LICENSE.md ├── Pascal Script.ico ├── Readme ARM.txt ├── Samples ├── Console │ ├── sample1.dpr │ ├── sample2.dpr │ ├── sample3.dpr │ ├── sample4.dpr │ ├── sample5.dpr │ ├── sample6.dpr │ ├── sample7.dpr │ └── sample8.dpr ├── Debug │ ├── dlgConfirmReplace.dfm │ ├── dlgConfirmReplace.pas │ ├── dlgReplaceText.dfm │ ├── dlgReplaceText.pas │ ├── dlgSearchText.dfm │ ├── dlgSearchText.pas │ ├── ide.dpr │ ├── ide.res │ ├── ide_debugoutput.dfm │ ├── ide_debugoutput.pas │ ├── ide_editor.dfm │ ├── ide_editor.pas │ ├── readme.txt │ ├── uFrmGotoLine.dfm │ └── uFrmGotoLine.pas ├── IDE │ ├── dlgConfirmReplace.dfm │ ├── dlgConfirmReplace.pas │ ├── dlgReplaceText.dfm │ ├── dlgReplaceText.pas │ ├── dlgSearchText.dfm │ ├── dlgSearchText.pas │ ├── ide.dpr │ ├── ide.res │ ├── ide_debugoutput.dfm │ ├── ide_debugoutput.pas │ ├── ide_editor.dfm │ ├── ide_editor.pas │ ├── readme.txt │ ├── uFrmGotoLine.dfm │ └── uFrmGotoLine.pas ├── Import │ ├── Import.dpr │ ├── Import.res │ ├── arraytest.rops │ ├── booleantest.rops │ ├── bytearray.rops │ ├── casetest.rops │ ├── dlltest.rops │ ├── exc.ROPS │ ├── exittest.rops │ ├── fDwin.dfm │ ├── fDwin.pas │ ├── fMain.dfm │ ├── fMain.pas │ ├── fortest.rops │ ├── if.rops │ ├── iformtest.rops │ ├── importtest.rops │ ├── longfortest.rops │ ├── rectest.rops │ ├── stringtest.rops │ ├── t1.rops │ ├── t10.rops │ ├── t11.rops │ ├── t2.rops │ ├── t3.rops │ ├── t4.rops │ ├── t5.rops │ ├── t6.rops │ ├── t7.rops │ ├── t8.rops │ ├── t9.rops │ ├── testdefine.rops │ ├── testinclude.rops │ ├── vartype.rops │ └── wordole.rops ├── Kylix │ ├── Import.dpr │ ├── arraytest.rops │ ├── booleantest.rops │ ├── bytearray.rops │ ├── casetest.rops │ ├── exittest.rops │ ├── fDwin.dfm │ ├── fDwin.pas │ ├── fMain.dfm │ ├── fMain.pas │ ├── fortest.rops │ ├── if.rops │ ├── importtest.rops │ ├── longfortest.rops │ ├── rectest.rops │ └── vartype.rops ├── RemObjects SDK Client │ ├── MegaDemo.RODL │ ├── MegaDemo.ROPS │ ├── TestApplication.dpr │ ├── TestApplication.res │ ├── fMain.dfm │ └── fMain.pas └── TestApp │ ├── TestApplication.dpr │ ├── TestApplication.res │ ├── fMain.dfm │ └── fMain.pas ├── Source ├── Glyphs │ ├── PS Glpyhs.pspimage │ ├── TPSCustomPlugin.png │ ├── TPSDllPlugin.bmp │ ├── TPSDllPlugin.png │ ├── TPSImport_Classes.bmp │ ├── TPSImport_Classes.png │ ├── TPSImport_ComObj.bmp │ ├── TPSImport_ComObj.png │ ├── TPSImport_Controls.bmp │ ├── TPSImport_Controls.png │ ├── TPSImport_DB.bmp │ ├── TPSImport_DB.png │ ├── TPSImport_DateUtils.bmp │ ├── TPSImport_DateUtils.png │ ├── TPSImport_Forms.bmp │ ├── TPSImport_Forms.png │ ├── TPSImport_StdCtrls.bmp │ ├── TPSImport_StdCtrls.png │ ├── TPSScript.bmp │ ├── TPSScript.png │ ├── TPSScriptDebugger.bmp │ └── TPSScriptDebugger.png ├── InvokeCall.inc ├── PascalScript.inc ├── PascalScriptFCL.lpk ├── PascalScriptFPC.inc ├── PascalScriptLCL.lpk ├── PascalScript_Core_D10.bdsproj ├── PascalScript_Core_D10.cfg ├── PascalScript_Core_D10.dpk ├── PascalScript_Core_D10.res ├── PascalScript_Core_D11.dpk ├── PascalScript_Core_D11.dproj ├── PascalScript_Core_D11.res ├── PascalScript_Core_D12.dpk ├── PascalScript_Core_D12.dproj ├── PascalScript_Core_D12.res ├── PascalScript_Core_D14.dpk ├── PascalScript_Core_D14.dproj ├── PascalScript_Core_D14.res ├── PascalScript_Core_D15.dpk ├── PascalScript_Core_D15.dproj ├── PascalScript_Core_D15.res ├── PascalScript_Core_D16.dpk ├── PascalScript_Core_D16.dproj ├── PascalScript_Core_D16.res ├── PascalScript_Core_D17.dpk ├── PascalScript_Core_D17.dproj ├── PascalScript_Core_D17.res ├── PascalScript_Core_D18.dpk ├── PascalScript_Core_D18.dproj ├── PascalScript_Core_D18.res ├── PascalScript_Core_D19.dpk ├── PascalScript_Core_D19.dproj ├── PascalScript_Core_D19.res ├── PascalScript_Core_D20.dpk ├── PascalScript_Core_D20.dproj ├── PascalScript_Core_D20.res ├── PascalScript_Core_D21.dpk ├── PascalScript_Core_D21.dproj ├── PascalScript_Core_D21.res ├── PascalScript_Core_D22.dpk ├── PascalScript_Core_D22.dproj ├── PascalScript_Core_D22.res ├── PascalScript_Core_D23.dpk ├── PascalScript_Core_D23.dproj ├── PascalScript_Core_D23.res ├── PascalScript_Core_D24.dpk ├── PascalScript_Core_D24.dproj ├── PascalScript_Core_D24.res ├── PascalScript_Core_D25.dpk ├── PascalScript_Core_D25.dproj ├── PascalScript_Core_D25.res ├── PascalScript_Core_D26.dpk ├── PascalScript_Core_D26.dproj ├── PascalScript_Core_D26.res ├── PascalScript_Core_D27.dpk ├── PascalScript_Core_D27.dproj ├── PascalScript_Core_D27.res ├── PascalScript_Core_D28.dpk ├── PascalScript_Core_D28.dproj ├── PascalScript_Core_D28.res ├── PascalScript_Core_D29.dpk ├── PascalScript_Core_D29.dproj ├── PascalScript_Core_D29.res ├── PascalScript_Core_D3.dof ├── PascalScript_Core_D3.dpk ├── PascalScript_Core_D4.dof ├── PascalScript_Core_D4.dpk ├── PascalScript_Core_D5.dof ├── PascalScript_Core_D5.dpk ├── PascalScript_Core_D6.dof ├── PascalScript_Core_D6.dpk ├── PascalScript_Core_D6.res ├── PascalScript_Core_D6_Personal.dof ├── PascalScript_Core_D6_Personal.dpk ├── PascalScript_Core_D6_Personal.res ├── PascalScript_Core_D7.cfg ├── PascalScript_Core_D7.dof ├── PascalScript_Core_D7.dpk ├── PascalScript_Core_D7.res ├── PascalScript_Core_D9.bdsproj ├── PascalScript_Core_D9.cfg ├── PascalScript_Core_D9.dpk ├── PascalScript_Core_D9.res ├── PascalScript_Core_Ext_D10.bdsproj ├── PascalScript_Core_Ext_D10.cfg ├── PascalScript_Core_Ext_D10.dof ├── PascalScript_Core_Ext_D10.dpk ├── PascalScript_Core_Ext_D10.res ├── PascalScript_Core_Ext_D11.cfg ├── PascalScript_Core_Ext_D11.dof ├── PascalScript_Core_Ext_D11.dpk ├── PascalScript_Core_Ext_D11.dproj ├── PascalScript_Core_Ext_D11.res ├── PascalScript_Core_Ext_D6.cfg ├── PascalScript_Core_Ext_D6.dof ├── PascalScript_Core_Ext_D6.dpk ├── PascalScript_Core_Ext_D6.res ├── PascalScript_Core_Ext_D7.cfg ├── PascalScript_Core_Ext_D7.dof ├── PascalScript_Core_Ext_D7.dpk ├── PascalScript_Core_Ext_D7.res ├── PascalScript_Core_Ext_D9.cfg ├── PascalScript_Core_Ext_D9.dof ├── PascalScript_Core_Ext_D9.dpk ├── PascalScript_Core_Ext_D9.res ├── PascalScript_Core_Ext_Reg.pas ├── PascalScript_Core_Glyphs.rc ├── PascalScript_Core_Glyphs.res ├── PascalScript_Core_K3.dpk ├── PascalScript_Core_K3.kof ├── PascalScript_Core_Reg.pas ├── PascalScript_Core_Reg_noDB.pas ├── ThirdParty │ ├── ROPS_EXTENDED.dpk │ ├── uPSI_Dialogs.pas │ ├── uPSI_IBX.pas │ ├── uPSI_JvMail.pas │ ├── uPSI_Mask.pas │ ├── uPSI_Registry.pas │ └── uPS_ExtReg.pas ├── __Clean.bat ├── arm.inc ├── changelog.txt ├── eDefines.inc ├── pascalscript.lrs ├── pascalscript.pas ├── powerpc.inc ├── readme.txt ├── uPSC_DB.pas ├── uPSC_buttons.pas ├── uPSC_classes.pas ├── uPSC_comobj.pas ├── uPSC_controls.pas ├── uPSC_dateutils.pas ├── uPSC_dll.pas ├── uPSC_extctrls.pas ├── uPSC_forms.pas ├── uPSC_graphics.pas ├── uPSC_menus.pas ├── uPSC_std.pas ├── uPSC_stdctrls.pas ├── uPSCompiler.pas ├── uPSComponent.dcr ├── uPSComponent.pas ├── uPSComponentExt.pas ├── uPSComponent_COM.pas ├── uPSComponent_Controls.pas ├── uPSComponent_DB.pas ├── uPSComponent_Default.pas ├── uPSComponent_Forms.pas ├── uPSComponent_StdCtrls.pas ├── uPSDebugger.pas ├── uPSDisassembly.pas ├── uPSPreProcessor.pas ├── uPSR_DB.pas ├── uPSR_buttons.pas ├── uPSR_classes.pas ├── uPSR_comobj.pas ├── uPSR_controls.pas ├── uPSR_dateutils.pas ├── uPSR_dll.pas ├── uPSR_extctrls.pas ├── uPSR_forms.pas ├── uPSR_graphics.pas ├── uPSR_menus.pas ├── uPSR_std.pas ├── uPSR_stdctrls.pas ├── uPSRuntime.pas ├── uPSUtils.pas ├── x64.inc └── x86.inc ├── dunit ├── CompileTestExtended.pas ├── CompilerTestBase.pas ├── CompilerTestFunctions.pas ├── CompilerTestSimple.pas ├── ifps3_DUnit.dpr ├── ifps3_DUnit.res ├── ifps3_DUnit_Auto.dpr └── ifps3_DUnit_Auto.res ├── help └── Pascal Script.dox ├── patch.exe └── unit-importing ├── CMDimp.dpr ├── CMDimp.res ├── FormSettings.dfm ├── FormSettings.pas ├── Import ├── Extendedreg.pas ├── IFPS3_EXTENDED.dpk ├── IFSIR_Dialogs.pas ├── IFSI_BigIni.pas ├── IFSI_Dialogs.pas ├── IFSI_IBCustomDataSet.pas ├── IFSI_IBDatabase.pas ├── IFSI_IBQuery.pas ├── IFSI_IBSQL.pas ├── IFSI_IBTable.pas ├── IFSI_IBX.pas ├── IFSI_IBXreg.pas ├── IFSI_IniFiles.pas ├── IFSI_JvMail.pas └── IFSI_Registry.pas ├── Main.dfm ├── Main.pas ├── ParserU.pas ├── ParserUtils.pas ├── TB_ReadMe.txt ├── UFrmGotoLine.dfm ├── UFrmGotoLine.pas ├── bigini.pas ├── conv.ini ├── imp.dpr ├── imp.res ├── psUnitImporter.ico └── readme.txt /.gitignore: -------------------------------------------------------------------------------- 1 | *.dcu 2 | __history 3 | *.local 4 | *.skincfg 5 | *.identcache 6 | -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting.lpk: -------------------------------------------------------------------------------- 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 | 13 | 14 | 15 | 16 | 17 | 18 | 19 | 20 | 21 | 22 | 23 | 24 | 25 | 26 | 27 | 28 | 29 | 30 | 31 | 32 | 33 | 34 | 35 | 36 | 37 | 38 | 39 | 40 | 41 | 42 | 43 | 44 | 45 | 46 | 47 | 48 | 49 | 50 | 51 | 52 | 53 | 54 | 55 | 56 | 57 | -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting.pas: -------------------------------------------------------------------------------- 1 | { This file was automatically created by Lazarus. Do not edit! 2 | This source is only used to compile and install the package. 3 | } 4 | 5 | unit DataAbstract_Scripting; 6 | 7 | interface 8 | 9 | uses 10 | DataAbstract_Scripting_Reg, uDAPascalScript, uDAPSScriptingProvider, 11 | LazarusPackageIntf; 12 | 13 | implementation 14 | 15 | procedure Register; 16 | begin 17 | RegisterUnit('DataAbstract_Scripting_Reg', 18 | @DataAbstract_Scripting_Reg.Register); 19 | end; 20 | 21 | initialization 22 | RegisterPackage('DataAbstract_Scripting', @Register); 23 | end. 24 | -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D10.cfg: -------------------------------------------------------------------------------- 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 | -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; 29 | -H+ 30 | -W+ 31 | -M 32 | -$M16384,1048576 33 | -K$00400000 34 | -N0"..\..\Dcu\D10" 35 | -LE"..\..\Dcu\D10" 36 | -LN"..\..\Dcu\D10" 37 | -U"..\..\Dcu\D10" 38 | -O"..\..\Dcu\D10" 39 | -I"..\..\Dcu\D10" 40 | -R"..\..\Dcu\D10" 41 | -Z 42 | -w-SYMBOL_DEPRECATED 43 | -w-SYMBOL_LIBRARY 44 | -w-SYMBOL_PLATFORM 45 | -w-SYMBOL_EXPERIMENTAL 46 | -w-UNIT_LIBRARY 47 | -w-UNIT_PLATFORM 48 | -w-UNIT_DEPRECATED 49 | -w-UNIT_EXPERIMENTAL 50 | -w-UNSAFE_TYPE 51 | -w-UNSAFE_CODE 52 | -w-UNSAFE_CAST 53 | -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D10.dpk: -------------------------------------------------------------------------------- 1 | package DataAbstract_Scripting_D10; 2 | 3 | {$R *.res} 4 | {$ALIGN 8} 5 | {$ASSERTIONS ON} 6 | {$BOOLEVAL OFF} 7 | {$DEBUGINFO ON} 8 | {$EXTENDEDSYNTAX ON} 9 | {$IMPORTEDDATA ON} 10 | {$IOCHECKS ON} 11 | {$LOCALSYMBOLS ON} 12 | {$LONGSTRINGS ON} 13 | {$OPENSTRINGS ON} 14 | {$OPTIMIZATION ON} 15 | {$OVERFLOWCHECKS OFF} 16 | {$RANGECHECKS OFF} 17 | {$REFERENCEINFO ON} 18 | {$SAFEDIVIDE OFF} 19 | {$STACKFRAMES ON} 20 | {$TYPEDADDRESS OFF} 21 | {$VARSTRINGCHECKS ON} 22 | {$WRITEABLECONST OFF} 23 | {$MINENUMSIZE 1} 24 | {$IMAGEBASE $400000} 25 | {$DESCRIPTION 'RemObjects Data Abstract - Scripting Integration Library'} 26 | {$IMPLICITBUILD OFF} 27 | 28 | requires 29 | rtl, 30 | dbrtl, 31 | vcl, 32 | RemObjects_Core_D10, 33 | DataAbstract_Server_D10, 34 | PascalScript_Core_D10; 35 | 36 | contains 37 | uDAPascalScript in 'uDAPascalScript.pas', 38 | uDAPSScriptingProvider in 'uDAPSScriptingProvider.pas', 39 | DataAbstract_Scripting_Reg in 'DataAbstract_Scripting_Reg.pas'; 40 | 41 | end. 42 | -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D10.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/DataAbstract/DataAbstract_Scripting_D10.res -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D11.dpk: -------------------------------------------------------------------------------- 1 | package DataAbstract_Scripting_D11; 2 | 3 | {$R *.res} 4 | {$ALIGN 8} 5 | {$ASSERTIONS ON} 6 | {$BOOLEVAL OFF} 7 | {$DEBUGINFO ON} 8 | {$EXTENDEDSYNTAX ON} 9 | {$IMPORTEDDATA ON} 10 | {$IOCHECKS ON} 11 | {$LOCALSYMBOLS ON} 12 | {$LONGSTRINGS ON} 13 | {$OPENSTRINGS ON} 14 | {$OPTIMIZATION ON} 15 | {$OVERFLOWCHECKS OFF} 16 | {$RANGECHECKS OFF} 17 | {$REFERENCEINFO ON} 18 | {$SAFEDIVIDE OFF} 19 | {$STACKFRAMES ON} 20 | {$TYPEDADDRESS OFF} 21 | {$VARSTRINGCHECKS ON} 22 | {$WRITEABLECONST OFF} 23 | {$MINENUMSIZE 1} 24 | {$IMAGEBASE $400000} 25 | {$DESCRIPTION 'RemObjects Data Abstract - Scripting Integration Library'} 26 | {$IMPLICITBUILD OFF} 27 | 28 | requires 29 | rtl, 30 | dbrtl, 31 | vcl, 32 | RemObjects_Core_D11, 33 | DataAbstract_Server_D11, 34 | PascalScript_Core_D11; 35 | 36 | contains 37 | uDAPascalScript in 'uDAPascalScript.pas', 38 | uDAPSScriptingProvider in 'uDAPSScriptingProvider.pas', 39 | DataAbstract_Scripting_Reg in 'DataAbstract_Scripting_Reg.pas'; 40 | 41 | end. 42 | -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D11.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/DataAbstract/DataAbstract_Scripting_D11.res -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D12.dpk: -------------------------------------------------------------------------------- 1 | package DataAbstract_Scripting_D12; 2 | 3 | {$R *.res} 4 | {$ALIGN 8} 5 | {$ASSERTIONS ON} 6 | {$BOOLEVAL OFF} 7 | {$DEBUGINFO ON} 8 | {$EXTENDEDSYNTAX ON} 9 | {$IMPORTEDDATA ON} 10 | {$IOCHECKS ON} 11 | {$LOCALSYMBOLS ON} 12 | {$LONGSTRINGS ON} 13 | {$OPENSTRINGS ON} 14 | {$OPTIMIZATION ON} 15 | {$OVERFLOWCHECKS OFF} 16 | {$RANGECHECKS OFF} 17 | {$REFERENCEINFO ON} 18 | {$SAFEDIVIDE OFF} 19 | {$STACKFRAMES ON} 20 | {$TYPEDADDRESS OFF} 21 | {$VARSTRINGCHECKS ON} 22 | {$WRITEABLECONST OFF} 23 | {$MINENUMSIZE 1} 24 | {$IMAGEBASE $400000} 25 | {$DESCRIPTION 'RemObjects Data Abstract - Scripting Integration Library'} 26 | {$IMPLICITBUILD OFF} 27 | 28 | requires 29 | rtl, 30 | vcl, 31 | RemObjects_Core_D12, 32 | DataAbstract_Server_D12, 33 | PascalScript_Core_D12; 34 | 35 | contains 36 | uDAPascalScript in 'uDAPascalScript.pas', 37 | uDAPSScriptingProvider in 'uDAPSScriptingProvider.pas', 38 | DataAbstract_Scripting_Reg in 'DataAbstract_Scripting_Reg.pas'; 39 | 40 | end. 41 | -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D12.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/DataAbstract/DataAbstract_Scripting_D12.res -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D14.dpk: -------------------------------------------------------------------------------- 1 | package DataAbstract_Scripting_D14; 2 | 3 | {$R *.res} 4 | {$ALIGN 8} 5 | {$ASSERTIONS ON} 6 | {$BOOLEVAL OFF} 7 | {$DEBUGINFO ON} 8 | {$EXTENDEDSYNTAX ON} 9 | {$IMPORTEDDATA ON} 10 | {$IOCHECKS ON} 11 | {$LOCALSYMBOLS ON} 12 | {$LONGSTRINGS ON} 13 | {$OPENSTRINGS ON} 14 | {$OPTIMIZATION ON} 15 | {$OVERFLOWCHECKS OFF} 16 | {$RANGECHECKS OFF} 17 | {$REFERENCEINFO ON} 18 | {$SAFEDIVIDE OFF} 19 | {$STACKFRAMES ON} 20 | {$TYPEDADDRESS OFF} 21 | {$VARSTRINGCHECKS ON} 22 | {$WRITEABLECONST OFF} 23 | {$MINENUMSIZE 1} 24 | {$IMAGEBASE $400000} 25 | {$DESCRIPTION 'RemObjects Data Abstract - Scripting Integration Library'} 26 | {$IMPLICITBUILD OFF} 27 | 28 | requires 29 | rtl, 30 | vcl, 31 | RemObjects_Core_D14, 32 | DataAbstract_Server_D14, 33 | PascalScript_Core_D14; 34 | 35 | contains 36 | uDAPascalScript in 'uDAPascalScript.pas', 37 | uDAPSScriptingProvider in 'uDAPSScriptingProvider.pas', 38 | DataAbstract_Scripting_Reg in 'DataAbstract_Scripting_Reg.pas'; 39 | 40 | end. 41 | -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D14.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/DataAbstract/DataAbstract_Scripting_D14.res -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D15.dpk: -------------------------------------------------------------------------------- 1 | package DataAbstract_Scripting_D15; 2 | 3 | {$R *.res} 4 | {$ALIGN 8} 5 | {$ASSERTIONS ON} 6 | {$BOOLEVAL OFF} 7 | {$DEBUGINFO ON} 8 | {$EXTENDEDSYNTAX ON} 9 | {$IMPORTEDDATA ON} 10 | {$IOCHECKS ON} 11 | {$LOCALSYMBOLS ON} 12 | {$LONGSTRINGS ON} 13 | {$OPENSTRINGS ON} 14 | {$OPTIMIZATION ON} 15 | {$OVERFLOWCHECKS OFF} 16 | {$RANGECHECKS OFF} 17 | {$REFERENCEINFO ON} 18 | {$SAFEDIVIDE OFF} 19 | {$STACKFRAMES ON} 20 | {$TYPEDADDRESS OFF} 21 | {$VARSTRINGCHECKS ON} 22 | {$WRITEABLECONST OFF} 23 | {$MINENUMSIZE 1} 24 | {$IMAGEBASE $400000} 25 | {$DESCRIPTION 'RemObjects Data Abstract - Scripting Integration Library'} 26 | {$IMPLICITBUILD OFF} 27 | 28 | requires 29 | rtl, 30 | vcl, 31 | RemObjects_Core_D15, 32 | DataAbstract_Server_D15, 33 | PascalScript_Core_D15; 34 | 35 | contains 36 | uDAPascalScript in 'uDAPascalScript.pas', 37 | uDAPSScriptingProvider in 'uDAPSScriptingProvider.pas', 38 | DataAbstract_Scripting_Reg in 'DataAbstract_Scripting_Reg.pas'; 39 | 40 | end. 41 | -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D15.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/DataAbstract/DataAbstract_Scripting_D15.res -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D16.dpk: -------------------------------------------------------------------------------- 1 | package DataAbstract_Scripting_D16; 2 | 3 | {$R *.res} 4 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 5 | {$ALIGN 8} 6 | {$ASSERTIONS ON} 7 | {$BOOLEVAL OFF} 8 | {$DEBUGINFO ON} 9 | {$EXTENDEDSYNTAX ON} 10 | {$IMPORTEDDATA ON} 11 | {$IOCHECKS ON} 12 | {$LOCALSYMBOLS ON} 13 | {$LONGSTRINGS ON} 14 | {$OPENSTRINGS ON} 15 | {$OPTIMIZATION OFF} 16 | {$OVERFLOWCHECKS OFF} 17 | {$RANGECHECKS OFF} 18 | {$REFERENCEINFO ON} 19 | {$SAFEDIVIDE OFF} 20 | {$STACKFRAMES ON} 21 | {$TYPEDADDRESS OFF} 22 | {$VARSTRINGCHECKS ON} 23 | {$WRITEABLECONST OFF} 24 | {$MINENUMSIZE 1} 25 | {$IMAGEBASE $400000} 26 | {$DEFINE DEBUG} 27 | {$ENDIF IMPLICITBUILDING} 28 | {$DESCRIPTION 'RemObjects Data Abstract - Scripting Integration Library'} 29 | {$IMPLICITBUILD OFF} 30 | 31 | requires 32 | rtl, 33 | vcl, 34 | RemObjects_Core_D16, 35 | DataAbstract_Server_D16, 36 | PascalScript_Core_D16; 37 | 38 | contains 39 | uDAPascalScript in 'uDAPascalScript.pas', 40 | uDAPSScriptingProvider in 'uDAPSScriptingProvider.pas', 41 | DataAbstract_Scripting_Reg in 'DataAbstract_Scripting_Reg.pas'; 42 | 43 | end. 44 | -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D16.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/DataAbstract/DataAbstract_Scripting_D16.res -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D17.dpk: -------------------------------------------------------------------------------- 1 | package DataAbstract_Scripting_D17; 2 | 3 | {$R *.res} 4 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 5 | {$ALIGN 8} 6 | {$ASSERTIONS ON} 7 | {$BOOLEVAL OFF} 8 | {$DEBUGINFO ON} 9 | {$EXTENDEDSYNTAX ON} 10 | {$IMPORTEDDATA ON} 11 | {$IOCHECKS ON} 12 | {$LOCALSYMBOLS ON} 13 | {$LONGSTRINGS ON} 14 | {$OPENSTRINGS ON} 15 | {$OPTIMIZATION OFF} 16 | {$OVERFLOWCHECKS OFF} 17 | {$RANGECHECKS OFF} 18 | {$REFERENCEINFO ON} 19 | {$SAFEDIVIDE OFF} 20 | {$STACKFRAMES ON} 21 | {$TYPEDADDRESS OFF} 22 | {$VARSTRINGCHECKS ON} 23 | {$WRITEABLECONST OFF} 24 | {$MINENUMSIZE 1} 25 | {$IMAGEBASE $400000} 26 | {$DEFINE DEBUG} 27 | {$ENDIF IMPLICITBUILDING} 28 | {$DESCRIPTION 'RemObjects Data Abstract - Scripting Integration Library'} 29 | {$IMPLICITBUILD OFF} 30 | 31 | requires 32 | rtl, 33 | vcl, 34 | RemObjects_Core_D17, 35 | DataAbstract_Server_D17, 36 | PascalScript_Core_D17; 37 | 38 | contains 39 | uDAPascalScript in 'uDAPascalScript.pas', 40 | uDAPSScriptingProvider in 'uDAPSScriptingProvider.pas', 41 | DataAbstract_Scripting_Reg in 'DataAbstract_Scripting_Reg.pas'; 42 | 43 | end. 44 | -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D17.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/DataAbstract/DataAbstract_Scripting_D17.res -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D18.dpk: -------------------------------------------------------------------------------- 1 | package DataAbstract_Scripting_D18; 2 | 3 | {$R *.res} 4 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 5 | {$ALIGN 8} 6 | {$ASSERTIONS ON} 7 | {$BOOLEVAL OFF} 8 | {$DEBUGINFO ON} 9 | {$EXTENDEDSYNTAX ON} 10 | {$IMPORTEDDATA ON} 11 | {$IOCHECKS ON} 12 | {$LOCALSYMBOLS ON} 13 | {$LONGSTRINGS ON} 14 | {$OPENSTRINGS ON} 15 | {$OPTIMIZATION OFF} 16 | {$OVERFLOWCHECKS OFF} 17 | {$RANGECHECKS OFF} 18 | {$REFERENCEINFO ON} 19 | {$SAFEDIVIDE OFF} 20 | {$STACKFRAMES ON} 21 | {$TYPEDADDRESS OFF} 22 | {$VARSTRINGCHECKS ON} 23 | {$WRITEABLECONST OFF} 24 | {$MINENUMSIZE 1} 25 | {$IMAGEBASE $400000} 26 | {$DEFINE DEBUG} 27 | {$ENDIF IMPLICITBUILDING} 28 | {$DESCRIPTION 'RemObjects Data Abstract - Scripting Integration Library'} 29 | {$IMPLICITBUILD OFF} 30 | 31 | requires 32 | rtl, 33 | vcl, 34 | RemObjects_Core_D18, 35 | DataAbstract_Server_D18, 36 | PascalScript_Core_D18; 37 | 38 | contains 39 | uDAPascalScript in 'uDAPascalScript.pas', 40 | uDAPSScriptingProvider in 'uDAPSScriptingProvider.pas', 41 | DataAbstract_Scripting_Reg in 'DataAbstract_Scripting_Reg.pas'; 42 | 43 | end. 44 | -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D18.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/DataAbstract/DataAbstract_Scripting_D18.res -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D19.dpk: -------------------------------------------------------------------------------- 1 | package DataAbstract_Scripting_D19; 2 | 3 | {$R *.res} 4 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 5 | {$ALIGN 8} 6 | {$ASSERTIONS ON} 7 | {$BOOLEVAL OFF} 8 | {$DEBUGINFO ON} 9 | {$EXTENDEDSYNTAX ON} 10 | {$IMPORTEDDATA ON} 11 | {$IOCHECKS ON} 12 | {$LOCALSYMBOLS ON} 13 | {$LONGSTRINGS ON} 14 | {$OPENSTRINGS ON} 15 | {$OPTIMIZATION OFF} 16 | {$OVERFLOWCHECKS OFF} 17 | {$RANGECHECKS OFF} 18 | {$REFERENCEINFO ON} 19 | {$SAFEDIVIDE OFF} 20 | {$STACKFRAMES ON} 21 | {$TYPEDADDRESS OFF} 22 | {$VARSTRINGCHECKS ON} 23 | {$WRITEABLECONST OFF} 24 | {$MINENUMSIZE 1} 25 | {$IMAGEBASE $400000} 26 | {$DEFINE DEBUG} 27 | {$ENDIF IMPLICITBUILDING} 28 | {$DESCRIPTION 'RemObjects Data Abstract - Scripting Integration Library'} 29 | {$IMPLICITBUILD OFF} 30 | 31 | requires 32 | rtl, 33 | vcl, 34 | RemObjects_Core_D19, 35 | DataAbstract_Server_D19, 36 | PascalScript_Core_D19; 37 | 38 | contains 39 | uDAPascalScript in 'uDAPascalScript.pas', 40 | uDAPSScriptingProvider in 'uDAPSScriptingProvider.pas', 41 | DataAbstract_Scripting_Reg in 'DataAbstract_Scripting_Reg.pas'; 42 | 43 | end. 44 | -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D19.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/DataAbstract/DataAbstract_Scripting_D19.res -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D20.dpk: -------------------------------------------------------------------------------- 1 | package DataAbstract_Scripting_D20; 2 | 3 | {$R *.res} 4 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 5 | {$ALIGN 8} 6 | {$ASSERTIONS ON} 7 | {$BOOLEVAL OFF} 8 | {$DEBUGINFO ON} 9 | {$EXTENDEDSYNTAX ON} 10 | {$IMPORTEDDATA ON} 11 | {$IOCHECKS ON} 12 | {$LOCALSYMBOLS ON} 13 | {$LONGSTRINGS ON} 14 | {$OPENSTRINGS ON} 15 | {$OPTIMIZATION OFF} 16 | {$OVERFLOWCHECKS OFF} 17 | {$RANGECHECKS OFF} 18 | {$REFERENCEINFO ON} 19 | {$SAFEDIVIDE OFF} 20 | {$STACKFRAMES ON} 21 | {$TYPEDADDRESS OFF} 22 | {$VARSTRINGCHECKS ON} 23 | {$WRITEABLECONST OFF} 24 | {$MINENUMSIZE 1} 25 | {$IMAGEBASE $400000} 26 | {$DEFINE DEBUG} 27 | {$ENDIF IMPLICITBUILDING} 28 | {$DESCRIPTION 'RemObjects Data Abstract - Scripting Integration Library'} 29 | {$IMPLICITBUILD OFF} 30 | 31 | requires 32 | rtl, 33 | vcl, 34 | RemObjects_Core_D20, 35 | DataAbstract_Server_D20, 36 | PascalScript_Core_D20; 37 | 38 | contains 39 | uDAPascalScript in 'uDAPascalScript.pas', 40 | uDAPSScriptingProvider in 'uDAPSScriptingProvider.pas', 41 | DataAbstract_Scripting_Reg in 'DataAbstract_Scripting_Reg.pas'; 42 | 43 | end. 44 | -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D20.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/DataAbstract/DataAbstract_Scripting_D20.res -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D21.dpk: -------------------------------------------------------------------------------- 1 | package DataAbstract_Scripting_D21; 2 | 3 | {$R *.res} 4 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 5 | {$ALIGN 8} 6 | {$ASSERTIONS ON} 7 | {$BOOLEVAL OFF} 8 | {$DEBUGINFO ON} 9 | {$EXTENDEDSYNTAX ON} 10 | {$IMPORTEDDATA ON} 11 | {$IOCHECKS ON} 12 | {$LOCALSYMBOLS ON} 13 | {$LONGSTRINGS ON} 14 | {$OPENSTRINGS ON} 15 | {$OPTIMIZATION OFF} 16 | {$OVERFLOWCHECKS OFF} 17 | {$RANGECHECKS OFF} 18 | {$REFERENCEINFO ON} 19 | {$SAFEDIVIDE OFF} 20 | {$STACKFRAMES ON} 21 | {$TYPEDADDRESS OFF} 22 | {$VARSTRINGCHECKS ON} 23 | {$WRITEABLECONST OFF} 24 | {$MINENUMSIZE 1} 25 | {$IMAGEBASE $400000} 26 | {$DEFINE DEBUG} 27 | {$ENDIF IMPLICITBUILDING} 28 | {$DESCRIPTION 'RemObjects Data Abstract - Scripting Integration Library'} 29 | {$IMPLICITBUILD OFF} 30 | 31 | requires 32 | rtl, 33 | vcl, 34 | RemObjects_Core_D21, 35 | DataAbstract_Server_D21, 36 | PascalScript_Core_D21; 37 | 38 | contains 39 | uDAPascalScript in 'uDAPascalScript.pas', 40 | uDAPSScriptingProvider in 'uDAPSScriptingProvider.pas', 41 | DataAbstract_Scripting_Reg in 'DataAbstract_Scripting_Reg.pas'; 42 | 43 | end. 44 | -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D21.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/DataAbstract/DataAbstract_Scripting_D21.res -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D22.dpk: -------------------------------------------------------------------------------- 1 | package DataAbstract_Scripting_D22; 2 | 3 | {$R *.res} 4 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 5 | {$ALIGN 8} 6 | {$ASSERTIONS ON} 7 | {$BOOLEVAL OFF} 8 | {$DEBUGINFO ON} 9 | {$EXTENDEDSYNTAX ON} 10 | {$IMPORTEDDATA ON} 11 | {$IOCHECKS ON} 12 | {$LOCALSYMBOLS ON} 13 | {$LONGSTRINGS ON} 14 | {$OPENSTRINGS ON} 15 | {$OPTIMIZATION OFF} 16 | {$OVERFLOWCHECKS OFF} 17 | {$RANGECHECKS OFF} 18 | {$REFERENCEINFO ON} 19 | {$SAFEDIVIDE OFF} 20 | {$STACKFRAMES ON} 21 | {$TYPEDADDRESS OFF} 22 | {$VARSTRINGCHECKS ON} 23 | {$WRITEABLECONST OFF} 24 | {$MINENUMSIZE 1} 25 | {$IMAGEBASE $400000} 26 | {$DEFINE DEBUG} 27 | {$ENDIF IMPLICITBUILDING} 28 | {$DESCRIPTION 'RemObjects Data Abstract - Scripting Integration Library'} 29 | {$IMPLICITBUILD OFF} 30 | 31 | requires 32 | rtl, 33 | vcl, 34 | RemObjects_Core_D22, 35 | DataAbstract_Server_D22, 36 | PascalScript_Core_D22; 37 | 38 | contains 39 | uDAPascalScript in 'uDAPascalScript.pas', 40 | uDAPSScriptingProvider in 'uDAPSScriptingProvider.pas', 41 | DataAbstract_Scripting_Reg in 'DataAbstract_Scripting_Reg.pas'; 42 | 43 | end. 44 | -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D22.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/DataAbstract/DataAbstract_Scripting_D22.res -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D23.dpk: -------------------------------------------------------------------------------- 1 | package DataAbstract_Scripting_D23; 2 | 3 | {$R *.res} 4 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 5 | {$ALIGN 8} 6 | {$ASSERTIONS ON} 7 | {$BOOLEVAL OFF} 8 | {$DEBUGINFO ON} 9 | {$EXTENDEDSYNTAX ON} 10 | {$IMPORTEDDATA ON} 11 | {$IOCHECKS ON} 12 | {$LOCALSYMBOLS ON} 13 | {$LONGSTRINGS ON} 14 | {$OPENSTRINGS ON} 15 | {$OPTIMIZATION OFF} 16 | {$OVERFLOWCHECKS OFF} 17 | {$RANGECHECKS OFF} 18 | {$REFERENCEINFO ON} 19 | {$SAFEDIVIDE OFF} 20 | {$STACKFRAMES ON} 21 | {$TYPEDADDRESS OFF} 22 | {$VARSTRINGCHECKS ON} 23 | {$WRITEABLECONST OFF} 24 | {$MINENUMSIZE 1} 25 | {$IMAGEBASE $400000} 26 | {$DEFINE DEBUG} 27 | {$ENDIF IMPLICITBUILDING} 28 | {$DESCRIPTION 'RemObjects Data Abstract - Scripting Integration Library'} 29 | {$IMPLICITBUILD OFF} 30 | 31 | requires 32 | rtl, 33 | vcl, 34 | RemObjects_Core_D23, 35 | DataAbstract_Server_D23, 36 | PascalScript_Core_D23; 37 | 38 | contains 39 | uDAPascalScript in 'uDAPascalScript.pas', 40 | uDAPSScriptingProvider in 'uDAPSScriptingProvider.pas', 41 | DataAbstract_Scripting_Reg in 'DataAbstract_Scripting_Reg.pas'; 42 | 43 | end. 44 | -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D23.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/DataAbstract/DataAbstract_Scripting_D23.res -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D24.dpk: -------------------------------------------------------------------------------- 1 | package DataAbstract_Scripting_D24; 2 | 3 | {$R *.res} 4 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 5 | {$ALIGN 8} 6 | {$ASSERTIONS ON} 7 | {$BOOLEVAL OFF} 8 | {$DEBUGINFO ON} 9 | {$EXTENDEDSYNTAX ON} 10 | {$IMPORTEDDATA ON} 11 | {$IOCHECKS ON} 12 | {$LOCALSYMBOLS ON} 13 | {$LONGSTRINGS ON} 14 | {$OPENSTRINGS ON} 15 | {$OPTIMIZATION OFF} 16 | {$OVERFLOWCHECKS OFF} 17 | {$RANGECHECKS OFF} 18 | {$REFERENCEINFO ON} 19 | {$SAFEDIVIDE OFF} 20 | {$STACKFRAMES ON} 21 | {$TYPEDADDRESS OFF} 22 | {$VARSTRINGCHECKS ON} 23 | {$WRITEABLECONST OFF} 24 | {$MINENUMSIZE 1} 25 | {$IMAGEBASE $400000} 26 | {$DEFINE DEBUG} 27 | {$ENDIF IMPLICITBUILDING} 28 | {$DESCRIPTION 'RemObjects Data Abstract - Scripting Integration Library'} 29 | {$IMPLICITBUILD OFF} 30 | 31 | requires 32 | rtl, 33 | vcl, 34 | RemObjects_Core_D24, 35 | DataAbstract_Server_D24, 36 | PascalScript_Core_D24; 37 | 38 | contains 39 | uDAPascalScript in 'uDAPascalScript.pas', 40 | uDAPSScriptingProvider in 'uDAPSScriptingProvider.pas', 41 | DataAbstract_Scripting_Reg in 'DataAbstract_Scripting_Reg.pas'; 42 | 43 | end. 44 | -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D24.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/DataAbstract/DataAbstract_Scripting_D24.res -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D25.dpk: -------------------------------------------------------------------------------- 1 | package DataAbstract_Scripting_D25; 2 | 3 | {$R *.res} 4 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 5 | {$ALIGN 8} 6 | {$ASSERTIONS ON} 7 | {$BOOLEVAL OFF} 8 | {$DEBUGINFO ON} 9 | {$EXTENDEDSYNTAX ON} 10 | {$IMPORTEDDATA ON} 11 | {$IOCHECKS ON} 12 | {$LOCALSYMBOLS ON} 13 | {$LONGSTRINGS ON} 14 | {$OPENSTRINGS ON} 15 | {$OPTIMIZATION OFF} 16 | {$OVERFLOWCHECKS OFF} 17 | {$RANGECHECKS OFF} 18 | {$REFERENCEINFO ON} 19 | {$SAFEDIVIDE OFF} 20 | {$STACKFRAMES ON} 21 | {$TYPEDADDRESS OFF} 22 | {$VARSTRINGCHECKS ON} 23 | {$WRITEABLECONST OFF} 24 | {$MINENUMSIZE 1} 25 | {$IMAGEBASE $400000} 26 | {$DEFINE DEBUG} 27 | {$ENDIF IMPLICITBUILDING} 28 | {$DESCRIPTION 'RemObjects Data Abstract - Scripting Integration Library'} 29 | {$IMPLICITBUILD OFF} 30 | 31 | requires 32 | rtl, 33 | vcl, 34 | RemObjects_Core_D25, 35 | DataAbstract_Server_D25, 36 | PascalScript_Core_D25; 37 | 38 | contains 39 | uDAPascalScript in 'uDAPascalScript.pas', 40 | uDAPSScriptingProvider in 'uDAPSScriptingProvider.pas', 41 | DataAbstract_Scripting_Reg in 'DataAbstract_Scripting_Reg.pas'; 42 | 43 | end. 44 | -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D25.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/DataAbstract/DataAbstract_Scripting_D25.res -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D26.dpk: -------------------------------------------------------------------------------- 1 | package DataAbstract_Scripting_D26; 2 | 3 | {$R *.res} 4 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 5 | {$ALIGN 8} 6 | {$ASSERTIONS ON} 7 | {$BOOLEVAL OFF} 8 | {$DEBUGINFO ON} 9 | {$EXTENDEDSYNTAX ON} 10 | {$IMPORTEDDATA ON} 11 | {$IOCHECKS ON} 12 | {$LOCALSYMBOLS ON} 13 | {$LONGSTRINGS ON} 14 | {$OPENSTRINGS ON} 15 | {$OPTIMIZATION OFF} 16 | {$OVERFLOWCHECKS OFF} 17 | {$RANGECHECKS OFF} 18 | {$REFERENCEINFO ON} 19 | {$SAFEDIVIDE OFF} 20 | {$STACKFRAMES ON} 21 | {$TYPEDADDRESS OFF} 22 | {$VARSTRINGCHECKS ON} 23 | {$WRITEABLECONST OFF} 24 | {$MINENUMSIZE 1} 25 | {$IMAGEBASE $400000} 26 | {$DEFINE DEBUG} 27 | {$ENDIF IMPLICITBUILDING} 28 | {$DESCRIPTION 'RemObjects Data Abstract - Scripting Integration Library'} 29 | {$IMPLICITBUILD OFF} 30 | 31 | requires 32 | rtl, 33 | vcl, 34 | RemObjects_Core_D26, 35 | DataAbstract_Server_D26, 36 | PascalScript_Core_D26; 37 | 38 | contains 39 | uDAPascalScript in 'uDAPascalScript.pas', 40 | uDAPSScriptingProvider in 'uDAPSScriptingProvider.pas', 41 | DataAbstract_Scripting_Reg in 'DataAbstract_Scripting_Reg.pas'; 42 | 43 | end. 44 | -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D26.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/DataAbstract/DataAbstract_Scripting_D26.res -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D27.dpk: -------------------------------------------------------------------------------- 1 | package DataAbstract_Scripting_D27; 2 | 3 | {$R *.res} 4 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 5 | {$ALIGN 8} 6 | {$ASSERTIONS ON} 7 | {$BOOLEVAL OFF} 8 | {$DEBUGINFO ON} 9 | {$EXTENDEDSYNTAX ON} 10 | {$IMPORTEDDATA ON} 11 | {$IOCHECKS ON} 12 | {$LOCALSYMBOLS ON} 13 | {$LONGSTRINGS ON} 14 | {$OPENSTRINGS ON} 15 | {$OPTIMIZATION OFF} 16 | {$OVERFLOWCHECKS OFF} 17 | {$RANGECHECKS OFF} 18 | {$REFERENCEINFO ON} 19 | {$SAFEDIVIDE OFF} 20 | {$STACKFRAMES ON} 21 | {$TYPEDADDRESS OFF} 22 | {$VARSTRINGCHECKS ON} 23 | {$WRITEABLECONST OFF} 24 | {$MINENUMSIZE 1} 25 | {$IMAGEBASE $400000} 26 | {$DEFINE DEBUG} 27 | {$ENDIF IMPLICITBUILDING} 28 | {$DESCRIPTION 'RemObjects Data Abstract - Scripting Integration Library'} 29 | {$IMPLICITBUILD OFF} 30 | 31 | requires 32 | rtl, 33 | vcl, 34 | RemObjects_Core_D27, 35 | DataAbstract_Server_D27, 36 | PascalScript_Core_D27; 37 | 38 | contains 39 | uDAPascalScript in 'uDAPascalScript.pas', 40 | uDAPSScriptingProvider in 'uDAPSScriptingProvider.pas', 41 | DataAbstract_Scripting_Reg in 'DataAbstract_Scripting_Reg.pas'; 42 | 43 | end. 44 | -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D27.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/DataAbstract/DataAbstract_Scripting_D27.res -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D28.dpk: -------------------------------------------------------------------------------- 1 | package DataAbstract_Scripting_D28; 2 | 3 | {$R *.res} 4 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 5 | {$ALIGN 8} 6 | {$ASSERTIONS ON} 7 | {$BOOLEVAL OFF} 8 | {$DEBUGINFO ON} 9 | {$EXTENDEDSYNTAX ON} 10 | {$IMPORTEDDATA ON} 11 | {$IOCHECKS ON} 12 | {$LOCALSYMBOLS ON} 13 | {$LONGSTRINGS ON} 14 | {$OPENSTRINGS ON} 15 | {$OPTIMIZATION OFF} 16 | {$OVERFLOWCHECKS OFF} 17 | {$RANGECHECKS OFF} 18 | {$REFERENCEINFO ON} 19 | {$SAFEDIVIDE OFF} 20 | {$STACKFRAMES ON} 21 | {$TYPEDADDRESS OFF} 22 | {$VARSTRINGCHECKS ON} 23 | {$WRITEABLECONST OFF} 24 | {$MINENUMSIZE 1} 25 | {$IMAGEBASE $400000} 26 | {$DEFINE DEBUG} 27 | {$ENDIF IMPLICITBUILDING} 28 | {$DESCRIPTION 'RemObjects Data Abstract - Scripting Integration Library'} 29 | {$IMPLICITBUILD OFF} 30 | 31 | requires 32 | rtl, 33 | vcl, 34 | RemObjects_Core_D28, 35 | DataAbstract_Server_D28, 36 | PascalScript_Core_D28; 37 | 38 | contains 39 | uDAPascalScript in 'uDAPascalScript.pas', 40 | uDAPSScriptingProvider in 'uDAPSScriptingProvider.pas', 41 | DataAbstract_Scripting_Reg in 'DataAbstract_Scripting_Reg.pas'; 42 | 43 | end. 44 | -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D28.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/DataAbstract/DataAbstract_Scripting_D28.res -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D29.dpk: -------------------------------------------------------------------------------- 1 | package DataAbstract_Scripting_D29; 2 | 3 | {$R *.res} 4 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 5 | {$ALIGN 8} 6 | {$ASSERTIONS ON} 7 | {$BOOLEVAL OFF} 8 | {$DEBUGINFO ON} 9 | {$EXTENDEDSYNTAX ON} 10 | {$IMPORTEDDATA ON} 11 | {$IOCHECKS ON} 12 | {$LOCALSYMBOLS ON} 13 | {$LONGSTRINGS ON} 14 | {$OPENSTRINGS ON} 15 | {$OPTIMIZATION OFF} 16 | {$OVERFLOWCHECKS OFF} 17 | {$RANGECHECKS OFF} 18 | {$REFERENCEINFO ON} 19 | {$SAFEDIVIDE OFF} 20 | {$STACKFRAMES ON} 21 | {$TYPEDADDRESS OFF} 22 | {$VARSTRINGCHECKS ON} 23 | {$WRITEABLECONST OFF} 24 | {$MINENUMSIZE 1} 25 | {$IMAGEBASE $400000} 26 | {$DEFINE DEBUG} 27 | {$ENDIF IMPLICITBUILDING} 28 | {$DESCRIPTION 'RemObjects Data Abstract - Scripting Integration Library'} 29 | {$IMPLICITBUILD OFF} 30 | 31 | requires 32 | rtl, 33 | vcl, 34 | RemObjects_Core_D29, 35 | DataAbstract_Server_D29, 36 | PascalScript_Core_D29; 37 | 38 | contains 39 | uDAPascalScript in 'uDAPascalScript.pas', 40 | uDAPSScriptingProvider in 'uDAPSScriptingProvider.pas', 41 | DataAbstract_Scripting_Reg in 'DataAbstract_Scripting_Reg.pas'; 42 | 43 | end. 44 | -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D29.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/DataAbstract/DataAbstract_Scripting_D29.res -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D6.cfg: -------------------------------------------------------------------------------- 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 | -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; 29 | -H+ 30 | -W+ 31 | -M 32 | -$M16384,1048576 33 | -K$00400000 34 | -N"..\..\Dcu\D6" 35 | -LE"..\..\Dcu\D6" 36 | -LN"..\..\Dcu\D6" 37 | -U"..\..\Dcu\D6;..\..\RemObjects SDK for Delphi\Dcu\D6" 38 | -O"..\..\Dcu\D6;..\..\RemObjects SDK for Delphi\Dcu\D6" 39 | -I"..\..\Dcu\D6;..\..\RemObjects SDK for Delphi\Dcu\D6" 40 | -R"..\..\Dcu\D6;..\..\RemObjects SDK for Delphi\Dcu\D6" 41 | -Z 42 | -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D6.dof: -------------------------------------------------------------------------------- 1 | [FileVersion] 2 | Version=6.0 3 | 4 | [Compiler] 5 | A=8 6 | B=0 7 | C=1 8 | D=1 9 | E=0 10 | F=0 11 | G=1 12 | H=1 13 | I=1 14 | J=0 15 | K=0 16 | L=1 17 | M=0 18 | N=1 19 | O=1 20 | P=1 21 | Q=0 22 | R=0 23 | S=0 24 | T=0 25 | U=0 26 | V=1 27 | W=1 28 | X=1 29 | Y=1 30 | Z=1 31 | ShowHints=1 32 | ShowWarnings=1 33 | UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; 34 | SymbolDeprecated=0 35 | SymbolLibrary=0 36 | SymbolPlatform=0 37 | UnitDeprecated=0 38 | UnitLibrary=0 39 | UnitPlatform=0 40 | UnsafeType=0 41 | UnsafeCode=0 42 | UnsafeCast=0 43 | 44 | [Linker] 45 | MapFile=0 46 | OutputObjs=0 47 | ConsoleApp=1 48 | DebugInfo=0 49 | RemoteSymbols=0 50 | MinStackSize=16384 51 | MaxStackSize=1048576 52 | ImageBase=4194304 53 | ExeDescription=RemObjects Data Abstract - Scripting Integration Library 54 | 55 | [Directories] 56 | OutputDir= 57 | UnitOutputDir=..\..\Dcu\D6 58 | PackageDLLOutputDir=..\..\Dcu\D6 59 | PackageDCPOutputDir=..\..\Dcu\D6 60 | SearchPath=..\..\Dcu\D6;..\..\RemObjects SDK for Delphi\Dcu\D6 61 | Packages= 62 | Conditionals= 63 | DebugSourceDirs= 64 | UsePackages=0 65 | 66 | [Version Info Keys] 67 | CompanyName=RemObjects Software 68 | FileDescription= 69 | FileVersion=3.0.0.280 70 | InternalName= 71 | LegalCopyright= 72 | LegalTrademarks= 73 | OriginalFilename= 74 | ProductName=RemObjects SDK 75 | ProductVersion=1.0.0.0 76 | 77 | -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D6.dpk: -------------------------------------------------------------------------------- 1 | package DataAbstract_Scripting_D6; 2 | 3 | {$R *.res} 4 | {$ALIGN 8} 5 | {$ASSERTIONS ON} 6 | {$BOOLEVAL OFF} 7 | {$DEBUGINFO ON} 8 | {$EXTENDEDSYNTAX ON} 9 | {$IMPORTEDDATA ON} 10 | {$IOCHECKS ON} 11 | {$LOCALSYMBOLS ON} 12 | {$LONGSTRINGS ON} 13 | {$OPENSTRINGS ON} 14 | {$OPTIMIZATION ON} 15 | {$OVERFLOWCHECKS OFF} 16 | {$RANGECHECKS OFF} 17 | {$REFERENCEINFO ON} 18 | {$SAFEDIVIDE OFF} 19 | {$STACKFRAMES ON} 20 | {$TYPEDADDRESS OFF} 21 | {$VARSTRINGCHECKS ON} 22 | {$WRITEABLECONST OFF} 23 | {$MINENUMSIZE 1} 24 | {$IMAGEBASE $400000} 25 | {$DESCRIPTION 'RemObjects Data Abstract - Scripting Integration Library'} 26 | {$IMPLICITBUILD OFF} 27 | 28 | requires 29 | rtl, 30 | dbrtl, 31 | vcl, 32 | RemObjects_Core_D6, 33 | DataAbstract_Server_D6, 34 | PascalScript_Core_D6; 35 | 36 | contains 37 | uDAPascalScript in 'uDAPascalScript.pas', 38 | uDAPSScriptingProvider in 'uDAPSScriptingProvider.pas', 39 | DataAbstract_Scripting_Reg in 'DataAbstract_Scripting_Reg.pas'; 40 | 41 | end. 42 | -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D6.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/DataAbstract/DataAbstract_Scripting_D6.res -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D7.cfg: -------------------------------------------------------------------------------- 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 | -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; 29 | -H+ 30 | -W+ 31 | -M 32 | -$M16384,1048576 33 | -K$00400000 34 | -N"..\..\Dcu\D7" 35 | -LE"..\..\Dcu\D7" 36 | -LN"..\..\Dcu\D7" 37 | -Z 38 | -w-SYMBOL_DEPRECATED 39 | -w-SYMBOL_LIBRARY 40 | -w-SYMBOL_PLATFORM 41 | -w-UNIT_LIBRARY 42 | -w-UNIT_PLATFORM 43 | -w-UNIT_DEPRECATED 44 | -w-UNSAFE_TYPE 45 | -w-UNSAFE_CODE 46 | -w-UNSAFE_CAST 47 | -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D7.dpk: -------------------------------------------------------------------------------- 1 | package DataAbstract_Scripting_D7; 2 | 3 | {$R *.res} 4 | {$ALIGN 8} 5 | {$ASSERTIONS ON} 6 | {$BOOLEVAL OFF} 7 | {$DEBUGINFO ON} 8 | {$EXTENDEDSYNTAX ON} 9 | {$IMPORTEDDATA ON} 10 | {$IOCHECKS ON} 11 | {$LOCALSYMBOLS ON} 12 | {$LONGSTRINGS ON} 13 | {$OPENSTRINGS ON} 14 | {$OPTIMIZATION ON} 15 | {$OVERFLOWCHECKS OFF} 16 | {$RANGECHECKS OFF} 17 | {$REFERENCEINFO ON} 18 | {$SAFEDIVIDE OFF} 19 | {$STACKFRAMES ON} 20 | {$TYPEDADDRESS OFF} 21 | {$VARSTRINGCHECKS ON} 22 | {$WRITEABLECONST OFF} 23 | {$MINENUMSIZE 1} 24 | {$IMAGEBASE $400000} 25 | {$DESCRIPTION 'RemObjects Data Abstract - Scripting Integration Library'} 26 | {$IMPLICITBUILD OFF} 27 | 28 | requires 29 | rtl, 30 | dbrtl, 31 | vcl, 32 | RemObjects_Core_D7, 33 | DataAbstract_Server_D7, 34 | PascalScript_Core_D7, 35 | dsnap, 36 | adortl; 37 | 38 | contains 39 | uDAPascalScript in 'uDAPascalScript.pas', 40 | uDAPSScriptingProvider in 'uDAPSScriptingProvider.pas', 41 | DataAbstract_Scripting_Reg in 'DataAbstract_Scripting_Reg.pas'; 42 | 43 | end. 44 | -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D7.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/DataAbstract/DataAbstract_Scripting_D7.res -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D9.cfg: -------------------------------------------------------------------------------- 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 | -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; 29 | -H+ 30 | -W+ 31 | -M 32 | -$M16384,1048576 33 | -K$00400000 34 | -N"..\..\Dcu\D9" 35 | -LE"..\..\Dcu\D9" 36 | -LN"..\..\Dcu\D9" 37 | -U"..\..\Dcu\D9" 38 | -O"..\..\Dcu\D9" 39 | -I"..\..\Dcu\D9" 40 | -R"..\..\Dcu\D9" 41 | -Z 42 | -w-SYMBOL_DEPRECATED 43 | -w-SYMBOL_LIBRARY 44 | -w-SYMBOL_PLATFORM 45 | -w-SYMBOL_EXPERIMENTAL 46 | -w-UNIT_LIBRARY 47 | -w-UNIT_PLATFORM 48 | -w-UNIT_DEPRECATED 49 | -w-UNIT_EXPERIMENTAL 50 | -w-UNSAFE_TYPE 51 | -w-UNSAFE_CODE 52 | -w-UNSAFE_CAST 53 | -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D9.dpk: -------------------------------------------------------------------------------- 1 | package DataAbstract_Scripting_D9; 2 | 3 | {$R *.res} 4 | {$ALIGN 8} 5 | {$ASSERTIONS ON} 6 | {$BOOLEVAL OFF} 7 | {$DEBUGINFO ON} 8 | {$EXTENDEDSYNTAX ON} 9 | {$IMPORTEDDATA ON} 10 | {$IOCHECKS ON} 11 | {$LOCALSYMBOLS ON} 12 | {$LONGSTRINGS ON} 13 | {$OPENSTRINGS ON} 14 | {$OPTIMIZATION ON} 15 | {$OVERFLOWCHECKS OFF} 16 | {$RANGECHECKS OFF} 17 | {$REFERENCEINFO ON} 18 | {$SAFEDIVIDE OFF} 19 | {$STACKFRAMES ON} 20 | {$TYPEDADDRESS OFF} 21 | {$VARSTRINGCHECKS ON} 22 | {$WRITEABLECONST OFF} 23 | {$MINENUMSIZE 1} 24 | {$IMAGEBASE $400000} 25 | {$DESCRIPTION 'RemObjects Data Abstract - Scripting Integration Library'} 26 | {$IMPLICITBUILD OFF} 27 | 28 | requires 29 | rtl, 30 | dbrtl, 31 | vcl, 32 | RemObjects_Core_D9, 33 | DataAbstract_Server_D9, 34 | PascalScript_Core_D9; 35 | 36 | contains 37 | uDAPascalScript in 'uDAPascalScript.pas', 38 | uDAPSScriptingProvider in 'uDAPSScriptingProvider.pas', 39 | DataAbstract_Scripting_Reg in 'DataAbstract_Scripting_Reg.pas'; 40 | 41 | end. 42 | -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_D9.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/DataAbstract/DataAbstract_Scripting_D9.res -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_Glyphs.RES: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/DataAbstract/DataAbstract_Scripting_Glyphs.RES -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_Glyphs.rc: -------------------------------------------------------------------------------- 1 | TDAPSScriptingProvider BITMAP DISCARDABLE "Glyphs\TDAPSScriptingProvider.bmp" 2 | TDAPSScriptingProvider16 BITMAP DISCARDABLE "Glyphs\TDAPSScriptingProvider16.bmp" 3 | -------------------------------------------------------------------------------- /Addon/DataAbstract/DataAbstract_Scripting_Reg.pas: -------------------------------------------------------------------------------- 1 | unit DataAbstract_Scripting_Reg; 2 | {----------------------------------------------------------------------------} 3 | { Data Abstract Library - Pascal Script } 4 | { } 5 | { (c)opyright RemObjects Software. all rights reserved. } 6 | { } 7 | { Using this code requires a valid license of the Data Abstract } 8 | { which can be obtained at http://www.remobjects.com. } 9 | {----------------------------------------------------------------------------} 10 | 11 | {$I DataAbstract.inc} 12 | 13 | interface 14 | 15 | procedure Register; 16 | 17 | implementation 18 | 19 | uses 20 | Classes, uDAPSScriptingProvider, uDARes; 21 | 22 | {$R DataAbstract_Scripting_Glyphs.res} 23 | 24 | procedure Register; 25 | begin 26 | RegisterComponents('RemObjects Data Abstract (Legacy)', [TDAPSScriptingProvider]); 27 | end; 28 | 29 | end. 30 | -------------------------------------------------------------------------------- /Addon/DataAbstract/Glyphs/TDAPSScriptingProvider.bmp: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/DataAbstract/Glyphs/TDAPSScriptingProvider.bmp -------------------------------------------------------------------------------- /Addon/DataAbstract/Glyphs/TDAPSScriptingProvider16.bmp: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/DataAbstract/Glyphs/TDAPSScriptingProvider16.bmp -------------------------------------------------------------------------------- /Addon/RemObjects SDK/Glyphs/TPSRemObjectsSdkPlugin.bmp: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/RemObjects SDK/Glyphs/TPSRemObjectsSdkPlugin.bmp -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D10.cfg: -------------------------------------------------------------------------------- 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 | -N0"..\..\Dcu\D10" 34 | -LE"..\..\Dcu\D10" 35 | -U"..\..\Dcu\D10;c:\program files\borland\bds\4.0\lib\Indy9;..\..\RemObjects SDK for Dephi\Dcu\D10" 36 | -O"..\..\Dcu\D10;c:\program files\borland\bds\4.0\lib\Indy9;..\..\RemObjects SDK for Dephi\Dcu\D10" 37 | -I"..\..\Dcu\D10;c:\program files\borland\bds\4.0\lib\Indy9;..\..\RemObjects SDK for Dephi\Dcu\D10" 38 | -R"..\..\Dcu\D10;c:\program files\borland\bds\4.0\lib\Indy9;..\..\RemObjects SDK for Dephi\Dcu\D10" 39 | -Z 40 | -w-SYMBOL_DEPRECATED 41 | -w-SYMBOL_LIBRARY 42 | -w-SYMBOL_PLATFORM 43 | -w-SYMBOL_EXPERIMENTAL 44 | -w-UNIT_LIBRARY 45 | -w-UNIT_PLATFORM 46 | -w-UNIT_DEPRECATED 47 | -w-UNIT_EXPERIMENTAL 48 | -w-UNSAFE_TYPE 49 | -w-UNSAFE_CODE 50 | -w-UNSAFE_CAST 51 | -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D10.dpk: -------------------------------------------------------------------------------- 1 | package PascalScript_RO_D10; 2 | 3 | {$R *.res} 4 | {$ALIGN 8} 5 | {$ASSERTIONS ON} 6 | {$BOOLEVAL OFF} 7 | {$DEBUGINFO ON} 8 | {$EXTENDEDSYNTAX ON} 9 | {$IMPORTEDDATA ON} 10 | {$IOCHECKS ON} 11 | {$LOCALSYMBOLS ON} 12 | {$LONGSTRINGS ON} 13 | {$OPENSTRINGS ON} 14 | {$OPTIMIZATION ON} 15 | {$OVERFLOWCHECKS OFF} 16 | {$RANGECHECKS OFF} 17 | {$REFERENCEINFO ON} 18 | {$SAFEDIVIDE OFF} 19 | {$STACKFRAMES ON} 20 | {$TYPEDADDRESS OFF} 21 | {$VARSTRINGCHECKS ON} 22 | {$WRITEABLECONST OFF} 23 | {$MINENUMSIZE 1} 24 | {$IMAGEBASE $400000} 25 | {$DESCRIPTION 'RemObjects Pascal Script - RemObjects SDK 4.0 Integration'} 26 | {$IMPLICITBUILD OFF} 27 | 28 | requires 29 | rtl, 30 | {$IFDEF RemObjects_INDY9} 31 | Indy, 32 | {$ELSE} 33 | IndyCore, IndySystem, IndyProtocols, 34 | {$ENDIF} 35 | PascalScript_Core_D10, 36 | RemObjects_Server_D10, 37 | RemObjects_Indy_D10, 38 | dbrtl, 39 | vcl, 40 | vclx; 41 | 42 | contains 43 | PascalScript_RO_Reg in 'PascalScript_RO_Reg.pas', 44 | uROPSServerLink in 'uROPSServerLink.pas', 45 | uROPSImports in 'uROPSImports.pas'; 46 | 47 | end. 48 | -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D10.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/RemObjects SDK/PascalScript_RO_D10.res -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D11.dpk: -------------------------------------------------------------------------------- 1 | package PascalScript_RO_D11; 2 | 3 | {$R *.res} 4 | {$ALIGN 8} 5 | {$ASSERTIONS ON} 6 | {$BOOLEVAL OFF} 7 | {$DEBUGINFO ON} 8 | {$EXTENDEDSYNTAX ON} 9 | {$IMPORTEDDATA ON} 10 | {$IOCHECKS ON} 11 | {$LOCALSYMBOLS ON} 12 | {$LONGSTRINGS ON} 13 | {$OPENSTRINGS ON} 14 | {$OPTIMIZATION ON} 15 | {$OVERFLOWCHECKS OFF} 16 | {$RANGECHECKS OFF} 17 | {$REFERENCEINFO ON} 18 | {$SAFEDIVIDE OFF} 19 | {$STACKFRAMES ON} 20 | {$TYPEDADDRESS OFF} 21 | {$VARSTRINGCHECKS ON} 22 | {$WRITEABLECONST OFF} 23 | {$MINENUMSIZE 1} 24 | {$IMAGEBASE $400000} 25 | {$DESCRIPTION 'RemObjects Pascal Script - RemObjects SDK 5.0 Integration'} 26 | {$IMPLICITBUILD OFF} 27 | 28 | requires 29 | rtl, 30 | {$IFDEF RemObjects_INDY9} 31 | Indy, 32 | {$ELSE} 33 | IndyCore, IndySystem, IndyProtocols, 34 | {$ENDIF} 35 | PascalScript_Core_D11, 36 | RemObjects_Server_D11, 37 | RemObjects_Indy_D11, 38 | dbrtl, 39 | vcl, 40 | vclx; 41 | 42 | contains 43 | PascalScript_RO_Reg in 'PascalScript_RO_Reg.pas', 44 | uROPSServerLink in 'uROPSServerLink.pas', 45 | uROPSImports in 'uROPSImports.pas'; 46 | 47 | end. 48 | -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D11.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/RemObjects SDK/PascalScript_RO_D11.res -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D12.dpk: -------------------------------------------------------------------------------- 1 | package PascalScript_RO_D12; 2 | 3 | {$R *.res} 4 | {$ALIGN 8} 5 | {$ASSERTIONS ON} 6 | {$BOOLEVAL OFF} 7 | {$DEBUGINFO ON} 8 | {$EXTENDEDSYNTAX ON} 9 | {$IMPORTEDDATA ON} 10 | {$IOCHECKS ON} 11 | {$LOCALSYMBOLS ON} 12 | {$LONGSTRINGS ON} 13 | {$OPENSTRINGS ON} 14 | {$OPTIMIZATION ON} 15 | {$OVERFLOWCHECKS OFF} 16 | {$RANGECHECKS OFF} 17 | {$REFERENCEINFO ON} 18 | {$SAFEDIVIDE OFF} 19 | {$STACKFRAMES ON} 20 | {$TYPEDADDRESS OFF} 21 | {$VARSTRINGCHECKS ON} 22 | {$WRITEABLECONST OFF} 23 | {$MINENUMSIZE 1} 24 | {$IMAGEBASE $400000} 25 | {$DESCRIPTION 'RemObjects Pascal Script - RemObjects SDK 5.0 Integration'} 26 | {$IMPLICITBUILD OFF} 27 | 28 | requires 29 | rtl, 30 | {$IFDEF RemObjects_INDY9} 31 | Indy, 32 | {$ELSE} 33 | IndyCore, IndySystem, IndyProtocols, 34 | {$ENDIF} 35 | PascalScript_Core_D12, 36 | RemObjects_Server_D12, 37 | RemObjects_Indy_D12, 38 | dbrtl, 39 | vcl, 40 | vclx; 41 | 42 | contains 43 | PascalScript_RO_Reg in 'PascalScript_RO_Reg.pas', 44 | uROPSServerLink in 'uROPSServerLink.pas', 45 | uROPSImports in 'uROPSImports.pas'; 46 | 47 | end. 48 | -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D12.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/RemObjects SDK/PascalScript_RO_D12.res -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D14.dpk: -------------------------------------------------------------------------------- 1 | package PascalScript_RO_D14; 2 | 3 | {$R *.res} 4 | {$ALIGN 8} 5 | {$ASSERTIONS ON} 6 | {$BOOLEVAL OFF} 7 | {$DEBUGINFO ON} 8 | {$EXTENDEDSYNTAX ON} 9 | {$IMPORTEDDATA ON} 10 | {$IOCHECKS ON} 11 | {$LOCALSYMBOLS ON} 12 | {$LONGSTRINGS ON} 13 | {$OPENSTRINGS ON} 14 | {$OPTIMIZATION ON} 15 | {$OVERFLOWCHECKS OFF} 16 | {$RANGECHECKS OFF} 17 | {$REFERENCEINFO ON} 18 | {$SAFEDIVIDE OFF} 19 | {$STACKFRAMES ON} 20 | {$TYPEDADDRESS OFF} 21 | {$VARSTRINGCHECKS ON} 22 | {$WRITEABLECONST OFF} 23 | {$MINENUMSIZE 1} 24 | {$IMAGEBASE $400000} 25 | {$DESCRIPTION 'RemObjects Pascal Script - RemObjects SDK 5.0 Integration'} 26 | {$IMPLICITBUILD OFF} 27 | 28 | requires 29 | rtl, 30 | IndyCore, 31 | IndySystem, 32 | IndyProtocols, 33 | PascalScript_Core_D14, 34 | RemObjects_Server_D14, 35 | RemObjects_Indy_D14, 36 | dbrtl, 37 | vcl, 38 | vclx; 39 | 40 | contains 41 | PascalScript_RO_Reg in 'PascalScript_RO_Reg.pas', 42 | uROPSServerLink in 'uROPSServerLink.pas', 43 | uROPSImports in 'uROPSImports.pas'; 44 | 45 | end. 46 | -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D14.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/RemObjects SDK/PascalScript_RO_D14.res -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D15.dpk: -------------------------------------------------------------------------------- 1 | package PascalScript_RO_D15; 2 | 3 | {$R *.res} 4 | {$ALIGN 8} 5 | {$ASSERTIONS ON} 6 | {$BOOLEVAL OFF} 7 | {$DEBUGINFO ON} 8 | {$EXTENDEDSYNTAX ON} 9 | {$IMPORTEDDATA ON} 10 | {$IOCHECKS ON} 11 | {$LOCALSYMBOLS ON} 12 | {$LONGSTRINGS ON} 13 | {$OPENSTRINGS ON} 14 | {$OPTIMIZATION ON} 15 | {$OVERFLOWCHECKS OFF} 16 | {$RANGECHECKS OFF} 17 | {$REFERENCEINFO ON} 18 | {$SAFEDIVIDE OFF} 19 | {$STACKFRAMES ON} 20 | {$TYPEDADDRESS OFF} 21 | {$VARSTRINGCHECKS ON} 22 | {$WRITEABLECONST OFF} 23 | {$MINENUMSIZE 1} 24 | {$IMAGEBASE $400000} 25 | {$DESCRIPTION 'RemObjects Pascal Script - RemObjects SDK 5.0 Integration'} 26 | {$IMPLICITBUILD OFF} 27 | 28 | requires 29 | rtl, 30 | IndyCore, 31 | IndySystem, 32 | IndyProtocols, 33 | PascalScript_Core_D15, 34 | RemObjects_Server_D15, 35 | RemObjects_Indy_D15, 36 | dbrtl, 37 | vcl, 38 | vclx; 39 | 40 | contains 41 | PascalScript_RO_Reg in 'PascalScript_RO_Reg.pas', 42 | uROPSServerLink in 'uROPSServerLink.pas', 43 | uROPSImports in 'uROPSImports.pas'; 44 | 45 | end. 46 | -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D15.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/RemObjects SDK/PascalScript_RO_D15.res -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D16.dpk: -------------------------------------------------------------------------------- 1 | package PascalScript_RO_D16; 2 | 3 | {$R *.res} 4 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 5 | {$ALIGN 8} 6 | {$ASSERTIONS ON} 7 | {$BOOLEVAL OFF} 8 | {$DEBUGINFO ON} 9 | {$EXTENDEDSYNTAX ON} 10 | {$IMPORTEDDATA ON} 11 | {$IOCHECKS ON} 12 | {$LOCALSYMBOLS ON} 13 | {$LONGSTRINGS ON} 14 | {$OPENSTRINGS ON} 15 | {$OPTIMIZATION OFF} 16 | {$OVERFLOWCHECKS OFF} 17 | {$RANGECHECKS OFF} 18 | {$REFERENCEINFO ON} 19 | {$SAFEDIVIDE OFF} 20 | {$STACKFRAMES ON} 21 | {$TYPEDADDRESS OFF} 22 | {$VARSTRINGCHECKS ON} 23 | {$WRITEABLECONST OFF} 24 | {$MINENUMSIZE 1} 25 | {$IMAGEBASE $400000} 26 | {$DEFINE DEBUG} 27 | {$ENDIF IMPLICITBUILDING} 28 | {$DESCRIPTION 'RemObjects Pascal Script - RemObjects SDK Integration'} 29 | {$IMPLICITBUILD OFF} 30 | 31 | requires 32 | rtl, 33 | IndyCore, 34 | IndySystem, 35 | IndyProtocols, 36 | PascalScript_Core_D16, 37 | RemObjects_Server_D16, 38 | RemObjects_Indy_D16, 39 | dbrtl, 40 | vcl, 41 | vclx; 42 | 43 | contains 44 | PascalScript_RO_Reg in 'PascalScript_RO_Reg.pas', 45 | uROPSServerLink in 'uROPSServerLink.pas', 46 | uROPSImports in 'uROPSImports.pas'; 47 | 48 | end. 49 | -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D16.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/RemObjects SDK/PascalScript_RO_D16.res -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D17.dpk: -------------------------------------------------------------------------------- 1 | package PascalScript_RO_D17; 2 | 3 | {$R *.res} 4 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 5 | {$ALIGN 8} 6 | {$ASSERTIONS ON} 7 | {$BOOLEVAL OFF} 8 | {$DEBUGINFO ON} 9 | {$EXTENDEDSYNTAX ON} 10 | {$IMPORTEDDATA ON} 11 | {$IOCHECKS ON} 12 | {$LOCALSYMBOLS ON} 13 | {$LONGSTRINGS ON} 14 | {$OPENSTRINGS ON} 15 | {$OPTIMIZATION OFF} 16 | {$OVERFLOWCHECKS OFF} 17 | {$RANGECHECKS OFF} 18 | {$REFERENCEINFO ON} 19 | {$SAFEDIVIDE OFF} 20 | {$STACKFRAMES ON} 21 | {$TYPEDADDRESS OFF} 22 | {$VARSTRINGCHECKS ON} 23 | {$WRITEABLECONST OFF} 24 | {$MINENUMSIZE 1} 25 | {$IMAGEBASE $400000} 26 | {$DEFINE DEBUG} 27 | {$ENDIF IMPLICITBUILDING} 28 | {$DESCRIPTION 'RemObjects Pascal Script - RemObjects SDK Integration'} 29 | {$IMPLICITBUILD OFF} 30 | 31 | requires 32 | rtl, 33 | IndyCore, 34 | IndySystem, 35 | IndyProtocols, 36 | PascalScript_Core_D17, 37 | RemObjects_Server_D17, 38 | RemObjects_Indy_D17, 39 | dbrtl, 40 | vcl, 41 | vclx; 42 | 43 | contains 44 | PascalScript_RO_Reg in 'PascalScript_RO_Reg.pas', 45 | uROPSServerLink in 'uROPSServerLink.pas', 46 | uROPSImports in 'uROPSImports.pas'; 47 | 48 | end. 49 | -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D17.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/RemObjects SDK/PascalScript_RO_D17.res -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D18.dpk: -------------------------------------------------------------------------------- 1 | package PascalScript_RO_D18; 2 | 3 | {$R *.res} 4 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 5 | {$ALIGN 8} 6 | {$ASSERTIONS ON} 7 | {$BOOLEVAL OFF} 8 | {$DEBUGINFO ON} 9 | {$EXTENDEDSYNTAX ON} 10 | {$IMPORTEDDATA ON} 11 | {$IOCHECKS ON} 12 | {$LOCALSYMBOLS ON} 13 | {$LONGSTRINGS ON} 14 | {$OPENSTRINGS ON} 15 | {$OPTIMIZATION OFF} 16 | {$OVERFLOWCHECKS OFF} 17 | {$RANGECHECKS OFF} 18 | {$REFERENCEINFO ON} 19 | {$SAFEDIVIDE OFF} 20 | {$STACKFRAMES ON} 21 | {$TYPEDADDRESS OFF} 22 | {$VARSTRINGCHECKS ON} 23 | {$WRITEABLECONST OFF} 24 | {$MINENUMSIZE 1} 25 | {$IMAGEBASE $400000} 26 | {$DEFINE DEBUG} 27 | {$ENDIF IMPLICITBUILDING} 28 | {$DESCRIPTION 'RemObjects Pascal Script - RemObjects SDK Integration'} 29 | {$IMPLICITBUILD OFF} 30 | 31 | requires 32 | rtl, 33 | IndyCore, 34 | IndySystem, 35 | IndyProtocols, 36 | PascalScript_Core_D18, 37 | RemObjects_Server_D18, 38 | RemObjects_Indy_D18, 39 | dbrtl, 40 | vcl, 41 | vclx; 42 | 43 | contains 44 | PascalScript_RO_Reg in 'PascalScript_RO_Reg.pas', 45 | uROPSServerLink in 'uROPSServerLink.pas', 46 | uROPSImports in 'uROPSImports.pas'; 47 | 48 | end. 49 | -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D18.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/RemObjects SDK/PascalScript_RO_D18.res -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D19.dpk: -------------------------------------------------------------------------------- 1 | package PascalScript_RO_D19; 2 | 3 | {$R *.res} 4 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 5 | {$ALIGN 8} 6 | {$ASSERTIONS ON} 7 | {$BOOLEVAL OFF} 8 | {$DEBUGINFO ON} 9 | {$EXTENDEDSYNTAX ON} 10 | {$IMPORTEDDATA ON} 11 | {$IOCHECKS ON} 12 | {$LOCALSYMBOLS ON} 13 | {$LONGSTRINGS ON} 14 | {$OPENSTRINGS ON} 15 | {$OPTIMIZATION OFF} 16 | {$OVERFLOWCHECKS OFF} 17 | {$RANGECHECKS OFF} 18 | {$REFERENCEINFO ON} 19 | {$SAFEDIVIDE OFF} 20 | {$STACKFRAMES ON} 21 | {$TYPEDADDRESS OFF} 22 | {$VARSTRINGCHECKS ON} 23 | {$WRITEABLECONST OFF} 24 | {$MINENUMSIZE 1} 25 | {$IMAGEBASE $400000} 26 | {$DEFINE DEBUG} 27 | {$ENDIF IMPLICITBUILDING} 28 | {$DESCRIPTION 'RemObjects Pascal Script - RemObjects SDK Integration'} 29 | {$IMPLICITBUILD OFF} 30 | 31 | requires 32 | rtl, 33 | IndyCore, 34 | IndySystem, 35 | IndyProtocols, 36 | PascalScript_Core_D19, 37 | RemObjects_Server_D19, 38 | RemObjects_Indy_D19, 39 | dbrtl, 40 | vcl, 41 | vclx; 42 | 43 | contains 44 | PascalScript_RO_Reg in 'PascalScript_RO_Reg.pas', 45 | uROPSServerLink in 'uROPSServerLink.pas', 46 | uROPSImports in 'uROPSImports.pas'; 47 | 48 | end. 49 | -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D19.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/RemObjects SDK/PascalScript_RO_D19.res -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D20.dpk: -------------------------------------------------------------------------------- 1 | package PascalScript_RO_D20; 2 | 3 | {$R *.res} 4 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 5 | {$ALIGN 8} 6 | {$ASSERTIONS ON} 7 | {$BOOLEVAL OFF} 8 | {$DEBUGINFO ON} 9 | {$EXTENDEDSYNTAX ON} 10 | {$IMPORTEDDATA ON} 11 | {$IOCHECKS ON} 12 | {$LOCALSYMBOLS ON} 13 | {$LONGSTRINGS ON} 14 | {$OPENSTRINGS ON} 15 | {$OPTIMIZATION OFF} 16 | {$OVERFLOWCHECKS OFF} 17 | {$RANGECHECKS OFF} 18 | {$REFERENCEINFO ON} 19 | {$SAFEDIVIDE OFF} 20 | {$STACKFRAMES ON} 21 | {$TYPEDADDRESS OFF} 22 | {$VARSTRINGCHECKS ON} 23 | {$WRITEABLECONST OFF} 24 | {$MINENUMSIZE 1} 25 | {$IMAGEBASE $400000} 26 | {$DEFINE DEBUG} 27 | {$ENDIF IMPLICITBUILDING} 28 | {$DESCRIPTION 'RemObjects Pascal Script - RemObjects SDK Integration'} 29 | {$IMPLICITBUILD OFF} 30 | 31 | requires 32 | rtl, 33 | IndyCore, 34 | IndySystem, 35 | IndyProtocols, 36 | PascalScript_Core_D20, 37 | RemObjects_Server_D20, 38 | RemObjects_Indy_D20, 39 | dbrtl, 40 | vcl, 41 | vclx; 42 | 43 | contains 44 | PascalScript_RO_Reg in 'PascalScript_RO_Reg.pas', 45 | uROPSServerLink in 'uROPSServerLink.pas', 46 | uROPSImports in 'uROPSImports.pas'; 47 | 48 | end. 49 | -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D20.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/RemObjects SDK/PascalScript_RO_D20.res -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D21.dpk: -------------------------------------------------------------------------------- 1 | package PascalScript_RO_D21; 2 | 3 | {$R *.res} 4 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 5 | {$ALIGN 8} 6 | {$ASSERTIONS ON} 7 | {$BOOLEVAL OFF} 8 | {$DEBUGINFO ON} 9 | {$EXTENDEDSYNTAX ON} 10 | {$IMPORTEDDATA ON} 11 | {$IOCHECKS ON} 12 | {$LOCALSYMBOLS ON} 13 | {$LONGSTRINGS ON} 14 | {$OPENSTRINGS ON} 15 | {$OPTIMIZATION OFF} 16 | {$OVERFLOWCHECKS OFF} 17 | {$RANGECHECKS OFF} 18 | {$REFERENCEINFO ON} 19 | {$SAFEDIVIDE OFF} 20 | {$STACKFRAMES ON} 21 | {$TYPEDADDRESS OFF} 22 | {$VARSTRINGCHECKS ON} 23 | {$WRITEABLECONST OFF} 24 | {$MINENUMSIZE 1} 25 | {$IMAGEBASE $400000} 26 | {$DEFINE DEBUG} 27 | {$ENDIF IMPLICITBUILDING} 28 | {$DESCRIPTION 'RemObjects Pascal Script - RemObjects SDK Integration'} 29 | {$IMPLICITBUILD OFF} 30 | 31 | requires 32 | rtl, 33 | IndyCore, 34 | IndySystem, 35 | IndyProtocols, 36 | PascalScript_Core_D21, 37 | RemObjects_Server_D21, 38 | RemObjects_Indy_D21, 39 | dbrtl, 40 | vcl, 41 | vclx; 42 | 43 | contains 44 | PascalScript_RO_Reg in 'PascalScript_RO_Reg.pas', 45 | uROPSServerLink in 'uROPSServerLink.pas', 46 | uROPSImports in 'uROPSImports.pas'; 47 | 48 | end. 49 | -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D21.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/RemObjects SDK/PascalScript_RO_D21.res -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D22.dpk: -------------------------------------------------------------------------------- 1 | package PascalScript_RO_D22; 2 | 3 | {$R *.res} 4 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 5 | {$ALIGN 8} 6 | {$ASSERTIONS ON} 7 | {$BOOLEVAL OFF} 8 | {$DEBUGINFO ON} 9 | {$EXTENDEDSYNTAX ON} 10 | {$IMPORTEDDATA ON} 11 | {$IOCHECKS ON} 12 | {$LOCALSYMBOLS ON} 13 | {$LONGSTRINGS ON} 14 | {$OPENSTRINGS ON} 15 | {$OPTIMIZATION OFF} 16 | {$OVERFLOWCHECKS OFF} 17 | {$RANGECHECKS OFF} 18 | {$REFERENCEINFO ON} 19 | {$SAFEDIVIDE OFF} 20 | {$STACKFRAMES ON} 21 | {$TYPEDADDRESS OFF} 22 | {$VARSTRINGCHECKS ON} 23 | {$WRITEABLECONST OFF} 24 | {$MINENUMSIZE 1} 25 | {$IMAGEBASE $400000} 26 | {$DEFINE DEBUG} 27 | {$ENDIF IMPLICITBUILDING} 28 | {$DESCRIPTION 'RemObjects Pascal Script - RemObjects SDK Integration'} 29 | {$IMPLICITBUILD OFF} 30 | 31 | requires 32 | rtl, 33 | IndyCore, 34 | IndySystem, 35 | IndyProtocols, 36 | PascalScript_Core_D22, 37 | RemObjects_Server_D22, 38 | RemObjects_Indy_D22, 39 | dbrtl, 40 | vcl, 41 | vclx; 42 | 43 | contains 44 | PascalScript_RO_Reg in 'PascalScript_RO_Reg.pas', 45 | uROPSServerLink in 'uROPSServerLink.pas', 46 | uROPSImports in 'uROPSImports.pas'; 47 | 48 | end. 49 | -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D22.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/RemObjects SDK/PascalScript_RO_D22.res -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D23.dpk: -------------------------------------------------------------------------------- 1 | package PascalScript_RO_D23; 2 | 3 | {$R *.res} 4 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 5 | {$ALIGN 8} 6 | {$ASSERTIONS ON} 7 | {$BOOLEVAL OFF} 8 | {$DEBUGINFO ON} 9 | {$EXTENDEDSYNTAX ON} 10 | {$IMPORTEDDATA ON} 11 | {$IOCHECKS ON} 12 | {$LOCALSYMBOLS ON} 13 | {$LONGSTRINGS ON} 14 | {$OPENSTRINGS ON} 15 | {$OPTIMIZATION OFF} 16 | {$OVERFLOWCHECKS OFF} 17 | {$RANGECHECKS OFF} 18 | {$REFERENCEINFO ON} 19 | {$SAFEDIVIDE OFF} 20 | {$STACKFRAMES ON} 21 | {$TYPEDADDRESS OFF} 22 | {$VARSTRINGCHECKS ON} 23 | {$WRITEABLECONST OFF} 24 | {$MINENUMSIZE 1} 25 | {$IMAGEBASE $400000} 26 | {$DEFINE DEBUG} 27 | {$ENDIF IMPLICITBUILDING} 28 | {$DESCRIPTION 'RemObjects Pascal Script - RemObjects SDK Integration'} 29 | {$IMPLICITBUILD OFF} 30 | 31 | requires 32 | rtl, 33 | IndyCore, 34 | IndySystem, 35 | IndyProtocols, 36 | PascalScript_Core_D23, 37 | RemObjects_Server_D23, 38 | RemObjects_Indy_D23, 39 | dbrtl, 40 | vcl, 41 | vclx; 42 | 43 | contains 44 | PascalScript_RO_Reg in 'PascalScript_RO_Reg.pas', 45 | uROPSServerLink in 'uROPSServerLink.pas', 46 | uROPSImports in 'uROPSImports.pas'; 47 | 48 | end. 49 | -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D23.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/RemObjects SDK/PascalScript_RO_D23.res -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D24.dpk: -------------------------------------------------------------------------------- 1 | package PascalScript_RO_D24; 2 | 3 | {$R *.res} 4 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 5 | {$ALIGN 8} 6 | {$ASSERTIONS ON} 7 | {$BOOLEVAL OFF} 8 | {$DEBUGINFO ON} 9 | {$EXTENDEDSYNTAX ON} 10 | {$IMPORTEDDATA ON} 11 | {$IOCHECKS ON} 12 | {$LOCALSYMBOLS ON} 13 | {$LONGSTRINGS ON} 14 | {$OPENSTRINGS ON} 15 | {$OPTIMIZATION OFF} 16 | {$OVERFLOWCHECKS OFF} 17 | {$RANGECHECKS OFF} 18 | {$REFERENCEINFO ON} 19 | {$SAFEDIVIDE OFF} 20 | {$STACKFRAMES ON} 21 | {$TYPEDADDRESS OFF} 22 | {$VARSTRINGCHECKS ON} 23 | {$WRITEABLECONST OFF} 24 | {$MINENUMSIZE 1} 25 | {$IMAGEBASE $400000} 26 | {$DEFINE DEBUG} 27 | {$ENDIF IMPLICITBUILDING} 28 | {$DESCRIPTION 'RemObjects Pascal Script - RemObjects SDK Integration'} 29 | {$IMPLICITBUILD OFF} 30 | 31 | requires 32 | rtl, 33 | IndyCore, 34 | IndySystem, 35 | IndyProtocols, 36 | PascalScript_Core_D24, 37 | RemObjects_Server_D24, 38 | RemObjects_Indy_D24, 39 | dbrtl, 40 | vcl, 41 | vclx; 42 | 43 | contains 44 | PascalScript_RO_Reg in 'PascalScript_RO_Reg.pas', 45 | uROPSServerLink in 'uROPSServerLink.pas', 46 | uROPSImports in 'uROPSImports.pas'; 47 | 48 | end. 49 | -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D24.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/RemObjects SDK/PascalScript_RO_D24.res -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D25.dpk: -------------------------------------------------------------------------------- 1 | package PascalScript_RO_D25; 2 | 3 | {$R *.res} 4 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 5 | {$ALIGN 8} 6 | {$ASSERTIONS ON} 7 | {$BOOLEVAL OFF} 8 | {$DEBUGINFO ON} 9 | {$EXTENDEDSYNTAX ON} 10 | {$IMPORTEDDATA ON} 11 | {$IOCHECKS ON} 12 | {$LOCALSYMBOLS ON} 13 | {$LONGSTRINGS ON} 14 | {$OPENSTRINGS ON} 15 | {$OPTIMIZATION OFF} 16 | {$OVERFLOWCHECKS OFF} 17 | {$RANGECHECKS OFF} 18 | {$REFERENCEINFO ON} 19 | {$SAFEDIVIDE OFF} 20 | {$STACKFRAMES ON} 21 | {$TYPEDADDRESS OFF} 22 | {$VARSTRINGCHECKS ON} 23 | {$WRITEABLECONST OFF} 24 | {$MINENUMSIZE 1} 25 | {$IMAGEBASE $400000} 26 | {$DEFINE DEBUG} 27 | {$ENDIF IMPLICITBUILDING} 28 | {$DESCRIPTION 'RemObjects Pascal Script - RemObjects SDK Integration'} 29 | {$IMPLICITBUILD OFF} 30 | 31 | requires 32 | rtl, 33 | IndyCore, 34 | IndySystem, 35 | IndyProtocols, 36 | PascalScript_Core_D25, 37 | RemObjects_Server_D25, 38 | RemObjects_Indy_D25, 39 | dbrtl, 40 | vcl, 41 | vclx; 42 | 43 | contains 44 | PascalScript_RO_Reg in 'PascalScript_RO_Reg.pas', 45 | uROPSServerLink in 'uROPSServerLink.pas', 46 | uROPSImports in 'uROPSImports.pas'; 47 | 48 | end. 49 | -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D25.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/RemObjects SDK/PascalScript_RO_D25.res -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D26.dpk: -------------------------------------------------------------------------------- 1 | package PascalScript_RO_D26; 2 | 3 | {$R *.res} 4 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 5 | {$ALIGN 8} 6 | {$ASSERTIONS ON} 7 | {$BOOLEVAL OFF} 8 | {$DEBUGINFO ON} 9 | {$EXTENDEDSYNTAX ON} 10 | {$IMPORTEDDATA ON} 11 | {$IOCHECKS ON} 12 | {$LOCALSYMBOLS ON} 13 | {$LONGSTRINGS ON} 14 | {$OPENSTRINGS ON} 15 | {$OPTIMIZATION OFF} 16 | {$OVERFLOWCHECKS OFF} 17 | {$RANGECHECKS OFF} 18 | {$REFERENCEINFO ON} 19 | {$SAFEDIVIDE OFF} 20 | {$STACKFRAMES ON} 21 | {$TYPEDADDRESS OFF} 22 | {$VARSTRINGCHECKS ON} 23 | {$WRITEABLECONST OFF} 24 | {$MINENUMSIZE 1} 25 | {$IMAGEBASE $400000} 26 | {$DEFINE DEBUG} 27 | {$ENDIF IMPLICITBUILDING} 28 | {$DESCRIPTION 'RemObjects Pascal Script - RemObjects SDK Integration'} 29 | {$IMPLICITBUILD OFF} 30 | 31 | requires 32 | rtl, 33 | IndyCore, 34 | IndySystem, 35 | IndyProtocols, 36 | PascalScript_Core_D26, 37 | RemObjects_Server_D26, 38 | RemObjects_Indy_D26, 39 | dbrtl, 40 | vcl, 41 | vclx; 42 | 43 | contains 44 | PascalScript_RO_Reg in 'PascalScript_RO_Reg.pas', 45 | uROPSServerLink in 'uROPSServerLink.pas', 46 | uROPSImports in 'uROPSImports.pas'; 47 | 48 | end. 49 | -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D26.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/RemObjects SDK/PascalScript_RO_D26.res -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D27.dpk: -------------------------------------------------------------------------------- 1 | package PascalScript_RO_D27; 2 | 3 | {$R *.res} 4 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 5 | {$ALIGN 8} 6 | {$ASSERTIONS ON} 7 | {$BOOLEVAL OFF} 8 | {$DEBUGINFO ON} 9 | {$EXTENDEDSYNTAX ON} 10 | {$IMPORTEDDATA ON} 11 | {$IOCHECKS ON} 12 | {$LOCALSYMBOLS ON} 13 | {$LONGSTRINGS ON} 14 | {$OPENSTRINGS ON} 15 | {$OPTIMIZATION OFF} 16 | {$OVERFLOWCHECKS OFF} 17 | {$RANGECHECKS OFF} 18 | {$REFERENCEINFO ON} 19 | {$SAFEDIVIDE OFF} 20 | {$STACKFRAMES ON} 21 | {$TYPEDADDRESS OFF} 22 | {$VARSTRINGCHECKS ON} 23 | {$WRITEABLECONST OFF} 24 | {$MINENUMSIZE 1} 25 | {$IMAGEBASE $400000} 26 | {$DEFINE DEBUG} 27 | {$ENDIF IMPLICITBUILDING} 28 | {$DESCRIPTION 'RemObjects Pascal Script - RemObjects SDK Integration'} 29 | {$IMPLICITBUILD OFF} 30 | 31 | requires 32 | rtl, 33 | IndyCore, 34 | IndySystem, 35 | IndyProtocols, 36 | PascalScript_Core_D27, 37 | RemObjects_Server_D27, 38 | RemObjects_Indy_D27, 39 | dbrtl, 40 | vcl, 41 | vclx; 42 | 43 | contains 44 | PascalScript_RO_Reg in 'PascalScript_RO_Reg.pas', 45 | uROPSServerLink in 'uROPSServerLink.pas', 46 | uROPSImports in 'uROPSImports.pas'; 47 | 48 | end. 49 | -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D27.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/RemObjects SDK/PascalScript_RO_D27.res -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D28.dpk: -------------------------------------------------------------------------------- 1 | package PascalScript_RO_D28; 2 | 3 | {$R *.res} 4 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 5 | {$ALIGN 8} 6 | {$ASSERTIONS ON} 7 | {$BOOLEVAL OFF} 8 | {$DEBUGINFO ON} 9 | {$EXTENDEDSYNTAX ON} 10 | {$IMPORTEDDATA ON} 11 | {$IOCHECKS ON} 12 | {$LOCALSYMBOLS ON} 13 | {$LONGSTRINGS ON} 14 | {$OPENSTRINGS ON} 15 | {$OPTIMIZATION OFF} 16 | {$OVERFLOWCHECKS OFF} 17 | {$RANGECHECKS OFF} 18 | {$REFERENCEINFO ON} 19 | {$SAFEDIVIDE OFF} 20 | {$STACKFRAMES ON} 21 | {$TYPEDADDRESS OFF} 22 | {$VARSTRINGCHECKS ON} 23 | {$WRITEABLECONST OFF} 24 | {$MINENUMSIZE 1} 25 | {$IMAGEBASE $400000} 26 | {$DEFINE DEBUG} 27 | {$ENDIF IMPLICITBUILDING} 28 | {$DESCRIPTION 'RemObjects Pascal Script - RemObjects SDK Integration'} 29 | {$IMPLICITBUILD OFF} 30 | 31 | requires 32 | rtl, 33 | IndyCore, 34 | IndySystem, 35 | IndyProtocols, 36 | PascalScript_Core_D28, 37 | RemObjects_Server_D28, 38 | RemObjects_Indy_D28, 39 | dbrtl, 40 | vcl, 41 | vclx; 42 | 43 | contains 44 | PascalScript_RO_Reg in 'PascalScript_RO_Reg.pas', 45 | uROPSServerLink in 'uROPSServerLink.pas', 46 | uROPSImports in 'uROPSImports.pas'; 47 | 48 | end. 49 | -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D28.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/RemObjects SDK/PascalScript_RO_D28.res -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D29.dpk: -------------------------------------------------------------------------------- 1 | package PascalScript_RO_D29; 2 | 3 | {$R *.res} 4 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 5 | {$ALIGN 8} 6 | {$ASSERTIONS ON} 7 | {$BOOLEVAL OFF} 8 | {$DEBUGINFO ON} 9 | {$EXTENDEDSYNTAX ON} 10 | {$IMPORTEDDATA ON} 11 | {$IOCHECKS ON} 12 | {$LOCALSYMBOLS ON} 13 | {$LONGSTRINGS ON} 14 | {$OPENSTRINGS ON} 15 | {$OPTIMIZATION OFF} 16 | {$OVERFLOWCHECKS OFF} 17 | {$RANGECHECKS OFF} 18 | {$REFERENCEINFO ON} 19 | {$SAFEDIVIDE OFF} 20 | {$STACKFRAMES ON} 21 | {$TYPEDADDRESS OFF} 22 | {$VARSTRINGCHECKS ON} 23 | {$WRITEABLECONST OFF} 24 | {$MINENUMSIZE 1} 25 | {$IMAGEBASE $400000} 26 | {$DEFINE DEBUG} 27 | {$ENDIF IMPLICITBUILDING} 28 | {$DESCRIPTION 'RemObjects Pascal Script - RemObjects SDK Integration'} 29 | {$IMPLICITBUILD OFF} 30 | 31 | requires 32 | rtl, 33 | IndyCore, 34 | IndySystem, 35 | IndyProtocols, 36 | PascalScript_Core_D29, 37 | RemObjects_Server_D29, 38 | RemObjects_Indy_D29, 39 | dbrtl, 40 | vcl, 41 | vclx; 42 | 43 | contains 44 | PascalScript_RO_Reg in 'PascalScript_RO_Reg.pas', 45 | uROPSServerLink in 'uROPSServerLink.pas', 46 | uROPSImports in 'uROPSImports.pas'; 47 | 48 | end. 49 | -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D29.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/RemObjects SDK/PascalScript_RO_D29.res -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D6.dpk: -------------------------------------------------------------------------------- 1 | package PascalScript_RO_D6; 2 | 3 | {$R *.res} 4 | {$ALIGN 8} 5 | {$ASSERTIONS ON} 6 | {$BOOLEVAL OFF} 7 | {$DEBUGINFO ON} 8 | {$EXTENDEDSYNTAX ON} 9 | {$IMPORTEDDATA ON} 10 | {$IOCHECKS ON} 11 | {$LOCALSYMBOLS ON} 12 | {$LONGSTRINGS ON} 13 | {$OPENSTRINGS ON} 14 | {$OPTIMIZATION ON} 15 | {$OVERFLOWCHECKS OFF} 16 | {$RANGECHECKS OFF} 17 | {$REFERENCEINFO ON} 18 | {$SAFEDIVIDE OFF} 19 | {$STACKFRAMES ON} 20 | {$TYPEDADDRESS OFF} 21 | {$VARSTRINGCHECKS ON} 22 | {$WRITEABLECONST OFF} 23 | {$MINENUMSIZE 1} 24 | {$IMAGEBASE $400000} 25 | {$DESCRIPTION 'RemObjects Pascal Script - RemObjects SDK 4.0 Integration'} 26 | {$IMPLICITBUILD OFF} 27 | 28 | requires 29 | rtl, 30 | indy, 31 | PascalScript_Core_D6, 32 | RemObjects_Server_D6, 33 | RemObjects_Indy_D6, 34 | dbrtl, 35 | vcl, 36 | vclx; 37 | 38 | contains 39 | PascalScript_RO_Reg in 'PascalScript_RO_Reg.pas', 40 | uROPSServerLink in 'uROPSServerLink.pas', 41 | uROPSImports in 'uROPSImports.pas'; 42 | 43 | end. 44 | -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D6.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/RemObjects SDK/PascalScript_RO_D6.res -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D7.cfg: -------------------------------------------------------------------------------- 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 | -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; 29 | -H+ 30 | -W+ 31 | -M 32 | -$M16384,1048576 33 | -K$00400000 34 | -N"..\..\Dcu\D7" 35 | -LE"..\..\Dcu\D7" 36 | -LN"c:\program files\borland\delphi7\Projects\Bpl" 37 | -U"..\..\Dcu\D7" 38 | -O"..\..\Dcu\D7" 39 | -I"..\..\Dcu\D7" 40 | -R"..\..\Dcu\D7" 41 | -Z 42 | -w-SYMBOL_DEPRECATED 43 | -w-SYMBOL_LIBRARY 44 | -w-SYMBOL_PLATFORM 45 | -w-UNIT_LIBRARY 46 | -w-UNIT_PLATFORM 47 | -w-UNIT_DEPRECATED 48 | -w-UNSAFE_TYPE 49 | -w-UNSAFE_CODE 50 | -w-UNSAFE_CAST 51 | -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D7.dpk: -------------------------------------------------------------------------------- 1 | package PascalScript_RO_D7; 2 | 3 | {$R *.res} 4 | {$ALIGN 8} 5 | {$ASSERTIONS ON} 6 | {$BOOLEVAL OFF} 7 | {$DEBUGINFO ON} 8 | {$EXTENDEDSYNTAX ON} 9 | {$IMPORTEDDATA ON} 10 | {$IOCHECKS ON} 11 | {$LOCALSYMBOLS ON} 12 | {$LONGSTRINGS ON} 13 | {$OPENSTRINGS ON} 14 | {$OPTIMIZATION ON} 15 | {$OVERFLOWCHECKS OFF} 16 | {$RANGECHECKS OFF} 17 | {$REFERENCEINFO ON} 18 | {$SAFEDIVIDE OFF} 19 | {$STACKFRAMES ON} 20 | {$TYPEDADDRESS OFF} 21 | {$VARSTRINGCHECKS ON} 22 | {$WRITEABLECONST OFF} 23 | {$MINENUMSIZE 1} 24 | {$IMAGEBASE $400000} 25 | {$DESCRIPTION 'RemObjects Pascal Script - RemObjects SDK 4.0 Integration'} 26 | {$IMPLICITBUILD OFF} 27 | 28 | requires 29 | rtl, 30 | indy, 31 | PascalScript_Core_D7, 32 | RemObjects_Server_D7, 33 | RemObjects_Indy_D7, 34 | dbrtl, 35 | vcl, 36 | vclx; 37 | 38 | contains 39 | PascalScript_RO_Reg in 'PascalScript_RO_Reg.pas', 40 | uROPSServerLink in 'uROPSServerLink.pas', 41 | uROPSImports in 'uROPSImports.pas'; 42 | 43 | end. 44 | -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D7.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/RemObjects SDK/PascalScript_RO_D7.res -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D9.cfg: -------------------------------------------------------------------------------- 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 | -N"..\..\Dcu\D9" 34 | -LE"..\..\Dcu\D9" 35 | -LN"\\Lucien\personal\mh\My Documents\Borland Studio Projects\Bpl" 36 | -U"..\..\Dcu\D9;c:\program files\borland\bds\3.0\lib\Indy9;..\..\RemObjects SDK for Dephi\Dcu\D9" 37 | -O"..\..\Dcu\D9;c:\program files\borland\bds\3.0\lib\Indy9;..\..\RemObjects SDK for Dephi\Dcu\D9" 38 | -I"..\..\Dcu\D9;c:\program files\borland\bds\3.0\lib\Indy9;..\..\RemObjects SDK for Dephi\Dcu\D9" 39 | -R"..\..\Dcu\D9;c:\program files\borland\bds\3.0\lib\Indy9;..\..\RemObjects SDK for Dephi\Dcu\D9" 40 | -Z 41 | -w-SYMBOL_DEPRECATED 42 | -w-SYMBOL_LIBRARY 43 | -w-SYMBOL_PLATFORM 44 | -w-SYMBOL_EXPERIMENTAL 45 | -w-UNIT_LIBRARY 46 | -w-UNIT_PLATFORM 47 | -w-UNIT_DEPRECATED 48 | -w-UNIT_EXPERIMENTAL 49 | -w-UNSAFE_TYPE 50 | -w-UNSAFE_CODE 51 | -w-UNSAFE_CAST 52 | -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D9.dpk: -------------------------------------------------------------------------------- 1 | package PascalScript_RO_D9; 2 | 3 | {$R *.res} 4 | {$ALIGN 8} 5 | {$ASSERTIONS ON} 6 | {$BOOLEVAL OFF} 7 | {$DEBUGINFO ON} 8 | {$EXTENDEDSYNTAX ON} 9 | {$IMPORTEDDATA ON} 10 | {$IOCHECKS ON} 11 | {$LOCALSYMBOLS ON} 12 | {$LONGSTRINGS ON} 13 | {$OPENSTRINGS ON} 14 | {$OPTIMIZATION ON} 15 | {$OVERFLOWCHECKS OFF} 16 | {$RANGECHECKS OFF} 17 | {$REFERENCEINFO ON} 18 | {$SAFEDIVIDE OFF} 19 | {$STACKFRAMES ON} 20 | {$TYPEDADDRESS OFF} 21 | {$VARSTRINGCHECKS ON} 22 | {$WRITEABLECONST OFF} 23 | {$MINENUMSIZE 1} 24 | {$IMAGEBASE $400000} 25 | {$DESCRIPTION 'RemObjects Pascal Script - RemObjects SDK 4.0 Integration'} 26 | {$IMPLICITBUILD OFF} 27 | 28 | requires 29 | rtl, 30 | {$IFDEF RemObjects_INDY9} 31 | Indy, 32 | {$ELSE} 33 | IndyCore, IndySystem, IndyProtocols, 34 | {$ENDIF} 35 | PascalScript_Core_D9, 36 | RemObjects_Server_D9, 37 | RemObjects_Indy_D9, 38 | dbrtl, 39 | vcl, 40 | vclx; 41 | 42 | contains 43 | PascalScript_RO_Reg in 'PascalScript_RO_Reg.pas', 44 | uROPSServerLink in 'uROPSServerLink.pas', 45 | uROPSImports in 'uROPSImports.pas'; 46 | 47 | end. 48 | -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_D9.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/RemObjects SDK/PascalScript_RO_D9.res -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_Glyphs.RES: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Addon/RemObjects SDK/PascalScript_RO_Glyphs.RES -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_Glyphs.rc: -------------------------------------------------------------------------------- 1 | TPSRemObjectsSdkPlugin BITMAP DISCARDABLE "Glyphs\TPSRemObjectsSdkPlugin.bmp" 2 | -------------------------------------------------------------------------------- /Addon/RemObjects SDK/PascalScript_RO_Reg.pas: -------------------------------------------------------------------------------- 1 | unit PascalScript_RO_Reg; 2 | 3 | {----------------------------------------------------------------------------} 4 | { RemObjects Pascal Script 5 | { 6 | { compiler: Delphi 2 and up, Kylix 3 and up 7 | { platform: Win32, Linux 8 | { 9 | { (c)opyright RemObjects Software. all rights reserved. 10 | { 11 | { Using this code requires a valid license of Pascal Script 12 | { which can be obtained at http://www.remobjects.com. 13 | {----------------------------------------------------------------------------} 14 | 15 | interface 16 | 17 | {$R PascalScript_RO_Glyphs.res} 18 | 19 | procedure Register; 20 | 21 | implementation 22 | 23 | uses 24 | Classes, 25 | uROPSServerLink; 26 | 27 | procedure Register; 28 | begin 29 | RegisterComponents('Pascal Script', [TPSRemObjectsSdkPlugin]); 30 | end; 31 | 32 | end. 33 | -------------------------------------------------------------------------------- /Articles/Using Classes with RemObjects PascalScript/Images_-1C72A37E-60C1-4D71-91D1-844140034A07-.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Articles/Using Classes with RemObjects PascalScript/Images_-1C72A37E-60C1-4D71-91D1-844140034A07-.png -------------------------------------------------------------------------------- /Articles/Using Classes with RemObjects PascalScript/Images_-46D0599E-8750-448E-ACE1-D71968B4EAF9-.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Articles/Using Classes with RemObjects PascalScript/Images_-46D0599E-8750-448E-ACE1-D71968B4EAF9-.png -------------------------------------------------------------------------------- /Articles/Using Classes with RemObjects PascalScript/Images_-787B7711-2BF3-41AA-8E56-91D63344D5E0-.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Articles/Using Classes with RemObjects PascalScript/Images_-787B7711-2BF3-41AA-8E56-91D63344D5E0-.png -------------------------------------------------------------------------------- /Articles/Using Classes with RemObjects PascalScript/Images_-8821D7ED-4999-4343-A0BB-7822BCD292D5-.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Articles/Using Classes with RemObjects PascalScript/Images_-8821D7ED-4999-4343-A0BB-7822BCD292D5-.png -------------------------------------------------------------------------------- /Articles/Using Classes with RemObjects PascalScript/Images_-B70E9BCC-4513-4133-A790-DE8246179CAD-.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Articles/Using Classes with RemObjects PascalScript/Images_-B70E9BCC-4513-4133-A790-DE8246179CAD-.png -------------------------------------------------------------------------------- /Articles/Using Classes with RemObjects PascalScript/Images_-E3CBD245-D791-406D-820D-CC1F9C9CA125-.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Articles/Using Classes with RemObjects PascalScript/Images_-E3CBD245-D791-406D-820D-CC1F9C9CA125-.png -------------------------------------------------------------------------------- /Articles/Using Classes with RemObjects PascalScript/Images_-EA8FCBEF-97D4-47B2-8140-74761B71A83F-.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Articles/Using Classes with RemObjects PascalScript/Images_-EA8FCBEF-97D4-47B2-8140-74761B71A83F-.png -------------------------------------------------------------------------------- /Articles/Using Classes with RemObjects PascalScript/Images_-F65AD44E-8A42-4A47-A9A4-B329D0DF4CD3-.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Articles/Using Classes with RemObjects PascalScript/Images_-F65AD44E-8A42-4A47-A9A4-B329D0DF4CD3-.png -------------------------------------------------------------------------------- /Articles/Using Classes with RemObjects PascalScript/Images_-FEAD5D0B-5E5F-48C4-9D4F-AA44EB5FD131-.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Articles/Using Classes with RemObjects PascalScript/Images_-FEAD5D0B-5E5F-48C4-9D4F-AA44EB5FD131-.png -------------------------------------------------------------------------------- /Articles/Using RemObjects Pascal Script/Images_-2BDBA214-FEF1-4A54-AA23-93F70EE217C9-.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Articles/Using RemObjects Pascal Script/Images_-2BDBA214-FEF1-4A54-AA23-93F70EE217C9-.png -------------------------------------------------------------------------------- /Articles/Using RemObjects Pascal Script/Images_-437262DA-CA48-473A-8890-2161A932852F-.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Articles/Using RemObjects Pascal Script/Images_-437262DA-CA48-473A-8890-2161A932852F-.png -------------------------------------------------------------------------------- /Articles/Using RemObjects Pascal Script/Images_-7331DD6C-58D8-40D3-8BCC-D65E975EC424-.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Articles/Using RemObjects Pascal Script/Images_-7331DD6C-58D8-40D3-8BCC-D65E975EC424-.png -------------------------------------------------------------------------------- /Articles/Using RemObjects Pascal Script/Images_-7AEF4D36-18ED-4465-B887-4C9665DDBE0C-.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Articles/Using RemObjects Pascal Script/Images_-7AEF4D36-18ED-4465-B887-4C9665DDBE0C-.png -------------------------------------------------------------------------------- /Articles/Using RemObjects Pascal Script/Images_-A8439C86-1330-42FE-944F-31BD046504D1-.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Articles/Using RemObjects Pascal Script/Images_-A8439C86-1330-42FE-944F-31BD046504D1-.png -------------------------------------------------------------------------------- /Articles/Using RemObjects Pascal Script/Images_-C3B60367-A372-4053-942E-A9220AE2F7DA-.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Articles/Using RemObjects Pascal Script/Images_-C3B60367-A372-4053-942E-A9220AE2F7DA-.png -------------------------------------------------------------------------------- /Articles/Using RemObjects Pascal Script/Images_-C914388E-AAF5-4E0C-90B0-6568433352F2-.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Articles/Using RemObjects Pascal Script/Images_-C914388E-AAF5-4E0C-90B0-6568433352F2-.png -------------------------------------------------------------------------------- /Articles/Using RemObjects Pascal Script/Images_-CCEE9133-9036-4715-87A1-FC47B9AADC00-.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Articles/Using RemObjects Pascal Script/Images_-CCEE9133-9036-4715-87A1-FC47B9AADC00-.png -------------------------------------------------------------------------------- /LICENSE.md: -------------------------------------------------------------------------------- 1 | # RemObjects Pascal Script 2 | Created By Carlo Kok 3 | ck@remobjects.com 4 | 5 | Copyright (C) 2000-2014 by Carlo Kok and RemObjects Software, LLC 6 | 7 | This software is provided 'as-is', without any expressed or implied warranty. In no event will the author be held liable for any damages arising from the use of this software. 8 | Permission is granted to anyone to use this software for any kind of application, and to alter it and redistribute it freely, subject to the following restrictions: 9 | 10 | 1. The origin of this software must not be misrepresented, you must not claim that you wrote the original software. 11 | 2. Altered source versions must be plainly marked as such, and must not be misrepresented as being the original software. 12 | 3. You must have a visible line in your programs aboutbox or documentation that it is made using RemObjects Pascal Script and where RemObjects Pascal Script can be found. 13 | 4. This notice may not be removed or altered from any source distribution. 14 | 15 | If you have any questions concerning this license contact info@remobjects.com 16 | 17 | Carlo Kok, RemObjects Software 18 | 19 | -------------------------------------------------------------------------------- /Pascal Script.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Pascal Script.ico -------------------------------------------------------------------------------- /Readme ARM.txt: -------------------------------------------------------------------------------- 1 | arm EABI/EABIHF port of pascalscript. 2 | 3 | Changes: 4 | * Implement aligned passing of 64-bit parameters for EABI/EABIHF. 5 | * Implement passing of floating point parameters in vfp registers for EABIHF 6 | * Rewrite return value handling to avoid passing pointers to unsafe stack 7 | space. 8 | * Use constref on parameters to assembler to ensure passing by reference 9 | 10 | Todo/issues: 11 | * Only lightly tested, far more testing needed. 12 | * Only EABIHF has been tested so far 13 | * Handling of floating point return types needs implementing for old abi 14 | FPA (the usual variant of old ABI). 15 | * String return code looks dubious, may leak memory. Testing needed. 16 | * Dynamic array return code was not reimplemented in the new return 17 | value handling. The old code doesn't look like it ever worked. 18 | -------------------------------------------------------------------------------- /Samples/Console/sample1.dpr: -------------------------------------------------------------------------------- 1 | program sample1; 2 | 3 | uses 4 | uPSCompiler, uPSRuntime; 5 | 6 | function ScriptOnUses(Sender: TPSPascalCompiler; const Name: AnsiString): Boolean; 7 | { the OnUses callback function is called for each "uses" in the script. 8 | It's always called with the parameter 'SYSTEM' at the top of the script. 9 | For example: uses ii1, ii2; 10 | This will call this function 3 times. First with 'SYSTEM' then 'II1' and then 'II2'. 11 | } 12 | begin 13 | if Name = 'SYSTEM' then 14 | begin 15 | Result := True; 16 | end else 17 | Result := False; 18 | end; 19 | 20 | procedure ExecuteScript(const Script: string); 21 | var 22 | Compiler: TPSPascalCompiler; 23 | { TPSPascalCompiler is the compiler part of the scriptengine. This will 24 | translate a Pascal script into a compiled form the executer understands. } 25 | Exec: TPSExec; 26 | { TPSExec is the executer part of the scriptengine. It uses the output of 27 | the compiler to run a script. } 28 | Data: AnsiString; 29 | begin 30 | Compiler := TPSPascalCompiler.Create; // create an instance of the compiler. 31 | Compiler.OnUses := ScriptOnUses; // assign the OnUses event. 32 | if not Compiler.Compile(Script) then // Compile the Pascal script into bytecode. 33 | begin 34 | Compiler.Free; 35 | // You could raise an exception here. 36 | Exit; 37 | end; 38 | 39 | Compiler.GetOutput(Data); // Save the output of the compiler in the string Data. 40 | Compiler.Free; // After compiling the script, there is no need for the compiler anymore. 41 | 42 | Exec := TPSExec.Create; // Create an instance of the executer. 43 | if not Exec.LoadData(Data) then // Load the data from the Data string. 44 | begin 45 | { For some reason the script could not be loaded. This is usually the case when a 46 | library that has been used at compile time isn't registered at runtime. } 47 | Exec.Free; 48 | // You could raise an exception here. 49 | Exit; 50 | end; 51 | 52 | Exec.RunScript; // Run the script. 53 | Exec.Free; // Free the executer. 54 | end; 55 | 56 | const 57 | Script = 'var s: string; begin s := ''Test''; S := s + ''ing;''; end.'; 58 | 59 | begin 60 | ExecuteScript(Script); 61 | end. 62 | -------------------------------------------------------------------------------- /Samples/Debug/dlgConfirmReplace.dfm: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Samples/Debug/dlgConfirmReplace.dfm -------------------------------------------------------------------------------- /Samples/Debug/dlgReplaceText.dfm: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Samples/Debug/dlgReplaceText.dfm -------------------------------------------------------------------------------- /Samples/Debug/dlgSearchText.dfm: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Samples/Debug/dlgSearchText.dfm -------------------------------------------------------------------------------- /Samples/Debug/ide.dpr: -------------------------------------------------------------------------------- 1 | program ide; 2 | 3 | uses 4 | Forms, 5 | ide_editor in 'ide_editor.pas' {editor}, 6 | ide_debugoutput in 'ide_debugoutput.pas' {debugoutput}, 7 | uFrmGotoLine in 'uFrmGotoLine.pas' {frmGotoLine}, 8 | dlgSearchText in 'dlgSearchText.pas' {TextSearchDialog}, 9 | dlgConfirmReplace in 'dlgConfirmReplace.pas' {ConfirmReplaceDialog}, 10 | dlgReplaceText in 'dlgReplaceText.pas' {TextReplaceDialog}; 11 | 12 | {$R *.res} 13 | 14 | begin 15 | Application.Initialize; 16 | Application.CreateForm(Teditor, editor); 17 | Application.CreateForm(Tdebugoutput, debugoutput); 18 | Application.CreateForm(TfrmGotoLine, frmGotoLine); 19 | Application.CreateForm(TConfirmReplaceDialog, ConfirmReplaceDialog); 20 | Application.Run; 21 | end. 22 | -------------------------------------------------------------------------------- /Samples/Debug/ide.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Samples/Debug/ide.res -------------------------------------------------------------------------------- /Samples/Debug/ide_debugoutput.dfm: -------------------------------------------------------------------------------- 1 | object debugoutput: Tdebugoutput 2 | Left = 192 3 | Top = 107 4 | Width = 530 5 | Height = 366 6 | Caption = 'Debug Output' 7 | Color = clBtnFace 8 | Font.Charset = DEFAULT_CHARSET 9 | Font.Color = clWindowText 10 | Font.Height = -11 11 | Font.Name = 'MS Sans Serif' 12 | Font.Style = [] 13 | OldCreateOrder = False 14 | PixelsPerInch = 96 15 | TextHeight = 13 16 | object output: TMemo 17 | Left = 0 18 | Top = 0 19 | Width = 522 20 | Height = 339 21 | Align = alClient 22 | ReadOnly = True 23 | ScrollBars = ssBoth 24 | TabOrder = 0 25 | WordWrap = False 26 | end 27 | end 28 | -------------------------------------------------------------------------------- /Samples/Debug/ide_debugoutput.pas: -------------------------------------------------------------------------------- 1 | unit ide_debugoutput; 2 | 3 | interface 4 | 5 | uses 6 | Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, 7 | Dialogs, StdCtrls; 8 | 9 | type 10 | Tdebugoutput = class(TForm) 11 | output: TMemo; 12 | private 13 | public 14 | protected 15 | procedure CreateParams(var Params: TCreateParams); override; 16 | end; 17 | 18 | var 19 | debugoutput: Tdebugoutput; 20 | 21 | implementation 22 | 23 | {$R *.dfm} 24 | 25 | { Tdebugoutput } 26 | 27 | procedure Tdebugoutput.CreateParams(var Params: TCreateParams); 28 | begin 29 | inherited CreateParams(Params); 30 | Params.ExStyle := Params.ExStyle or WS_EX_APPWINDOW; 31 | end; 32 | 33 | end. 34 | -------------------------------------------------------------------------------- /Samples/Debug/readme.txt: -------------------------------------------------------------------------------- 1 | This demo requires SynEdit (http://synedit.sf.net) to compile. -------------------------------------------------------------------------------- /Samples/Debug/uFrmGotoLine.dfm: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Samples/Debug/uFrmGotoLine.dfm -------------------------------------------------------------------------------- /Samples/Debug/uFrmGotoLine.pas: -------------------------------------------------------------------------------- 1 | unit uFrmGotoLine; 2 | 3 | interface 4 | 5 | uses 6 | Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, 7 | Dialogs, StdCtrls, SynEditTypes; 8 | 9 | type 10 | TfrmGotoLine = class(TForm) 11 | edtCharNumber: TEdit; 12 | edtLineNumber: TEdit; 13 | Button1: TButton; 14 | btnGoto: TButton; 15 | lblLineNumber: TLabel; 16 | lblCharNumber: TLabel; 17 | procedure FormShow(Sender: TObject); 18 | private 19 | function GetCaret: TBufferCoord; 20 | procedure SetCaret(const Value: TBufferCoord); 21 | procedure SetChar(const Value: Integer); 22 | procedure SetLine(const Value: Integer); 23 | function GetChar: Integer; 24 | function GetLine: Integer; 25 | { Private declarations } 26 | public 27 | { Public declarations } 28 | property Char : Integer read GetChar write SetChar; 29 | property Line : Integer read GetLine write setLine; 30 | property CaretXY:TBufferCoord read GetCaret write SetCaret; 31 | end; 32 | 33 | var 34 | frmGotoLine: TfrmGotoLine; 35 | 36 | implementation 37 | 38 | {$R *.dfm} 39 | 40 | { TfrmGotoLine } 41 | 42 | function TfrmGotoLine.GetCaret: TBufferCoord; 43 | begin 44 | Result.Char := StrToInt(edtCharNumber.Text); 45 | Result.Line := StrToInt(edtLineNumber.Text); 46 | end; 47 | 48 | function TfrmGotoLine.GetChar: Integer; 49 | begin 50 | Result := StrToInt(edtCharNumber.Text) 51 | end; 52 | 53 | function TfrmGotoLine.GetLine: Integer; 54 | begin 55 | Result := StrToInt(edtLineNumber.Text) 56 | end; 57 | 58 | procedure TfrmGotoLine.SetCaret(const Value: TBufferCoord); 59 | begin 60 | edtCharNumber.Text := IntToStr(Value.Char); 61 | edtLineNumber.Text := IntToStr(Value.Line); 62 | end; 63 | 64 | procedure TfrmGotoLine.SetChar(const Value: Integer); 65 | begin 66 | edtCharNumber.Text := IntToStr(Value); 67 | end; 68 | 69 | procedure TfrmGotoLine.SetLine(const Value: Integer); 70 | begin 71 | edtLineNumber.Text := IntToStr(Value); 72 | end; 73 | 74 | procedure TfrmGotoLine.FormShow(Sender: TObject); 75 | begin 76 | edtLineNumber.SetFocus; 77 | end; 78 | 79 | end. 80 | -------------------------------------------------------------------------------- /Samples/IDE/dlgConfirmReplace.dfm: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Samples/IDE/dlgConfirmReplace.dfm -------------------------------------------------------------------------------- /Samples/IDE/dlgReplaceText.dfm: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Samples/IDE/dlgReplaceText.dfm -------------------------------------------------------------------------------- /Samples/IDE/dlgSearchText.dfm: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Samples/IDE/dlgSearchText.dfm -------------------------------------------------------------------------------- /Samples/IDE/ide.dpr: -------------------------------------------------------------------------------- 1 | program ide; 2 | 3 | uses 4 | Forms, 5 | ide_editor in 'ide_editor.pas' {editor}, 6 | ide_debugoutput in 'ide_debugoutput.pas' {debugoutput}, 7 | uFrmGotoLine in 'uFrmGotoLine.pas' {frmGotoLine}, 8 | dlgSearchText in 'dlgSearchText.pas' {TextSearchDialog}, 9 | dlgConfirmReplace in 'dlgConfirmReplace.pas' {ConfirmReplaceDialog}, 10 | dlgReplaceText in 'dlgReplaceText.pas' {TextReplaceDialog}; 11 | 12 | {$R *.res} 13 | 14 | begin 15 | Application.Initialize; 16 | Application.CreateForm(Teditor, editor); 17 | Application.CreateForm(Tdebugoutput, debugoutput); 18 | Application.CreateForm(TfrmGotoLine, frmGotoLine); 19 | Application.CreateForm(TConfirmReplaceDialog, ConfirmReplaceDialog); 20 | Application.Run; 21 | end. 22 | -------------------------------------------------------------------------------- /Samples/IDE/ide.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Samples/IDE/ide.res -------------------------------------------------------------------------------- /Samples/IDE/ide_debugoutput.dfm: -------------------------------------------------------------------------------- 1 | object debugoutput: Tdebugoutput 2 | Left = 192 3 | Top = 107 4 | Width = 530 5 | Height = 366 6 | Caption = 'Debug Output' 7 | Color = clBtnFace 8 | Font.Charset = DEFAULT_CHARSET 9 | Font.Color = clWindowText 10 | Font.Height = -11 11 | Font.Name = 'MS Sans Serif' 12 | Font.Style = [] 13 | OldCreateOrder = False 14 | PixelsPerInch = 96 15 | TextHeight = 13 16 | object output: TMemo 17 | Left = 0 18 | Top = 0 19 | Width = 522 20 | Height = 339 21 | Align = alClient 22 | ReadOnly = True 23 | ScrollBars = ssBoth 24 | TabOrder = 0 25 | WordWrap = False 26 | end 27 | end 28 | -------------------------------------------------------------------------------- /Samples/IDE/ide_debugoutput.pas: -------------------------------------------------------------------------------- 1 | unit ide_debugoutput; 2 | 3 | interface 4 | 5 | uses 6 | Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, 7 | Dialogs, StdCtrls; 8 | 9 | type 10 | Tdebugoutput = class(TForm) 11 | output: TMemo; 12 | private 13 | public 14 | protected 15 | procedure CreateParams(var Params: TCreateParams); override; 16 | end; 17 | 18 | var 19 | debugoutput: Tdebugoutput; 20 | 21 | implementation 22 | 23 | {$R *.dfm} 24 | 25 | { Tdebugoutput } 26 | 27 | procedure Tdebugoutput.CreateParams(var Params: TCreateParams); 28 | begin 29 | inherited CreateParams(Params); 30 | Params.ExStyle := Params.ExStyle or WS_EX_APPWINDOW; 31 | end; 32 | 33 | end. 34 | -------------------------------------------------------------------------------- /Samples/IDE/readme.txt: -------------------------------------------------------------------------------- 1 | This demo requires SynEdit (http://synedit.sf.net) to compile. -------------------------------------------------------------------------------- /Samples/IDE/uFrmGotoLine.dfm: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Samples/IDE/uFrmGotoLine.dfm -------------------------------------------------------------------------------- /Samples/IDE/uFrmGotoLine.pas: -------------------------------------------------------------------------------- 1 | unit uFrmGotoLine; 2 | 3 | interface 4 | 5 | uses 6 | Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, 7 | Dialogs, StdCtrls, SynEditTypes; 8 | 9 | type 10 | TfrmGotoLine = class(TForm) 11 | edtCharNumber: TEdit; 12 | edtLineNumber: TEdit; 13 | Button1: TButton; 14 | btnGoto: TButton; 15 | lblLineNumber: TLabel; 16 | lblCharNumber: TLabel; 17 | procedure FormShow(Sender: TObject); 18 | private 19 | function GetCaret: TBufferCoord; 20 | procedure SetCaret(const Value: TBufferCoord); 21 | procedure SetChar(const Value: Integer); 22 | procedure SetLine(const Value: Integer); 23 | function GetChar: Integer; 24 | function GetLine: Integer; 25 | { Private declarations } 26 | public 27 | { Public declarations } 28 | property Char : Integer read GetChar write SetChar; 29 | property Line : Integer read GetLine write setLine; 30 | property CaretXY:TBufferCoord read GetCaret write SetCaret; 31 | end; 32 | 33 | var 34 | frmGotoLine: TfrmGotoLine; 35 | 36 | implementation 37 | 38 | {$R *.dfm} 39 | 40 | { TfrmGotoLine } 41 | 42 | function TfrmGotoLine.GetCaret: TBufferCoord; 43 | begin 44 | Result.Char := StrToInt(edtCharNumber.Text); 45 | Result.Line := StrToInt(edtLineNumber.Text); 46 | end; 47 | 48 | function TfrmGotoLine.GetChar: Integer; 49 | begin 50 | Result := StrToInt(edtCharNumber.Text) 51 | end; 52 | 53 | function TfrmGotoLine.GetLine: Integer; 54 | begin 55 | Result := StrToInt(edtLineNumber.Text) 56 | end; 57 | 58 | procedure TfrmGotoLine.SetCaret(const Value: TBufferCoord); 59 | begin 60 | edtCharNumber.Text := IntToStr(Value.Char); 61 | edtLineNumber.Text := IntToStr(Value.Line); 62 | end; 63 | 64 | procedure TfrmGotoLine.SetChar(const Value: Integer); 65 | begin 66 | edtCharNumber.Text := IntToStr(Value); 67 | end; 68 | 69 | procedure TfrmGotoLine.SetLine(const Value: Integer); 70 | begin 71 | edtLineNumber.Text := IntToStr(Value); 72 | end; 73 | 74 | procedure TfrmGotoLine.FormShow(Sender: TObject); 75 | begin 76 | edtLineNumber.SetFocus; 77 | end; 78 | 79 | end. 80 | -------------------------------------------------------------------------------- /Samples/Import/Import.dpr: -------------------------------------------------------------------------------- 1 | program Import; 2 | 3 | uses 4 | Forms, 5 | fMain in 'fMain.pas' {MainForm}, 6 | fDwin in 'fDwin.pas' {dwin}; 7 | 8 | {$R *.RES} 9 | 10 | begin 11 | Application.Initialize; 12 | Application.Title := 'Import Sample'; 13 | Application.CreateForm(TMainForm, MainForm); 14 | Application.CreateForm(Tdwin, dwin); 15 | Application.Run; 16 | end. 17 | 18 | -------------------------------------------------------------------------------- /Samples/Import/Import.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Samples/Import/Import.res -------------------------------------------------------------------------------- /Samples/Import/arraytest.rops: -------------------------------------------------------------------------------- 1 | Program IFSTest; 2 | type 3 | TArrayOfByte = array of byte; 4 | 5 | procedure Test(x: TARrayOfByte); 6 | var 7 | i: Integer; 8 | begin 9 | for i := 0 to Getarraylength(X) -1 do 10 | begin 11 | writeln(inttostr(x[i])); 12 | end; 13 | end; 14 | var 15 | temp: TArrayOfByte; 16 | 17 | Begin 18 | setarraylength(temp, 2); 19 | temp[0] := 1; 20 | temp[1] :=23; 21 | test(temp); 22 | End. 23 | -------------------------------------------------------------------------------- /Samples/Import/booleantest.rops: -------------------------------------------------------------------------------- 1 | Program IFSTest; 2 | var 3 | x1, x2: integer; 4 | b: boolean; 5 | Begin 6 | x1 := 2; 7 | x2 := 2; 8 | b := x1 = x2; 9 | if b then begin writeln('true'); end else begin writeln('false');end; 10 | x1 := 2; 11 | x2 := 4; 12 | b := x1 = x2; 13 | if b then begin writeln('true'); end else begin writeln('false');end; 14 | writeln('done'); 15 | End. -------------------------------------------------------------------------------- /Samples/Import/bytearray.rops: -------------------------------------------------------------------------------- 1 | Program IFSTest; 2 | type 3 | TByteArray = array of byte; 4 | var 5 | x: TByteARray; 6 | Begin 7 | try 8 | x[0] := 1; 9 | // will cause an runtime error (Out Of Record Fields Range) 10 | writeln('Not supposed to be here'); 11 | except 12 | Writeln('Error, which is ok since we accessed a field outside it''s bounds'); 13 | end; 14 | End. -------------------------------------------------------------------------------- /Samples/Import/casetest.rops: -------------------------------------------------------------------------------- 1 | Program IFSTest; 2 | var 3 | b: Byte; 4 | Begin 5 | for b := 0 to 2 do begin 6 | case b of 7 | 0: writeln('0'); 8 | 1: writeln('1'); 9 | else writeln('>1'); 10 | end; 11 | end; 12 | End. -------------------------------------------------------------------------------- /Samples/Import/dlltest.rops: -------------------------------------------------------------------------------- 1 | Program IFSTest; 2 | // compile the demo application, minimize delphi and run this. 3 | function FindWindow(C1, C2: PChar): Longint; external 'FindWindowA@user32.dll stdcall'; 4 | function ShowWindow(hWnd, nCmdShow: Longint): Integer; external 'ShowWindow@user32.dll stdcall'; 5 | function SetWindowText(hWnd: Longint; Text: PChar): Longint; external 'SetWindowTextA@user32.dll stdcall'; 6 | var 7 | i: Longint; 8 | wnd: Longint; 9 | Begin 10 | wnd := Findwindow('', 'Innerfuse Pascal Script III'); 11 | SetWindowText(Wnd, 'This is DLL demo, it calls some windows user32 routines. This will hide this window for a few seconds'); 12 | for i := 0 to 200000 do begin end; 13 | ShowWindow(Wnd, 0); // hide it 14 | for i := 0 to 200000 do begin end; 15 | SetWindowText(Wnd, 'Wasn''t that nice?'); 16 | ShowWindow(Wnd, 5); // show it 17 | for i := 0 to 200000 do begin end; 18 | SetWindowText(Wnd, 'Innerfuse Pascal Script III'); 19 | End. 20 | -------------------------------------------------------------------------------- /Samples/Import/exc.ROPS: -------------------------------------------------------------------------------- 1 | Program test; 2 | var 3 | I: Integer; 4 | begin 5 | try 6 | I := I div 0; 7 | except 8 | try 9 | except 10 | end; 11 | Writeln('SHOULD GET HERE'); 12 | end; 13 | end. 14 | -------------------------------------------------------------------------------- /Samples/Import/exittest.rops: -------------------------------------------------------------------------------- 1 | Program IFSTest; 2 | procedure test; 3 | begin 4 | writeln('1'); 5 | exit; 6 | writeln('2'); 7 | end; 8 | Begin 9 | test; 10 | writeln('3'); 11 | exit; 12 | writeln('4'); 13 | 14 | End. -------------------------------------------------------------------------------- /Samples/Import/fDwin.dfm: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Samples/Import/fDwin.dfm -------------------------------------------------------------------------------- /Samples/Import/fDwin.pas: -------------------------------------------------------------------------------- 1 | unit fDwin; 2 | 3 | interface 4 | 5 | uses 6 | Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, 7 | ExtCtrls, StdCtrls; 8 | 9 | type 10 | Tdwin = class(TForm) 11 | Memo1: TMemo; 12 | Panel1: TPanel; 13 | Button1: TButton; 14 | private 15 | { Private declarations } 16 | public 17 | { Public declarations } 18 | end; 19 | 20 | var 21 | dwin: Tdwin; 22 | 23 | implementation 24 | 25 | {$R *.dfm} 26 | 27 | end. 28 | -------------------------------------------------------------------------------- /Samples/Import/fMain.dfm: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Samples/Import/fMain.dfm -------------------------------------------------------------------------------- /Samples/Import/fortest.rops: -------------------------------------------------------------------------------- 1 | Program IFSTest; 2 | var 3 | i: Longint; 4 | Begin 5 | for i := 0 to 9 do 6 | begin 7 | writeln('hello'+inttostr(i)); 8 | end; 9 | End. 10 | -------------------------------------------------------------------------------- /Samples/Import/if.rops: -------------------------------------------------------------------------------- 1 | Program IFSTest; 2 | var 3 | a: boolean; 4 | Begin 5 | a := true; 6 | if a then begin ;end else 7 | if a then begin ;end else; 8 | writeln('5'); 9 | End. -------------------------------------------------------------------------------- /Samples/Import/importtest.rops: -------------------------------------------------------------------------------- 1 | Program IFSTest; 2 | var 3 | a,b :string; 4 | Begin 5 | a := 'test: '; 6 | b := ImportTest('1', 2, 3, 4, a); 7 | writeln(b); 8 | writeln(a); 9 | { 10 | Output should be: 11 | 12 | 1 2 3 4 - OK! 13 | 1 2 3 4 - OK! - OK2! 14 | 15 | } 16 | End. -------------------------------------------------------------------------------- /Samples/Import/longfortest.rops: -------------------------------------------------------------------------------- 1 | Program IFSTest; 2 | var 3 | i, i2: Longint; 4 | Begin 5 | for i := 0 to 1000000 do 6 | begin 7 | i2 := i -1; 8 | end; 9 | writeln(inttostr(i2)); 10 | End. -------------------------------------------------------------------------------- /Samples/Import/rectest.rops: -------------------------------------------------------------------------------- 1 | Program IFSTest; 2 | type 3 | TMyRec = record a: Integer; b: string; end; 4 | var 5 | s: TMyRec; 6 | Begin 7 | s.a := 1234; 8 | s.b := 'abc'; 9 | writeln(s.b); 10 | writeln(inttostr(s.a)); 11 | End. -------------------------------------------------------------------------------- /Samples/Import/stringtest.rops: -------------------------------------------------------------------------------- 1 | Program test; 2 | var s: string; 3 | begin 4 | s:='123456789'; 5 | s[1]:=s[2]; 6 | writeln(s); 7 | end. 8 | 9 | -------------------------------------------------------------------------------- /Samples/Import/t1.rops: -------------------------------------------------------------------------------- 1 | Program test; 2 | var 3 | i: Longint; 4 | begin 5 | writeln('Really simple test'); 6 | end. 7 | -------------------------------------------------------------------------------- /Samples/Import/t10.rops: -------------------------------------------------------------------------------- 1 | Program test; 2 | begin 3 | writeln('1'); 4 | try 5 | writeln('2'); 6 | raiseexception(erCustomError, 'TEST EXCEPTION'); 7 | writeln('3'); 8 | finally 9 | writeln('4'); 10 | end; 11 | writeln('5'); 12 | end. 13 | -------------------------------------------------------------------------------- /Samples/Import/t11.rops: -------------------------------------------------------------------------------- 1 | Program IFSTest; 2 | var 3 | F, Form: TForm; 4 | i: Longint; 5 | Labl: TLabel; 6 | Button: TButton; 7 | Edit: TEdit; 8 | Memo: TMemo; 9 | Stop: Boolean; 10 | 11 | Begin 12 | Form := TForm.Create(self); 13 | Form.Width := 400; 14 | Form.Height := 300; 15 | Form.BorderStyle := bsDialog; 16 | Form.BorderIcons := []; 17 | Form.Caption := 'Name'; 18 | Form.Position := poScreenCenter; 19 | Labl := TLabel.Create(Form); 20 | Labl.Top := 120; 21 | Labl.Left := 160; 22 | Labl.Caption := 'Please type in your name:'; 23 | Labl.Parent := Form; 24 | Edit := TEdit.Create(Form); 25 | Edit.Font.Name := 'Tahoma'; 26 | Edit.SetBounds(160,160,80,24); 27 | Edit.Parent := Form; 28 | Button := TButton.Create(Form); 29 | Button.Left := 160; 30 | Button.Top := 200; 31 | Button.Width := 80; 32 | Button.Height := 24; 33 | Button.Caption := '&OK'; 34 | Button.Parent := Form; 35 | Button.Default := True; 36 | Memo := TMemo.Create(Form); 37 | Memo.Left := 10; 38 | Memo.Width := 380; 39 | Memo.Top := 10; 40 | Memo.Height := 100; 41 | Memo.Text := 'Welcome to Form Test.'#13#10#13#10'Plase wait till the loop is over.'; 42 | Memo.Color := 0; 43 | Memo.Font.Color := $FFFFFF; 44 | Memo.Parent := Form; 45 | Memo.Readonly := True; 46 | Form.Visible := true; 47 | Form.Refresh; 48 | stop := false; 49 | while Form.Visible do 50 | begin 51 | Application.ProcessMessages; 52 | i := i + 1; 53 | if i > 100000 then Break; 54 | end; 55 | Button.Free; 56 | Form.Free; 57 | End. 58 | -------------------------------------------------------------------------------- /Samples/Import/t2.rops: -------------------------------------------------------------------------------- 1 | Program test; 2 | var 3 | i: Longint; 4 | begin 5 | for i := 0 to 100000 do ; 6 | end. 7 | -------------------------------------------------------------------------------- /Samples/Import/t3.rops: -------------------------------------------------------------------------------- 1 | Program test; 2 | begin 3 | writeln('test'); 4 | end. 5 | -------------------------------------------------------------------------------- /Samples/Import/t4.rops: -------------------------------------------------------------------------------- 1 | Program test; 2 | var 3 | s: string; 4 | begin 5 | s := 'test'; 6 | s := s + 'TESTED'; 7 | writeln(s); 8 | end. 9 | -------------------------------------------------------------------------------- /Samples/Import/t5.rops: -------------------------------------------------------------------------------- 1 | Program test; 2 | var 3 | s: string; 4 | begin 5 | Writeln('Your name?'); 6 | s := readln(s); 7 | s := s + 'TESTED'; 8 | writeln(s); 9 | end. 10 | -------------------------------------------------------------------------------- /Samples/Import/t6.rops: -------------------------------------------------------------------------------- 1 | Program IFSTest; 2 | type 3 | TArrayOfByte = array of byte; 4 | 5 | procedure Test(x: TARrayOfByte); 6 | var 7 | i: Integer; 8 | begin 9 | for i := 0 to Getarraylength(X) -1 do 10 | begin 11 | writeln(inttostr(x[i])); 12 | end; 13 | end; 14 | var 15 | temp: TArrayOfByte; 16 | 17 | Begin 18 | setarraylength(temp, 2); 19 | temp[0] := 1; 20 | temp[1] :=23; 21 | test(temp); 22 | End. 23 | -------------------------------------------------------------------------------- /Samples/Import/t7.rops: -------------------------------------------------------------------------------- 1 | Program test; 2 | var 3 | r: TObject; 4 | begin 5 | r := TObject.Create; 6 | r.Free; 7 | end. 8 | -------------------------------------------------------------------------------- /Samples/Import/t8.rops: -------------------------------------------------------------------------------- 1 | Program test; 2 | var 3 | r: TObject; 4 | begin 5 | if r = nil then Writeln('(r = nil) = true') else Writeln('(r = nil) = false'); 6 | if r <> nil then Writeln('(r <> nil) = true') else Writeln('(r <> nil) = false'); 7 | r := TObject.Create; 8 | if r = nil then Writeln('(r = nil) = true') else Writeln('(r = nil) = false'); 9 | if r <> nil then Writeln('(r <> nil) = true') else Writeln('(r <> nil) = false'); 10 | r.Free; 11 | if r = nil then Writeln('(r = nil) = true') else Writeln('(r = nil) = false'); 12 | if r <> nil then Writeln('(r <> nil) = true') else Writeln('(r <> nil) = false'); 13 | r := nil; 14 | if r = nil then Writeln('(r = nil) = true') else Writeln('(r = nil) = false'); 15 | if r <> nil then Writeln('(r <> nil) = true') else Writeln('(r <> nil) = false'); 16 | end. 17 | -------------------------------------------------------------------------------- /Samples/Import/t9.rops: -------------------------------------------------------------------------------- 1 | Program test; 2 | var 3 | t: TObject; 4 | i: IUnknown; 5 | begin 6 | t := TObject.Create; 7 | try 8 | try 9 | i := t; 10 | except 11 | writeln('Expected Exception: Interface not supported'); 12 | end; 13 | finally 14 | t.Free; 15 | end; 16 | end. 17 | -------------------------------------------------------------------------------- /Samples/Import/testdefine.rops: -------------------------------------------------------------------------------- 1 | {.$DEFINE ERROR} 2 | 3 | // Remove the . before the define to 4 | // cause an error in textinclude.rops 5 | 6 | {$I testinclude.rops} 7 | begin 8 | testproc(); 9 | writeln('test'); 10 | end. 11 | -------------------------------------------------------------------------------- /Samples/Import/testinclude.rops: -------------------------------------------------------------------------------- 1 | { 2 | This file is part of a DEFINE / INCLUDE test. Use 3 | testdefine.rops file to execute this file. 4 | } 5 | 6 | procedure TestProc; 7 | begin 8 | Writeln('Test Proc Called'); 9 | {$IFDEF ERROR} 10 | Error! 11 | {$ENDIF} 12 | end; 13 | -------------------------------------------------------------------------------- /Samples/Import/vartype.rops: -------------------------------------------------------------------------------- 1 | Program IFSTest; 2 | var 3 | e: variant; 4 | Begin 5 | e := null; 6 | case VarType(e) of 7 | varempty :writeln('unassigned'); 8 | varNull: Writeln('null'); 9 | varstring: Writeln('String'); 10 | varInteger : writeln('VarInteger'); 11 | varSingle: Writeln('Single'); 12 | varDouble: Writeln('Double'); 13 | end; 14 | End. -------------------------------------------------------------------------------- /Samples/Import/wordole.rops: -------------------------------------------------------------------------------- 1 | Program test; 2 | var 3 | WordDoc: Variant; 4 | begin 5 | WordDoc := CreateOleObject('Word.Application'); 6 | WordDoc.Visible := True; 7 | end. 8 | -------------------------------------------------------------------------------- /Samples/Kylix/Import.dpr: -------------------------------------------------------------------------------- 1 | program Import; 2 | 3 | uses 4 | QForms, 5 | fMain in 'fMain.pas' {MainForm}, 6 | fDwin in 'fDwin.pas' {dwin}; 7 | 8 | {$R *.res} 9 | 10 | begin 11 | Application.Initialize; 12 | Application.CreateForm(TMainForm, MainForm); 13 | Application.CreateForm(Tdwin, dwin); 14 | Application.Run; 15 | end. 16 | 17 | -------------------------------------------------------------------------------- /Samples/Kylix/arraytest.rops: -------------------------------------------------------------------------------- 1 | Program IFSTest; 2 | type 3 | TArrayOfByte = array of byte; 4 | 5 | procedure Test(x: TARrayOfByte); 6 | var 7 | i: Integer; 8 | begin 9 | for i := 0 to Getarraylength(X) -1 do 10 | begin 11 | writeln(inttostr(x[i])); 12 | end; 13 | end; 14 | var 15 | temp: TArrayOfByte; 16 | 17 | Begin 18 | setarraylength(temp, 2); 19 | temp[0] := 1; 20 | temp[1] :=23; 21 | test(temp); 22 | End. -------------------------------------------------------------------------------- /Samples/Kylix/booleantest.rops: -------------------------------------------------------------------------------- 1 | Program IFSTest; 2 | var 3 | x1, x2: integer; 4 | b: boolean; 5 | Begin 6 | x1 := 2; 7 | x2 := 2; 8 | b := x1 = x2; 9 | if b then begin writeln('true'); end else begin writeln('false');end; 10 | x1 := 2; 11 | x2 := 4; 12 | b := x1 = x2; 13 | if b then begin writeln('true'); end else begin writeln('false');end; 14 | writeln('done'); 15 | End. -------------------------------------------------------------------------------- /Samples/Kylix/bytearray.rops: -------------------------------------------------------------------------------- 1 | Program IFSTest; 2 | type 3 | TByteArray = array of byte; 4 | var 5 | x: TByteARray; 6 | Begin 7 | x[0] := 1; 8 | // will cause an runtime error (Out Of Record Fields Range) 9 | End. -------------------------------------------------------------------------------- /Samples/Kylix/casetest.rops: -------------------------------------------------------------------------------- 1 | Program IFSTest; 2 | var 3 | b: Byte; 4 | Begin 5 | for b := 0 to 2 do begin 6 | case b of 7 | 0: writeln('0'); 8 | 1: writeln('1'); 9 | else writeln('>1'); 10 | end; 11 | end; 12 | End. -------------------------------------------------------------------------------- /Samples/Kylix/exittest.rops: -------------------------------------------------------------------------------- 1 | Program IFSTest; 2 | procedure test; 3 | begin 4 | writeln('1'); 5 | exit; 6 | writeln('2'); 7 | end; 8 | Begin 9 | test; 10 | writeln('3'); 11 | exit; 12 | writeln('4'); 13 | 14 | End. -------------------------------------------------------------------------------- /Samples/Kylix/fDwin.dfm: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Samples/Kylix/fDwin.dfm -------------------------------------------------------------------------------- /Samples/Kylix/fDwin.pas: -------------------------------------------------------------------------------- 1 | unit fDwin; 2 | 3 | interface 4 | 5 | uses 6 | SysUtils, Classes, QGraphics, QControls, QForms, QDialogs, QStdCtrls, 7 | QExtCtrls; 8 | 9 | type 10 | Tdwin = class(TForm) 11 | Memo1: TMemo; 12 | Panel1: TPanel; 13 | Button1: TButton; 14 | private 15 | { Private declarations } 16 | public 17 | { Public declarations } 18 | end; 19 | 20 | var 21 | dwin: Tdwin; 22 | 23 | implementation 24 | 25 | {$R *.dfm} 26 | 27 | end. 28 | -------------------------------------------------------------------------------- /Samples/Kylix/fMain.dfm: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Samples/Kylix/fMain.dfm -------------------------------------------------------------------------------- /Samples/Kylix/fortest.rops: -------------------------------------------------------------------------------- 1 | Program IFSTest; 2 | var 3 | i: Longint; 4 | Begin 5 | for i := 0 to 9 do 6 | begin 7 | writeln('hello'+inttostr(i)); 8 | end; 9 | End. 10 | -------------------------------------------------------------------------------- /Samples/Kylix/if.rops: -------------------------------------------------------------------------------- 1 | Program IFSTest; 2 | var 3 | a: boolean; 4 | Begin 5 | a := true; 6 | if a then begin ;end else 7 | if a then begin ;end else; 8 | writeln('5'); 9 | End. -------------------------------------------------------------------------------- /Samples/Kylix/importtest.rops: -------------------------------------------------------------------------------- 1 | Program IFSTest; 2 | var 3 | a,b :string; 4 | Begin 5 | a := 'test: '; 6 | b := ImportTest('1', 2, 3, 4, a); 7 | writeln(b); 8 | writeln(a); 9 | { 10 | Output should be: 11 | 12 | 1 2 3 4 - OK! 13 | 1 2 3 4 - OK! - OK2! 14 | 15 | } 16 | End. -------------------------------------------------------------------------------- /Samples/Kylix/longfortest.rops: -------------------------------------------------------------------------------- 1 | Program IFSTest; 2 | var 3 | i, i2: Longint; 4 | Begin 5 | for i := 0 to 1000000 do 6 | begin 7 | i2 := i -1; 8 | end; 9 | writeln(inttostr(i2)); 10 | End. -------------------------------------------------------------------------------- /Samples/Kylix/rectest.rops: -------------------------------------------------------------------------------- 1 | Program IFSTest; 2 | type 3 | TMyRec = record a: Integer; b: string; end; 4 | var 5 | s: TMyRec; 6 | Begin 7 | s.a := 1234; 8 | s.b := 'abc'; 9 | writeln(s.b); 10 | writeln(inttostr(s.a)); 11 | End. -------------------------------------------------------------------------------- /Samples/Kylix/vartype.rops: -------------------------------------------------------------------------------- 1 | Program IFSTest; 2 | var 3 | e: variant; 4 | Begin 5 | e := null; 6 | case VarType(e) of 7 | varempty :writeln('unassigned'); 8 | varNull: Writeln('null'); 9 | varstring: Writeln('String'); 10 | varInteger : writeln('VarInteger'); 11 | varSingle: Writeln('Single'); 12 | varDouble: Writeln('Double'); 13 | end; 14 | End. -------------------------------------------------------------------------------- /Samples/RemObjects SDK Client/TestApplication.dpr: -------------------------------------------------------------------------------- 1 | program TestApplication; 2 | 3 | uses 4 | Forms, 5 | fMain in 'fMain.pas' {Form1}; 6 | 7 | {$R *.RES} 8 | 9 | begin 10 | Application.Initialize; 11 | Application.Title := 'Test Application'; 12 | Application.CreateForm(TForm1, Form1); 13 | Application.Run; 14 | end. 15 | -------------------------------------------------------------------------------- /Samples/RemObjects SDK Client/TestApplication.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Samples/RemObjects SDK Client/TestApplication.res -------------------------------------------------------------------------------- /Samples/RemObjects SDK Client/fMain.dfm: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Samples/RemObjects SDK Client/fMain.dfm -------------------------------------------------------------------------------- /Samples/TestApp/TestApplication.dpr: -------------------------------------------------------------------------------- 1 | program TestApplication; 2 | 3 | uses 4 | Forms, 5 | fMain in 'fMain.pas' {Form1}; 6 | 7 | {$R *.RES} 8 | 9 | begin 10 | Application.Initialize; 11 | Application.Title := 'Test Application'; 12 | Application.CreateForm(TForm1, Form1); 13 | Application.Run; 14 | end. 15 | -------------------------------------------------------------------------------- /Samples/TestApp/TestApplication.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Samples/TestApp/TestApplication.res -------------------------------------------------------------------------------- /Samples/TestApp/fMain.dfm: -------------------------------------------------------------------------------- 1 | object Form1: TForm1 2 | Left = 292 3 | Top = 240 4 | Width = 577 5 | Height = 360 6 | Caption = 'RemObjects Pascal Script - Test Application' 7 | Color = clBtnFace 8 | Font.Charset = DEFAULT_CHARSET 9 | Font.Color = clWindowText 10 | Font.Height = -11 11 | Font.Name = 'Tahoma' 12 | Font.Style = [] 13 | Menu = MainMenu1 14 | OldCreateOrder = False 15 | PixelsPerInch = 96 16 | TextHeight = 13 17 | object Splitter1: TSplitter 18 | Left = 0 19 | Top = 222 20 | Width = 569 21 | Height = 3 22 | Cursor = crVSplit 23 | Align = alBottom 24 | end 25 | object Memo1: TMemo 26 | Left = 0 27 | Top = 0 28 | Width = 569 29 | Height = 222 30 | Align = alClient 31 | Font.Charset = DEFAULT_CHARSET 32 | Font.Color = clWindowText 33 | Font.Height = -13 34 | Font.Name = 'Courier New' 35 | Font.Style = [] 36 | Lines.Strings = ( 37 | 'program Test;' 38 | '' 39 | 'begin' 40 | ' // ... add your code here' 41 | 'end.') 42 | ParentFont = False 43 | ScrollBars = ssBoth 44 | TabOrder = 0 45 | WordWrap = False 46 | end 47 | object Memo2: TMemo 48 | Left = 0 49 | Top = 225 50 | Width = 569 51 | Height = 89 52 | Align = alBottom 53 | ReadOnly = True 54 | ScrollBars = ssVertical 55 | TabOrder = 1 56 | WordWrap = False 57 | end 58 | object MainMenu1: TMainMenu 59 | Left = 240 60 | Top = 8 61 | object Program1: TMenuItem 62 | Caption = '&Program' 63 | object Compile1: TMenuItem 64 | Caption = '&Compile' 65 | ShortCut = 120 66 | OnClick = Compile1Click 67 | end 68 | end 69 | end 70 | object PSScript: TPSScript 71 | CompilerOptions = [] 72 | OnCompile = PSScriptCompile 73 | OnExecute = PSScriptExecute 74 | OnCompImport = IFPS3ClassesPlugin1CompImport 75 | OnExecImport = IFPS3ClassesPlugin1ExecImport 76 | Plugins = <> 77 | UsePreProcessor = False 78 | Left = 280 79 | Top = 8 80 | end 81 | object PSDllPlugin1: TPSDllPlugin 82 | Left = 320 83 | Top = 8 84 | end 85 | end 86 | -------------------------------------------------------------------------------- /Source/Glyphs/PS Glpyhs.pspimage: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/Glyphs/PS Glpyhs.pspimage -------------------------------------------------------------------------------- /Source/Glyphs/TPSCustomPlugin.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/Glyphs/TPSCustomPlugin.png -------------------------------------------------------------------------------- /Source/Glyphs/TPSDllPlugin.bmp: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/Glyphs/TPSDllPlugin.bmp -------------------------------------------------------------------------------- /Source/Glyphs/TPSDllPlugin.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/Glyphs/TPSDllPlugin.png -------------------------------------------------------------------------------- /Source/Glyphs/TPSImport_Classes.bmp: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/Glyphs/TPSImport_Classes.bmp -------------------------------------------------------------------------------- /Source/Glyphs/TPSImport_Classes.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/Glyphs/TPSImport_Classes.png -------------------------------------------------------------------------------- /Source/Glyphs/TPSImport_ComObj.bmp: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/Glyphs/TPSImport_ComObj.bmp -------------------------------------------------------------------------------- /Source/Glyphs/TPSImport_ComObj.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/Glyphs/TPSImport_ComObj.png -------------------------------------------------------------------------------- /Source/Glyphs/TPSImport_Controls.bmp: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/Glyphs/TPSImport_Controls.bmp -------------------------------------------------------------------------------- /Source/Glyphs/TPSImport_Controls.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/Glyphs/TPSImport_Controls.png -------------------------------------------------------------------------------- /Source/Glyphs/TPSImport_DB.bmp: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/Glyphs/TPSImport_DB.bmp -------------------------------------------------------------------------------- /Source/Glyphs/TPSImport_DB.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/Glyphs/TPSImport_DB.png -------------------------------------------------------------------------------- /Source/Glyphs/TPSImport_DateUtils.bmp: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/Glyphs/TPSImport_DateUtils.bmp -------------------------------------------------------------------------------- /Source/Glyphs/TPSImport_DateUtils.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/Glyphs/TPSImport_DateUtils.png -------------------------------------------------------------------------------- /Source/Glyphs/TPSImport_Forms.bmp: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/Glyphs/TPSImport_Forms.bmp -------------------------------------------------------------------------------- /Source/Glyphs/TPSImport_Forms.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/Glyphs/TPSImport_Forms.png -------------------------------------------------------------------------------- /Source/Glyphs/TPSImport_StdCtrls.bmp: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/Glyphs/TPSImport_StdCtrls.bmp -------------------------------------------------------------------------------- /Source/Glyphs/TPSImport_StdCtrls.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/Glyphs/TPSImport_StdCtrls.png -------------------------------------------------------------------------------- /Source/Glyphs/TPSScript.bmp: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/Glyphs/TPSScript.bmp -------------------------------------------------------------------------------- /Source/Glyphs/TPSScript.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/Glyphs/TPSScript.png -------------------------------------------------------------------------------- /Source/Glyphs/TPSScriptDebugger.bmp: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/Glyphs/TPSScriptDebugger.bmp -------------------------------------------------------------------------------- /Source/Glyphs/TPSScriptDebugger.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/Glyphs/TPSScriptDebugger.png -------------------------------------------------------------------------------- /Source/PascalScript.inc: -------------------------------------------------------------------------------- 1 | {----------------------------------------------------------------------------} 2 | { RemObjects Pascal Script } 3 | { } 4 | { compiler: Delphi 2 and up, Kylix 3 and up } 5 | { platform: Win32, Linux } 6 | { } 7 | { (c)opyright RemObjects Software. all rights reserved. } 8 | { } 9 | {----------------------------------------------------------------------------} 10 | 11 | 12 | {$INCLUDE eDefines.inc} 13 | 14 | {$IFDEF FPC}{$H+}{$ENDIF} 15 | 16 | {$IFDEF VER125}{C4}{$B-}{$X+}{$T-}{$H+}{$ENDIF} 17 | {$IFDEF VER110}{C3}{$B-}{$X+}{$T-}{$H+}{$ENDIF} 18 | {$IFDEF VER93}{C1}{$B-}{$X+}{$T-}{$H+}{$ENDIF} 19 | 20 | {$IFDEF DELPHI4UP} 21 | {$DEFINE PS_HAVEVARIANT} 22 | {$DEFINE PS_DYNARRAY} 23 | {$ENDIF} 24 | 25 | {$IFNDEF FPC} 26 | {$B-}{$X+}{$T-}{$H+} 27 | {$ELSE} 28 | {$R-}{$Q-} 29 | {$ENDIF} 30 | 31 | {$IFNDEF FPC} 32 | {$IFNDEF DELPHI4UP} 33 | {$IFNDEF LINUX} 34 | {$DEFINE PS_NOINT64} 35 | {$ENDIF} 36 | {$ENDIF} 37 | 38 | {$IFDEF DELPHI2} 39 | {$DEFINE PS_NOINT64} 40 | {$DEFINE PS_NOWIDESTRING} 41 | {$B-}{$X+}{$T-}{$H+} 42 | {$ENDIF} 43 | 44 | {$IFDEF LINUX}{KYLIX}{$DEFINE CLX}{$DEFINE DELPHI3UP}{$DEFINE DELPHI6UP}{$ENDIF} 45 | {$ENDIF} 46 | {$R-}{$Q-} 47 | 48 | 49 | { 50 | Defines: 51 | PS_NOSMARTLIST - Don't use the smart list option 52 | PS_NOIDISPATCH 53 | PS_NOWIDESTRING 54 | PS_NOINT64 55 | PS_DELPHIDIV 56 | } 57 | 58 | {$UNDEF DEBUG} 59 | 60 | {$IFDEF CLX} 61 | {$DEFINE PS_NOIDISPATCH} // not implemented 62 | {$ENDIF} 63 | 64 | {$IFDEF FPC} 65 | {$I PascalScriptFPC.inc} 66 | {$ENDIF} 67 | 68 | {$IFDEF DELPHI2005UP} 69 | {$DEFINE class_helper_present} 70 | {$ENDIF} 71 | {$IFDEF FPC} 72 | {$DEFINE class_helper_present} 73 | {$ENDIF} 74 | 75 | -------------------------------------------------------------------------------- /Source/PascalScriptFPC.inc: -------------------------------------------------------------------------------- 1 | {.$DEFINE FPC_UNICODE} 2 | 3 | {$IFDEF FPC_UNICODE} 4 | {$MODE DELPHIUNICODE} 5 | {$DEFINE UNICODE} 6 | {$ELSE} 7 | {$MODE DELPHI} 8 | {$ENDIF} 9 | 10 | {$IF (defined(cpuaarch64) or defined(cpuarm))} 11 | {$DEFINE USEINVOKECALL} 12 | {$IFEND} 13 | 14 | 15 | 16 | {$DEFINE PS_HAVEVARIANT} 17 | {$DEFINE PS_DYNARRAY} 18 | {$ifndef mswindows} 19 | {$DEFINE PS_NOIDISPATCH} 20 | {$endif} 21 | {$if (fpc_version>2) or ((fpc_version=2) and ((fpc_release=2) and (fpc_patch>=4)) or (fpc_release>2))} 22 | {$UNDEF FPC_OLD_FIX} 23 | {$DEFINE PS_STACKALIGN} 24 | {$UNDEF PS_FPCSTRINGWORKAROUND} 25 | {$DEFINE PS_RESBEFOREPARAMETERS} 26 | {$DEFINE x64_string_result_as_varparameter} 27 | {$ifdef mswindows} 28 | {$if (fpc_version>2) or ((fpc_version=2) and (fpc_release>5))} 29 | {$DEFINE PS_FPC_HAS_COM} 30 | {$endif} 31 | {$endif} 32 | {FreePascal 2.3.1 and above has much Delphi compatibility bugs fixed} 33 | {$else} 34 | {$DEFINE FPC_OLD_FIX} 35 | {$DEFINE PS_FPCSTRINGWORKAROUND} 36 | {$ifend} 37 | {$DEFINE DELPHI3UP} 38 | {$DEFINE DELPHI6UP} 39 | -------------------------------------------------------------------------------- /Source/PascalScript_Core_D10.cfg: -------------------------------------------------------------------------------- 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 | -N0"..\Dcu\D10" 34 | -LE"..\Dcu\D10" 35 | -LN"..\Dcu\D10" 36 | -U"..\Dcu\D10" 37 | -O"..\Dcu\D10" 38 | -I"..\Dcu\D10" 39 | -R"..\Dcu\D10" 40 | -Z 41 | -w-SYMBOL_DEPRECATED 42 | -w-SYMBOL_LIBRARY 43 | -w-SYMBOL_PLATFORM 44 | -w-SYMBOL_EXPERIMENTAL 45 | -w-UNIT_LIBRARY 46 | -w-UNIT_PLATFORM 47 | -w-UNIT_DEPRECATED 48 | -w-UNIT_EXPERIMENTAL 49 | -w-UNSAFE_TYPE 50 | -w-UNSAFE_CODE 51 | -w-UNSAFE_CAST 52 | -------------------------------------------------------------------------------- /Source/PascalScript_Core_D10.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/PascalScript_Core_D10.res -------------------------------------------------------------------------------- /Source/PascalScript_Core_D11.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/PascalScript_Core_D11.res -------------------------------------------------------------------------------- /Source/PascalScript_Core_D12.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/PascalScript_Core_D12.res -------------------------------------------------------------------------------- /Source/PascalScript_Core_D14.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/PascalScript_Core_D14.res -------------------------------------------------------------------------------- /Source/PascalScript_Core_D15.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/PascalScript_Core_D15.res -------------------------------------------------------------------------------- /Source/PascalScript_Core_D16.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/PascalScript_Core_D16.res -------------------------------------------------------------------------------- /Source/PascalScript_Core_D17.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/PascalScript_Core_D17.res -------------------------------------------------------------------------------- /Source/PascalScript_Core_D18.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/PascalScript_Core_D18.res -------------------------------------------------------------------------------- /Source/PascalScript_Core_D19.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/PascalScript_Core_D19.res -------------------------------------------------------------------------------- /Source/PascalScript_Core_D20.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/PascalScript_Core_D20.res -------------------------------------------------------------------------------- /Source/PascalScript_Core_D21.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/PascalScript_Core_D21.res -------------------------------------------------------------------------------- /Source/PascalScript_Core_D22.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/PascalScript_Core_D22.res -------------------------------------------------------------------------------- /Source/PascalScript_Core_D23.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/PascalScript_Core_D23.res -------------------------------------------------------------------------------- /Source/PascalScript_Core_D24.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/PascalScript_Core_D24.res -------------------------------------------------------------------------------- /Source/PascalScript_Core_D25.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/PascalScript_Core_D25.res -------------------------------------------------------------------------------- /Source/PascalScript_Core_D26.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/PascalScript_Core_D26.res -------------------------------------------------------------------------------- /Source/PascalScript_Core_D27.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/PascalScript_Core_D27.res -------------------------------------------------------------------------------- /Source/PascalScript_Core_D28.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/PascalScript_Core_D28.res -------------------------------------------------------------------------------- /Source/PascalScript_Core_D29.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/PascalScript_Core_D29.res -------------------------------------------------------------------------------- /Source/PascalScript_Core_D3.dof: -------------------------------------------------------------------------------- 1 | [FileVersion] 2 | Version=3.0 3 | 4 | [Compiler] 5 | A=8 6 | B=0 7 | C=1 8 | D=1 9 | E=0 10 | F=0 11 | G=1 12 | H=1 13 | I=1 14 | J=0 15 | K=0 16 | L=1 17 | M=0 18 | N=1 19 | O=1 20 | P=1 21 | Q=0 22 | R=0 23 | S=0 24 | T=0 25 | U=0 26 | V=1 27 | W=1 28 | X=1 29 | Y=1 30 | Z=1 31 | ShowHints=1 32 | ShowWarnings=1 33 | UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; 34 | NamespacePrefix= 35 | SymbolDeprecated=0 36 | SymbolLibrary=0 37 | SymbolPlatform=0 38 | UnitLibrary=0 39 | UnitPlatform=0 40 | UnitDeprecated=0 41 | HResultCompat=1 42 | HidingMember=1 43 | HiddenVirtual=1 44 | Garbage=1 45 | BoundsError=1 46 | ZeroNilCompat=1 47 | StringConstTruncated=1 48 | ForLoopVarVarPar=1 49 | TypedConstVarPar=1 50 | AsgToTypedConst=1 51 | CaseLabelRange=1 52 | ForVariable=1 53 | ConstructingAbstract=1 54 | ComparisonFalse=1 55 | ComparisonTrue=1 56 | ComparingSignedUnsigned=1 57 | CombiningSignedUnsigned=1 58 | UnsupportedConstruct=1 59 | FileOpen=1 60 | FileOpenUnitSrc=1 61 | BadGlobalSymbol=1 62 | DuplicateConstructorDestructor=1 63 | InvalidDirective=1 64 | PackageNoLink=1 65 | PackageThreadVar=1 66 | ImplicitImport=1 67 | HPPEMITIgnored=1 68 | NoRetVal=1 69 | UseBeforeDef=1 70 | ForLoopVarUndef=1 71 | UnitNameMismatch=1 72 | NoCFGFileFound=1 73 | MessageDirective=1 74 | ImplicitVariants=1 75 | UnicodeToLocale=1 76 | LocaleToUnicode=1 77 | ImagebaseMultiple=1 78 | SuspiciousTypecast=1 79 | PrivatePropAccessor=1 80 | UnsafeType=0 81 | UnsafeCode=0 82 | UnsafeCast=0 83 | 84 | [Linker] 85 | MapFile=0 86 | OutputObjs=0 87 | ConsoleApp=1 88 | DebugInfo=0 89 | RemoteSymbols=0 90 | MinStackSize=16384 91 | MaxStackSize=1048576 92 | ImageBase=4194304 93 | ExeDescription=RemObjects Pascal Script - Core Package 94 | 95 | [Directories] 96 | OutputDir=s:\exe 97 | UnitOutputDir=..\Dcu\D3 98 | PackageDLLOutputDir=..\Dcu\D3 99 | PackageDCPOutputDir=..\Dcu\D3 100 | SearchPath= 101 | Conditionals= 102 | DebugSourceDirs= 103 | UsePackages=0 104 | 105 | [Version Info Keys] 106 | CompanyName=RemObjects Software 107 | InternalName= 108 | LegalCopyright= 109 | LegalTrademarks= 110 | ProductName=Pascal Script 111 | ProductVersion=3.0.0.0 112 | FileDescription= 113 | FileVersion=3.0.2.34 114 | OriginalFilename= 115 | 116 | -------------------------------------------------------------------------------- /Source/PascalScript_Core_D4.dof: -------------------------------------------------------------------------------- 1 | [FileVersion] 2 | Version=4.0 3 | 4 | [Compiler] 5 | A=8 6 | B=0 7 | C=1 8 | D=1 9 | E=0 10 | F=0 11 | G=1 12 | H=1 13 | I=1 14 | J=0 15 | K=0 16 | L=1 17 | M=0 18 | N=1 19 | O=1 20 | P=1 21 | Q=0 22 | R=0 23 | S=0 24 | T=0 25 | U=0 26 | V=1 27 | W=1 28 | X=1 29 | Y=1 30 | Z=1 31 | ShowHints=1 32 | ShowWarnings=1 33 | UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; 34 | NamespacePrefix= 35 | SymbolDeprecated=0 36 | SymbolLibrary=0 37 | SymbolPlatform=0 38 | UnitLibrary=0 39 | UnitPlatform=0 40 | UnitDeprecated=0 41 | HResultCompat=1 42 | HidingMember=1 43 | HiddenVirtual=1 44 | Garbage=1 45 | BoundsError=1 46 | ZeroNilCompat=1 47 | StringConstTruncated=1 48 | ForLoopVarVarPar=1 49 | TypedConstVarPar=1 50 | AsgToTypedConst=1 51 | CaseLabelRange=1 52 | ForVariable=1 53 | ConstructingAbstract=1 54 | ComparisonFalse=1 55 | ComparisonTrue=1 56 | ComparingSignedUnsigned=1 57 | CombiningSignedUnsigned=1 58 | UnsupportedConstruct=1 59 | FileOpen=1 60 | FileOpenUnitSrc=1 61 | BadGlobalSymbol=1 62 | DuplicateConstructorDestructor=1 63 | InvalidDirective=1 64 | PackageNoLink=1 65 | PackageThreadVar=1 66 | ImplicitImport=1 67 | HPPEMITIgnored=1 68 | NoRetVal=1 69 | UseBeforeDef=1 70 | ForLoopVarUndef=1 71 | UnitNameMismatch=1 72 | NoCFGFileFound=1 73 | MessageDirective=1 74 | ImplicitVariants=1 75 | UnicodeToLocale=1 76 | LocaleToUnicode=1 77 | ImagebaseMultiple=1 78 | SuspiciousTypecast=1 79 | PrivatePropAccessor=1 80 | UnsafeType=0 81 | UnsafeCode=0 82 | UnsafeCast=0 83 | 84 | [Linker] 85 | MapFile=0 86 | OutputObjs=0 87 | ConsoleApp=1 88 | DebugInfo=0 89 | RemoteSymbols=0 90 | MinStackSize=16384 91 | MaxStackSize=1048576 92 | ImageBase=4194304 93 | ExeDescription=RemObjects Pascal Script - Core Package 94 | 95 | [Directories] 96 | UnitOutputDir=..\Dcu\D4 97 | PackageDLLOutputDir=..\Dcu\D4 98 | PackageDCPOutputDir=..\Dcu\D4 99 | SearchPath= 100 | Conditionals= 101 | DebugSourceDirs= 102 | UsePackages=0 103 | 104 | [Version Info Keys] 105 | CompanyName=RemObjects Software 106 | InternalName= 107 | LegalCopyright= 108 | LegalTrademarks= 109 | ProductName=Pascal Script 110 | ProductVersion=3.0.0.0 111 | FileDescription= 112 | FileVersion=3.0.2.34 113 | OriginalFilename= 114 | 115 | -------------------------------------------------------------------------------- /Source/PascalScript_Core_D5.dof: -------------------------------------------------------------------------------- 1 | [FileVersion] 2 | Version=5.0 3 | 4 | [Compiler] 5 | A=8 6 | B=0 7 | C=1 8 | D=1 9 | E=0 10 | F=0 11 | G=1 12 | H=1 13 | I=1 14 | J=0 15 | K=0 16 | L=1 17 | M=0 18 | N=1 19 | O=1 20 | P=1 21 | Q=0 22 | R=0 23 | S=0 24 | T=0 25 | U=0 26 | V=1 27 | W=1 28 | X=1 29 | Y=1 30 | Z=1 31 | ShowHints=1 32 | ShowWarnings=1 33 | UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; 34 | NamespacePrefix= 35 | SymbolDeprecated=0 36 | SymbolLibrary=0 37 | SymbolPlatform=0 38 | UnitLibrary=0 39 | UnitPlatform=0 40 | UnitDeprecated=0 41 | HResultCompat=1 42 | HidingMember=1 43 | HiddenVirtual=1 44 | Garbage=1 45 | BoundsError=1 46 | ZeroNilCompat=1 47 | StringConstTruncated=1 48 | ForLoopVarVarPar=1 49 | TypedConstVarPar=1 50 | AsgToTypedConst=1 51 | CaseLabelRange=1 52 | ForVariable=1 53 | ConstructingAbstract=1 54 | ComparisonFalse=1 55 | ComparisonTrue=1 56 | ComparingSignedUnsigned=1 57 | CombiningSignedUnsigned=1 58 | UnsupportedConstruct=1 59 | FileOpen=1 60 | FileOpenUnitSrc=1 61 | BadGlobalSymbol=1 62 | DuplicateConstructorDestructor=1 63 | InvalidDirective=1 64 | PackageNoLink=1 65 | PackageThreadVar=1 66 | ImplicitImport=1 67 | HPPEMITIgnored=1 68 | NoRetVal=1 69 | UseBeforeDef=1 70 | ForLoopVarUndef=1 71 | UnitNameMismatch=1 72 | NoCFGFileFound=1 73 | MessageDirective=1 74 | ImplicitVariants=1 75 | UnicodeToLocale=1 76 | LocaleToUnicode=1 77 | ImagebaseMultiple=1 78 | SuspiciousTypecast=1 79 | PrivatePropAccessor=1 80 | UnsafeType=0 81 | UnsafeCode=0 82 | UnsafeCast=0 83 | 84 | [Linker] 85 | MapFile=0 86 | OutputObjs=0 87 | ConsoleApp=1 88 | DebugInfo=0 89 | RemoteSymbols=0 90 | MinStackSize=16384 91 | MaxStackSize=1048576 92 | ImageBase=4194304 93 | ExeDescription=RemObjects Pascal Script - Core Package 94 | 95 | [Directories] 96 | UnitOutputDir=..\Dcu\D5 97 | PackageDLLOutputDir=..\Dcu\D5 98 | PackageDCPOutputDir=..\Dcu\D5 99 | SearchPath= 100 | Conditionals= 101 | DebugSourceDirs= 102 | UsePackages=0 103 | 104 | [Version Info Keys] 105 | CompanyName=RemObjects Software 106 | InternalName= 107 | LegalCopyright= 108 | LegalTrademarks= 109 | ProductName=Pascal Script 110 | ProductVersion=3.0.0.0 111 | FileDescription= 112 | FileVersion=3.0.2.34 113 | OriginalFilename= 114 | 115 | -------------------------------------------------------------------------------- /Source/PascalScript_Core_D6.dof: -------------------------------------------------------------------------------- 1 | [FileVersion] 2 | Version=6.0 3 | 4 | [Compiler] 5 | A=8 6 | B=0 7 | C=1 8 | D=1 9 | E=0 10 | F=0 11 | G=1 12 | H=1 13 | I=1 14 | J=0 15 | K=0 16 | L=1 17 | M=0 18 | N=1 19 | O=1 20 | P=1 21 | Q=0 22 | R=0 23 | S=0 24 | T=0 25 | U=0 26 | V=1 27 | W=1 28 | X=1 29 | Y=1 30 | Z=1 31 | ShowHints=1 32 | ShowWarnings=1 33 | UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; 34 | NamespacePrefix= 35 | SymbolDeprecated=0 36 | SymbolLibrary=0 37 | SymbolPlatform=0 38 | UnitLibrary=0 39 | UnitPlatform=0 40 | UnitDeprecated=0 41 | HResultCompat=1 42 | HidingMember=1 43 | HiddenVirtual=1 44 | Garbage=1 45 | BoundsError=1 46 | ZeroNilCompat=1 47 | StringConstTruncated=1 48 | ForLoopVarVarPar=1 49 | TypedConstVarPar=1 50 | AsgToTypedConst=1 51 | CaseLabelRange=1 52 | ForVariable=1 53 | ConstructingAbstract=1 54 | ComparisonFalse=1 55 | ComparisonTrue=1 56 | ComparingSignedUnsigned=1 57 | CombiningSignedUnsigned=1 58 | UnsupportedConstruct=1 59 | FileOpen=1 60 | FileOpenUnitSrc=1 61 | BadGlobalSymbol=1 62 | DuplicateConstructorDestructor=1 63 | InvalidDirective=1 64 | PackageNoLink=1 65 | PackageThreadVar=1 66 | ImplicitImport=1 67 | HPPEMITIgnored=1 68 | NoRetVal=1 69 | UseBeforeDef=1 70 | ForLoopVarUndef=1 71 | UnitNameMismatch=1 72 | NoCFGFileFound=1 73 | MessageDirective=1 74 | ImplicitVariants=1 75 | UnicodeToLocale=1 76 | LocaleToUnicode=1 77 | ImagebaseMultiple=1 78 | SuspiciousTypecast=1 79 | PrivatePropAccessor=1 80 | UnsafeType=0 81 | UnsafeCode=0 82 | UnsafeCast=0 83 | 84 | [Linker] 85 | MapFile=0 86 | OutputObjs=0 87 | ConsoleApp=1 88 | DebugInfo=0 89 | RemoteSymbols=0 90 | MinStackSize=16384 91 | MaxStackSize=1048576 92 | ImageBase=4194304 93 | ExeDescription=RemObjects Pascal Script - Core Package 94 | 95 | [Directories] 96 | UnitOutputDir=..\Dcu\D6 97 | PackageDLLOutputDir=..\Dcu\D6 98 | PackageDCPOutputDir=..\Dcu\D6 99 | SearchPath= 100 | Conditionals= 101 | DebugSourceDirs= 102 | UsePackages=0 103 | 104 | [Version Info Keys] 105 | CompanyName=RemObjects Software 106 | InternalName= 107 | LegalCopyright= 108 | LegalTrademarks= 109 | ProductName=Pascal Script 110 | ProductVersion=3.0.0.0 111 | FileDescription= 112 | FileVersion=3.0.2.36 113 | OriginalFilename= 114 | 115 | -------------------------------------------------------------------------------- /Source/PascalScript_Core_D6.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/PascalScript_Core_D6.res -------------------------------------------------------------------------------- /Source/PascalScript_Core_D6_Personal.dof: -------------------------------------------------------------------------------- 1 | [FileVersion] 2 | Version=6.0 3 | [Compiler] 4 | A=8 5 | B=0 6 | C=1 7 | D=1 8 | E=0 9 | F=0 10 | G=1 11 | H=1 12 | I=1 13 | J=0 14 | K=0 15 | L=1 16 | M=0 17 | N=1 18 | O=1 19 | P=1 20 | Q=0 21 | R=0 22 | S=0 23 | T=0 24 | U=0 25 | V=1 26 | W=1 27 | X=1 28 | Y=1 29 | Z=1 30 | ShowHints=1 31 | ShowWarnings=1 32 | UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; 33 | [Linker] 34 | MapFile=0 35 | OutputObjs=0 36 | ConsoleApp=1 37 | DebugInfo=0 38 | RemoteSymbols=0 39 | MinStackSize=16384 40 | MaxStackSize=1048576 41 | ImageBase=4194304 42 | ExeDescription=RemObjects Pascal Script - Core Package 43 | [Directories] 44 | OutputDir= 45 | UnitOutputDir=..\Dcu\D6 46 | PackageDLLOutputDir=..\Dcu\D6 47 | PackageDCPOutputDir=..\Dcu\D6 48 | SearchPath= 49 | Packages= 50 | Conditionals= 51 | DebugSourceDirs= 52 | UsePackages=0 53 | [Parameters] 54 | RunParams= 55 | HostApplication= 56 | Launcher= 57 | UseLauncher=0 58 | DebugCWD= 59 | [Version Info] 60 | IncludeVerInfo=1 61 | AutoIncBuild=0 62 | MajorVer=3 63 | MinorVer=0 64 | Release=2 65 | Build=35 66 | Debug=0 67 | PreRelease=0 68 | Special=0 69 | Private=0 70 | DLL=0 71 | Locale=1033 72 | CodePage=1252 73 | [Version Info Keys] 74 | CompanyName=RemObjects Software 75 | FileDescription= 76 | FileVersion=3.0.2.35 77 | InternalName= 78 | LegalCopyright= 79 | LegalTrademarks= 80 | OriginalFilename= 81 | ProductName=Pascal Script 82 | ProductVersion=3.0.0.0 83 | Compile Date=Tuesday, April 20, 2004 4:36 PM 84 | -------------------------------------------------------------------------------- /Source/PascalScript_Core_D6_Personal.dpk: -------------------------------------------------------------------------------- 1 | package PascalScript_Core_D6_Personal; 2 | 3 | {$R *.res} 4 | {$ALIGN 8} 5 | {$ASSERTIONS ON} 6 | {$BOOLEVAL OFF} 7 | {$DEBUGINFO ON} 8 | {$EXTENDEDSYNTAX ON} 9 | {$IMPORTEDDATA ON} 10 | {$IOCHECKS ON} 11 | {$LOCALSYMBOLS ON} 12 | {$LONGSTRINGS ON} 13 | {$OPENSTRINGS ON} 14 | {$OPTIMIZATION ON} 15 | {$OVERFLOWCHECKS OFF} 16 | {$RANGECHECKS OFF} 17 | {$REFERENCEINFO ON} 18 | {$SAFEDIVIDE OFF} 19 | {$STACKFRAMES ON} 20 | {$TYPEDADDRESS OFF} 21 | {$VARSTRINGCHECKS ON} 22 | {$WRITEABLECONST OFF} 23 | {$MINENUMSIZE 1} 24 | {$IMAGEBASE $400000} 25 | {$DESCRIPTION 'RemObjects Pascal Script - Core Package'} 26 | {$DESIGNONLY} 27 | {$IMPLICITBUILD OFF} 28 | 29 | requires 30 | rtl, 31 | vcl; 32 | 33 | contains 34 | uPSC_extctrls in 'uPSC_extctrls.pas', 35 | uPSC_forms in 'uPSC_forms.pas', 36 | uPSC_graphics in 'uPSC_graphics.pas', 37 | uPSC_menus in 'uPSC_menus.pas', 38 | uPSC_std in 'uPSC_std.pas', 39 | uPSC_stdctrls in 'uPSC_stdctrls.pas', 40 | uPSCompiler in 'uPSCompiler.pas', 41 | uPSComponent in 'uPSComponent.pas', 42 | uPSComponent_COM in 'uPSComponent_COM.pas', 43 | uPSComponent_Controls in 'uPSComponent_Controls.pas', 44 | uPSComponent_Default in 'uPSComponent_Default.pas', 45 | uPSComponent_Forms in 'uPSComponent_Forms.pas', 46 | uPSComponent_StdCtrls in 'uPSComponent_StdCtrls.pas', 47 | uPSDebugger in 'uPSDebugger.pas', 48 | uPSDisassembly in 'uPSDisassembly.pas', 49 | uPSPreProcessor in 'uPSPreProcessor.pas', 50 | uPSR_buttons in 'uPSR_buttons.pas', 51 | uPSR_classes in 'uPSR_classes.pas', 52 | uPSR_comobj in 'uPSR_comobj.pas', 53 | uPSR_controls in 'uPSR_controls.pas', 54 | uPSR_dateutils in 'uPSR_dateutils.pas', 55 | uPSR_dll in 'uPSR_dll.pas', 56 | uPSR_extctrls in 'uPSR_extctrls.pas', 57 | UPSR_forms in 'uPSR_forms.pas', 58 | UPSR_graphics in 'uPSR_graphics.pas', 59 | uPSR_menus in 'uPSR_menus.pas', 60 | uPSR_std in 'uPSR_std.pas', 61 | uPSR_stdctrls in 'uPSR_stdctrls.pas', 62 | uPSRuntime in 'uPSRuntime.pas', 63 | uPSUtils in 'uPSUtils.pas', 64 | uPSC_buttons in 'uPSC_buttons.pas', 65 | uPSC_classes in 'uPSC_classes.pas', 66 | uPSC_comobj in 'uPSC_comobj.pas', 67 | uPSC_controls in 'uPSC_controls.pas', 68 | uPSC_dateutils in 'uPSC_dateutils.pas', 69 | uPSC_dll in 'uPSC_dll.pas', 70 | PascalScript_Core_Reg_noDB in 'PascalScript_Core_Reg_noDB.pas'; 71 | 72 | end. 73 | -------------------------------------------------------------------------------- /Source/PascalScript_Core_D6_Personal.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/PascalScript_Core_D6_Personal.res -------------------------------------------------------------------------------- /Source/PascalScript_Core_D7.cfg: -------------------------------------------------------------------------------- 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 | -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; 29 | -H+ 30 | -W+ 31 | -M 32 | -$M16384,1048576 33 | -K$00400000 34 | -N"..\Dcu\D7" 35 | -LE"..\Dcu\D7" 36 | -LN"..\Dcu\D7" 37 | -Z 38 | -w-SYMBOL_DEPRECATED 39 | -w-SYMBOL_LIBRARY 40 | -w-SYMBOL_PLATFORM 41 | -w-UNIT_LIBRARY 42 | -w-UNIT_PLATFORM 43 | -w-UNIT_DEPRECATED 44 | -w-UNSAFE_TYPE 45 | -w-UNSAFE_CODE 46 | -w-UNSAFE_CAST 47 | -------------------------------------------------------------------------------- /Source/PascalScript_Core_D7.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/PascalScript_Core_D7.res -------------------------------------------------------------------------------- /Source/PascalScript_Core_D9.cfg: -------------------------------------------------------------------------------- 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 | -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; 29 | -H+ 30 | -W+ 31 | -M 32 | -$M16384,1048576 33 | -K$00400000 34 | -N"..\Dcu\D9" 35 | -LE"..\Dcu\D9" 36 | -LN"..\Dcu\D9" 37 | -w-SYMBOL_DEPRECATED 38 | -w-SYMBOL_LIBRARY 39 | -w-SYMBOL_PLATFORM 40 | -w-SYMBOL_EXPERIMENTAL 41 | -w-UNIT_LIBRARY 42 | -w-UNIT_PLATFORM 43 | -w-UNIT_DEPRECATED 44 | -w-UNIT_EXPERIMENTAL 45 | -w-UNSAFE_TYPE 46 | -w-UNSAFE_CODE 47 | -w-UNSAFE_CAST 48 | -------------------------------------------------------------------------------- /Source/PascalScript_Core_D9.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/PascalScript_Core_D9.res -------------------------------------------------------------------------------- /Source/PascalScript_Core_Ext_D10.cfg: -------------------------------------------------------------------------------- 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 | -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; 29 | -H+ 30 | -W+ 31 | -M 32 | -$M16384,1048576 33 | -K$00400000 34 | -N0"..\Dcu\D10" 35 | -LE"..\Dcu\D10" 36 | -LN"..\Dcu\D10" 37 | -Z 38 | -w-SYMBOL_DEPRECATED 39 | -w-SYMBOL_LIBRARY 40 | -w-SYMBOL_PLATFORM 41 | -w-UNIT_LIBRARY 42 | -w-UNIT_PLATFORM 43 | -w-UNIT_DEPRECATED 44 | -w-UNSAFE_TYPE 45 | -w-UNSAFE_CODE 46 | -w-UNSAFE_CAST 47 | -------------------------------------------------------------------------------- /Source/PascalScript_Core_Ext_D10.dpk: -------------------------------------------------------------------------------- 1 | package PascalScript_Core_Ext_D10; 2 | 3 | {$R *.res} 4 | {$ALIGN 8} 5 | {$ASSERTIONS ON} 6 | {$BOOLEVAL OFF} 7 | {$DEBUGINFO ON} 8 | {$EXTENDEDSYNTAX ON} 9 | {$IMPORTEDDATA ON} 10 | {$IOCHECKS ON} 11 | {$LOCALSYMBOLS ON} 12 | {$LONGSTRINGS ON} 13 | {$OPENSTRINGS ON} 14 | {$OPTIMIZATION ON} 15 | {$OVERFLOWCHECKS OFF} 16 | {$RANGECHECKS OFF} 17 | {$REFERENCEINFO ON} 18 | {$SAFEDIVIDE OFF} 19 | {$STACKFRAMES OFF} 20 | {$TYPEDADDRESS OFF} 21 | {$VARSTRINGCHECKS ON} 22 | {$WRITEABLECONST OFF} 23 | {$MINENUMSIZE 1} 24 | {$IMAGEBASE $400000} 25 | {$DESCRIPTION 'RemObjects Pascal Script - Core Package Extension'} 26 | {$DESIGNONLY} 27 | {$IMPLICITBUILD OFF} 28 | 29 | requires 30 | rtl, 31 | PascalScript_Core_D10, 32 | vcl; 33 | 34 | contains 35 | uPSComponentExt in 'uPSComponentExt.pas', 36 | PascalScript_Core_Ext_Reg in 'PascalScript_Core_Ext_Reg.pas'; 37 | 38 | end. 39 | -------------------------------------------------------------------------------- /Source/PascalScript_Core_Ext_D10.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/PascalScript_Core_Ext_D10.res -------------------------------------------------------------------------------- /Source/PascalScript_Core_Ext_D11.cfg: -------------------------------------------------------------------------------- 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 | -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; 29 | -H+ 30 | -W+ 31 | -M 32 | -$M16384,1048576 33 | -K$00400000 34 | -N"..\Dcu\D7" 35 | -LE"..\Dcu\D7" 36 | -LN"..\Dcu\D7" 37 | -Z 38 | -w-SYMBOL_DEPRECATED 39 | -w-SYMBOL_LIBRARY 40 | -w-SYMBOL_PLATFORM 41 | -w-UNIT_LIBRARY 42 | -w-UNIT_PLATFORM 43 | -w-UNIT_DEPRECATED 44 | -w-UNSAFE_TYPE 45 | -w-UNSAFE_CODE 46 | -w-UNSAFE_CAST 47 | -------------------------------------------------------------------------------- /Source/PascalScript_Core_Ext_D11.dpk: -------------------------------------------------------------------------------- 1 | package PascalScript_Core_Ext_D11; 2 | 3 | {$R *.res} 4 | {$ALIGN 8} 5 | {$ASSERTIONS ON} 6 | {$BOOLEVAL OFF} 7 | {$DEBUGINFO ON} 8 | {$EXTENDEDSYNTAX ON} 9 | {$IMPORTEDDATA ON} 10 | {$IOCHECKS ON} 11 | {$LOCALSYMBOLS ON} 12 | {$LONGSTRINGS ON} 13 | {$OPENSTRINGS ON} 14 | {$OPTIMIZATION ON} 15 | {$OVERFLOWCHECKS OFF} 16 | {$RANGECHECKS OFF} 17 | {$REFERENCEINFO ON} 18 | {$SAFEDIVIDE OFF} 19 | {$STACKFRAMES OFF} 20 | {$TYPEDADDRESS OFF} 21 | {$VARSTRINGCHECKS ON} 22 | {$WRITEABLECONST OFF} 23 | {$MINENUMSIZE 1} 24 | {$IMAGEBASE $400000} 25 | {$DESCRIPTION 'RemObjects Pascal Script - Core Package Extension'} 26 | {$DESIGNONLY} 27 | {$IMPLICITBUILD OFF} 28 | 29 | requires 30 | rtl, 31 | PascalScript_Core_D11, 32 | vcl; 33 | 34 | contains 35 | uPSComponentExt in 'uPSComponentExt.pas', 36 | PascalScript_Core_Ext_Reg in 'PascalScript_Core_Ext_Reg.pas'; 37 | 38 | end. 39 | -------------------------------------------------------------------------------- /Source/PascalScript_Core_Ext_D11.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/PascalScript_Core_Ext_D11.res -------------------------------------------------------------------------------- /Source/PascalScript_Core_Ext_D6.cfg: -------------------------------------------------------------------------------- 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 | -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; 29 | -H+ 30 | -W+ 31 | -M 32 | -$M16384,1048576 33 | -K$00400000 34 | -N"..\Dcu\D6" 35 | -LE"..\Dcu\D6" 36 | -LN"..\Dcu\D6" 37 | -Z 38 | -------------------------------------------------------------------------------- /Source/PascalScript_Core_Ext_D6.dof: -------------------------------------------------------------------------------- 1 | [FileVersion] 2 | Version=6.0 3 | [Compiler] 4 | A=8 5 | B=0 6 | C=1 7 | D=1 8 | E=0 9 | F=0 10 | G=1 11 | H=1 12 | I=1 13 | J=0 14 | K=0 15 | L=1 16 | M=0 17 | N=1 18 | O=1 19 | P=1 20 | Q=0 21 | R=0 22 | S=0 23 | T=0 24 | U=0 25 | V=1 26 | W=0 27 | X=1 28 | Y=1 29 | Z=1 30 | ShowHints=1 31 | ShowWarnings=1 32 | UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; 33 | [Linker] 34 | MapFile=0 35 | OutputObjs=0 36 | ConsoleApp=1 37 | DebugInfo=0 38 | RemoteSymbols=0 39 | MinStackSize=16384 40 | MaxStackSize=1048576 41 | ImageBase=4194304 42 | ExeDescription=RemObjects Pascal Script - Core Package Extension 43 | [Directories] 44 | OutputDir= 45 | UnitOutputDir=..\Dcu\D6 46 | PackageDLLOutputDir=..\Dcu\D6 47 | PackageDCPOutputDir=..\Dcu\D6 48 | SearchPath= 49 | Packages= 50 | Conditionals= 51 | DebugSourceDirs= 52 | UsePackages=0 53 | [Parameters] 54 | RunParams= 55 | HostApplication= 56 | Launcher= 57 | UseLauncher=0 58 | DebugCWD= 59 | [Version Info] 60 | IncludeVerInfo=1 61 | AutoIncBuild=0 62 | MajorVer=1 63 | MinorVer=0 64 | Release=0 65 | Build=0 66 | Debug=0 67 | PreRelease=0 68 | Special=0 69 | Private=0 70 | DLL=0 71 | Locale=1049 72 | CodePage=1251 73 | [Version Info Keys] 74 | CompanyName= 75 | FileDescription= 76 | FileVersion=1.0.0.0 77 | InternalName= 78 | LegalCopyright= 79 | LegalTrademarks= 80 | OriginalFilename= 81 | ProductName= 82 | ProductVersion=1.0.0.0 83 | Comments= 84 | -------------------------------------------------------------------------------- /Source/PascalScript_Core_Ext_D6.dpk: -------------------------------------------------------------------------------- 1 | package PascalScript_Core_Ext_D6; 2 | 3 | {$R *.res} 4 | {$ALIGN 8} 5 | {$ASSERTIONS ON} 6 | {$BOOLEVAL OFF} 7 | {$DEBUGINFO ON} 8 | {$EXTENDEDSYNTAX ON} 9 | {$IMPORTEDDATA ON} 10 | {$IOCHECKS ON} 11 | {$LOCALSYMBOLS ON} 12 | {$LONGSTRINGS ON} 13 | {$OPENSTRINGS ON} 14 | {$OPTIMIZATION ON} 15 | {$OVERFLOWCHECKS OFF} 16 | {$RANGECHECKS OFF} 17 | {$REFERENCEINFO ON} 18 | {$SAFEDIVIDE OFF} 19 | {$STACKFRAMES OFF} 20 | {$TYPEDADDRESS OFF} 21 | {$VARSTRINGCHECKS ON} 22 | {$WRITEABLECONST OFF} 23 | {$MINENUMSIZE 1} 24 | {$IMAGEBASE $400000} 25 | {$DESCRIPTION 'RemObjects Pascal Script - Core Package Extension'} 26 | {$DESIGNONLY} 27 | {$IMPLICITBUILD OFF} 28 | 29 | requires 30 | rtl, 31 | PascalScript_Core_D6, 32 | vcl; 33 | 34 | contains 35 | uPSComponentExt in 'uPSComponentExt.pas', 36 | PascalScript_Core_Ext_Reg in 'PascalScript_Core_Ext_Reg.pas'; 37 | 38 | end. 39 | -------------------------------------------------------------------------------- /Source/PascalScript_Core_Ext_D6.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/PascalScript_Core_Ext_D6.res -------------------------------------------------------------------------------- /Source/PascalScript_Core_Ext_D7.cfg: -------------------------------------------------------------------------------- 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 | -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; 29 | -H+ 30 | -W+ 31 | -M 32 | -$M16384,1048576 33 | -K$00400000 34 | -N"..\Dcu\D7" 35 | -LE"..\Dcu\D7" 36 | -LN"..\Dcu\D7" 37 | -Z 38 | -w-SYMBOL_DEPRECATED 39 | -w-SYMBOL_LIBRARY 40 | -w-SYMBOL_PLATFORM 41 | -w-UNIT_LIBRARY 42 | -w-UNIT_PLATFORM 43 | -w-UNIT_DEPRECATED 44 | -w-UNSAFE_TYPE 45 | -w-UNSAFE_CODE 46 | -w-UNSAFE_CAST 47 | -------------------------------------------------------------------------------- /Source/PascalScript_Core_Ext_D7.dpk: -------------------------------------------------------------------------------- 1 | package PascalScript_Core_Ext_D7; 2 | 3 | {$R *.res} 4 | {$ALIGN 8} 5 | {$ASSERTIONS ON} 6 | {$BOOLEVAL OFF} 7 | {$DEBUGINFO ON} 8 | {$EXTENDEDSYNTAX ON} 9 | {$IMPORTEDDATA ON} 10 | {$IOCHECKS ON} 11 | {$LOCALSYMBOLS ON} 12 | {$LONGSTRINGS ON} 13 | {$OPENSTRINGS ON} 14 | {$OPTIMIZATION ON} 15 | {$OVERFLOWCHECKS OFF} 16 | {$RANGECHECKS OFF} 17 | {$REFERENCEINFO ON} 18 | {$SAFEDIVIDE OFF} 19 | {$STACKFRAMES OFF} 20 | {$TYPEDADDRESS OFF} 21 | {$VARSTRINGCHECKS ON} 22 | {$WRITEABLECONST OFF} 23 | {$MINENUMSIZE 1} 24 | {$IMAGEBASE $400000} 25 | {$DESCRIPTION 'RemObjects Pascal Script - Core Package Extension'} 26 | {$DESIGNONLY} 27 | {$IMPLICITBUILD OFF} 28 | 29 | requires 30 | rtl, 31 | PascalScript_Core_D7, 32 | vcl; 33 | 34 | contains 35 | uPSComponentExt in 'uPSComponentExt.pas', 36 | PascalScript_Core_Ext_Reg in 'PascalScript_Core_Ext_Reg.pas'; 37 | 38 | end. 39 | -------------------------------------------------------------------------------- /Source/PascalScript_Core_Ext_D7.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/PascalScript_Core_Ext_D7.res -------------------------------------------------------------------------------- /Source/PascalScript_Core_Ext_D9.cfg: -------------------------------------------------------------------------------- 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 | -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; 29 | -H+ 30 | -W+ 31 | -M 32 | -$M16384,1048576 33 | -K$00400000 34 | -N"..\Dcu\D9" 35 | -LE"..\Dcu\D9" 36 | -LN"..\Dcu\D9" 37 | -Z 38 | -w-SYMBOL_DEPRECATED 39 | -w-SYMBOL_LIBRARY 40 | -w-SYMBOL_PLATFORM 41 | -w-UNIT_LIBRARY 42 | -w-UNIT_PLATFORM 43 | -w-UNIT_DEPRECATED 44 | -w-UNSAFE_TYPE 45 | -w-UNSAFE_CODE 46 | -w-UNSAFE_CAST 47 | -------------------------------------------------------------------------------- /Source/PascalScript_Core_Ext_D9.dpk: -------------------------------------------------------------------------------- 1 | package PascalScript_Core_Ext_D9; 2 | 3 | {$R *.res} 4 | {$ALIGN 8} 5 | {$ASSERTIONS ON} 6 | {$BOOLEVAL OFF} 7 | {$DEBUGINFO ON} 8 | {$EXTENDEDSYNTAX ON} 9 | {$IMPORTEDDATA ON} 10 | {$IOCHECKS ON} 11 | {$LOCALSYMBOLS ON} 12 | {$LONGSTRINGS ON} 13 | {$OPENSTRINGS ON} 14 | {$OPTIMIZATION ON} 15 | {$OVERFLOWCHECKS OFF} 16 | {$RANGECHECKS OFF} 17 | {$REFERENCEINFO ON} 18 | {$SAFEDIVIDE OFF} 19 | {$STACKFRAMES OFF} 20 | {$TYPEDADDRESS OFF} 21 | {$VARSTRINGCHECKS ON} 22 | {$WRITEABLECONST OFF} 23 | {$MINENUMSIZE 1} 24 | {$IMAGEBASE $400000} 25 | {$DESCRIPTION 'RemObjects Pascal Script - Core Package Extension'} 26 | {$DESIGNONLY} 27 | {$IMPLICITBUILD OFF} 28 | 29 | requires 30 | rtl, 31 | PascalScript_Core_D9, 32 | vcl; 33 | 34 | contains 35 | uPSComponentExt in 'uPSComponentExt.pas', 36 | PascalScript_Core_Ext_Reg in 'PascalScript_Core_Ext_Reg.pas'; 37 | 38 | end. 39 | -------------------------------------------------------------------------------- /Source/PascalScript_Core_Ext_D9.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/PascalScript_Core_Ext_D9.res -------------------------------------------------------------------------------- /Source/PascalScript_Core_Ext_Reg.pas: -------------------------------------------------------------------------------- 1 | unit PascalScript_Core_Ext_Reg; 2 | 3 | {----------------------------------------------------------------------------} 4 | { RemObjects Pascal Script } 5 | { } 6 | { compiler: Delphi 2 and up, Kylix 3 and up } 7 | { platform: Win32, Linux } 8 | { } 9 | { (c)opyright RemObjects Software. all rights reserved. } 10 | { } 11 | {----------------------------------------------------------------------------} 12 | 13 | {$I PascalScript.inc} 14 | 15 | interface 16 | 17 | procedure Register; 18 | 19 | implementation 20 | 21 | uses 22 | Classes, 23 | uPSComponentExt; 24 | 25 | procedure Register; 26 | begin 27 | RegisterComponents('RemObjects Pascal Script',[TPSScriptExtension]); 28 | end; 29 | 30 | end. 31 | -------------------------------------------------------------------------------- /Source/PascalScript_Core_Glyphs.rc: -------------------------------------------------------------------------------- 1 | TPSScript BITMAP DISCARDABLE "Glyphs\TPSScript.bmp" 2 | TPSScriptDebugger BITMAP DISCARDABLE "Glyphs\TPSScriptDebugger.bmp" 3 | TPSDllPlugin BITMAP DISCARDABLE "Glyphs\TPSDllPlugin.bmp" 4 | 5 | TPSImport_Classes BITMAP DISCARDABLE "Glyphs\TPSImport_Classes.bmp" 6 | TPSImport_ComObj BITMAP DISCARDABLE "Glyphs\TPSImport_ComObj.bmp" 7 | TPSImport_Controls BITMAP DISCARDABLE "Glyphs\TPSImport_Controls.bmp" 8 | TPSImport_DateUtils BITMAP DISCARDABLE "Glyphs\TPSImport_DateUtils.bmp" 9 | TPSImport_DB BITMAP DISCARDABLE "Glyphs\TPSImport_DB.bmp" 10 | TPSImport_Forms BITMAP DISCARDABLE "Glyphs\TPSImport_Forms.bmp" 11 | TPSImport_StdCtrls BITMAP DISCARDABLE "Glyphs\TPSImport_StdCtrls.bmp" 12 | 13 | 14 | 15 | -------------------------------------------------------------------------------- /Source/PascalScript_Core_Glyphs.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/PascalScript_Core_Glyphs.res -------------------------------------------------------------------------------- /Source/PascalScript_Core_K3.kof: -------------------------------------------------------------------------------- 1 | [FileVersion] 2 | Version=7.0 3 | 4 | [Compiler] 5 | A=8 6 | B=0 7 | C=1 8 | D=1 9 | E=0 10 | F=0 11 | G=1 12 | H=1 13 | I=1 14 | J=0 15 | K=0 16 | L=1 17 | M=0 18 | N=1 19 | O=1 20 | P=1 21 | Q=0 22 | R=0 23 | S=0 24 | T=0 25 | U=0 26 | V=1 27 | W=1 28 | X=1 29 | Y=1 30 | Z=1 31 | ShowHints=1 32 | ShowWarnings=1 33 | UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; 34 | NamespacePrefix= 35 | SymbolDeprecated=0 36 | SymbolLibrary=0 37 | SymbolPlatform=0 38 | UnitLibrary=0 39 | UnitPlatform=0 40 | UnitDeprecated=0 41 | HResultCompat=1 42 | HidingMember=1 43 | HiddenVirtual=1 44 | Garbage=1 45 | BoundsError=1 46 | ZeroNilCompat=1 47 | StringConstTruncated=1 48 | ForLoopVarVarPar=1 49 | TypedConstVarPar=1 50 | AsgToTypedConst=1 51 | CaseLabelRange=1 52 | ForVariable=1 53 | ConstructingAbstract=1 54 | ComparisonFalse=1 55 | ComparisonTrue=1 56 | ComparingSignedUnsigned=1 57 | CombiningSignedUnsigned=1 58 | UnsupportedConstruct=1 59 | FileOpen=1 60 | FileOpenUnitSrc=1 61 | BadGlobalSymbol=1 62 | DuplicateConstructorDestructor=1 63 | InvalidDirective=1 64 | PackageNoLink=1 65 | PackageThreadVar=1 66 | ImplicitImport=1 67 | HPPEMITIgnored=1 68 | NoRetVal=1 69 | UseBeforeDef=1 70 | ForLoopVarUndef=1 71 | UnitNameMismatch=1 72 | NoCFGFileFound=1 73 | MessageDirective=1 74 | ImplicitVariants=1 75 | UnicodeToLocale=1 76 | LocaleToUnicode=1 77 | ImagebaseMultiple=1 78 | SuspiciousTypecast=1 79 | PrivatePropAccessor=1 80 | UnsafeType=0 81 | UnsafeCode=0 82 | UnsafeCast=0 83 | 84 | [Linker] 85 | MapFile=0 86 | OutputObjs=0 87 | ConsoleApp=1 88 | DebugInfo=0 89 | RemoteSymbols=0 90 | MinStackSize=16384 91 | MaxStackSize=1048576 92 | ImageBase=4194304 93 | ExeDescription=RemObjects Pascal Script - Core Package 94 | 95 | [Directories] 96 | UnitOutputDir=../Dcu/K3 97 | PackageDLLOutputDir=../Dcu/K3 98 | PackageDCPOutputDir=../Dcu/K3 99 | SearchPath= 100 | Conditionals= 101 | DebugSourceDirs= 102 | UsePackages=0 103 | 104 | [Version Info Keys] 105 | CompanyName=RemObjects Software 106 | InternalName= 107 | LegalCopyright= 108 | LegalTrademarks= 109 | ProductName=Pascal Script 110 | ProductVersion=3.0.0.0 111 | FileDescription= 112 | FileVersion=3.0.2.34 113 | OriginalFilename= 114 | 115 | -------------------------------------------------------------------------------- /Source/PascalScript_Core_Reg.pas: -------------------------------------------------------------------------------- 1 | unit PascalScript_Core_Reg; 2 | 3 | {---------------------------------------------------------------------------- 4 | / RemObjects Pascal Script 5 | / 6 | / compiler: Delphi 2 and up, Kylix 3 and up 7 | / platform: Win32, Linux 8 | / 9 | / (c)opyright RemObjects Software. all rights reserved. 10 | / 11 | ----------------------------------------------------------------------------} 12 | 13 | {$I PascalScript.inc} 14 | 15 | interface 16 | 17 | {$IFNDEF FPC} 18 | {$R PascalScript_Core_Glyphs.res} 19 | {$ENDIF} 20 | 21 | procedure Register; 22 | 23 | implementation 24 | 25 | uses 26 | Classes, 27 | {$IFDEF FPC} 28 | LResources, 29 | {$ENDIF} 30 | uPSComponent, 31 | uPSDebugger, 32 | uPSComponent_Default, 33 | uPSComponent_COM, 34 | uPSComponent_DB, 35 | uPSComponent_Forms, 36 | uPSComponent_Controls, 37 | uPSComponent_StdCtrls; 38 | 39 | procedure Register; 40 | begin 41 | RegisterComponents('Pascal Script', [TPSScript, 42 | TPSScriptDebugger, 43 | TPSDllPlugin, 44 | TPSImport_Classes, 45 | TPSImport_DateUtils, 46 | TPSImport_ComObj, 47 | TPSImport_DB, 48 | TPSImport_Forms, 49 | TPSImport_Controls, 50 | TPSImport_StdCtrls, 51 | TPSCustomPlugin]); 52 | end; 53 | 54 | 55 | {$IFDEF FPC} 56 | initialization; 57 | {$i pascalscript.lrs} 58 | {$ENDIF} 59 | 60 | 61 | end. 62 | -------------------------------------------------------------------------------- /Source/PascalScript_Core_Reg_noDB.pas: -------------------------------------------------------------------------------- 1 | unit PascalScript_Core_Reg_noDB; 2 | 3 | {----------------------------------------------------------------------------} 4 | { RemObjects Pascal Script 5 | { 6 | { compiler: Delphi 2 and up, Kylix 3 and up 7 | { platform: Win32, Linux 8 | { 9 | { (c)opyright RemObjects Software. all rights reserved. 10 | { 11 | {----------------------------------------------------------------------------} 12 | 13 | {$I PascalScript.inc} 14 | 15 | interface 16 | 17 | {$R PascalScript_Core_Glyphs.res} 18 | 19 | procedure Register; 20 | 21 | implementation 22 | 23 | uses 24 | Classes, 25 | uPSComponent, 26 | uPSComponentExt, 27 | uPSDebugger, 28 | uPSComponent_Default, 29 | uPSComponent_COM, 30 | uPSComponent_Forms, 31 | uPSComponent_Controls, 32 | uPSComponent_StdCtrls; 33 | 34 | procedure Register; 35 | begin 36 | RegisterComponents('Pascal Script', [TPSScript, 37 | TPSScriptDebugger, 38 | TPSDllPlugin, 39 | TPSImport_Classes, 40 | TPSImport_DateUtils, 41 | TPSImport_ComObj, 42 | TPSImport_Forms, 43 | TPSImport_Controls, 44 | TPSImport_StdCtrls, 45 | TPSScriptExtension]); 46 | end; 47 | 48 | end. 49 | -------------------------------------------------------------------------------- /Source/ThirdParty/ROPS_EXTENDED.dpk: -------------------------------------------------------------------------------- 1 | package ROPS_EXTENDED; 2 | 3 | {$R *.RES} 4 | {$ALIGN ON} 5 | {$ASSERTIONS ON} 6 | {$BOOLEVAL OFF} 7 | {$DEBUGINFO ON} 8 | {$EXTENDEDSYNTAX ON} 9 | {$IMPORTEDDATA ON} 10 | {$IOCHECKS ON} 11 | {$LOCALSYMBOLS ON} 12 | {$LONGSTRINGS ON} 13 | {$OPENSTRINGS ON} 14 | {$OPTIMIZATION ON} 15 | {$OVERFLOWCHECKS OFF} 16 | {$RANGECHECKS OFF} 17 | {$REFERENCEINFO ON} 18 | {$SAFEDIVIDE OFF} 19 | {$STACKFRAMES OFF} 20 | {$TYPEDADDRESS OFF} 21 | {$VARSTRINGCHECKS ON} 22 | {$WRITEABLECONST ON} 23 | {$MINENUMSIZE 1} 24 | {$IMAGEBASE $400000} 25 | {$DESCRIPTION 'Innerfuse Pascal Script 3 Extensions'} 26 | {$IMPLICITBUILD ON} 27 | 28 | requires 29 | JvCoreD5R, 30 | JvSystemD5R, 31 | JvNetD5R, 32 | VCLIB50, 33 | PascalScript_Core_D5; 34 | 35 | contains 36 | uPSI_JvMail in 'uPSI_JvMail.pas', 37 | uPSI_Registry in 'uPSI_Registry.pas', 38 | uPSI_IBX in 'uPSI_IBX.pas', 39 | uPS_ExtReg in 'uPS_ExtReg.pas', 40 | uPSI_Mask in 'uPSI_Mask.pas', 41 | uPSI_Dialogs in 'uPSI_Dialogs.pas'; 42 | 43 | end. 44 | -------------------------------------------------------------------------------- /Source/ThirdParty/uPS_ExtReg.pas: -------------------------------------------------------------------------------- 1 | unit uPS_ExtReg; 2 | 3 | interface 4 | 5 | procedure Register; 6 | 7 | implementation 8 | 9 | uses classes, uPSI_IBX, uPSI_Mask, upSI_JvMail, uPSI_Dialogs, uPSI_Registry; 10 | 11 | procedure Register; 12 | begin 13 | RegisterComponents('Pascal Script', [TPSImport_IBX, TPSImport_Mask, TPSImport_JvMail, 14 | TPSImport_Dialogs, TPSImport_Registry]); 15 | end; 16 | 17 | end. 18 | -------------------------------------------------------------------------------- /Source/__Clean.bat: -------------------------------------------------------------------------------- 1 | del *.bak 2 | del *.dcu 3 | del *.~* 4 | del *.o 5 | del *.ppu -------------------------------------------------------------------------------- /Source/pascalscript.pas: -------------------------------------------------------------------------------- 1 | { This file was automatically created by Lazarus. Do not edit! 2 | This source is only used to compile and install the package. 3 | } 4 | 5 | unit PascalScript; 6 | 7 | interface 8 | 9 | uses 10 | uPSRuntime, PascalScript_Core_Reg, uPSC_buttons, uPSC_classes, uPSC_controls, 11 | uPSC_dateutils, uPSC_DB, uPSC_dll, uPSC_extctrls, uPSC_forms, 12 | uPSC_graphics, uPSC_menus, uPSC_std, uPSC_stdctrls, uPSCompiler, 13 | uPSComponent, uPSComponent_Controls, uPSComponent_DB, uPSComponent_Default, 14 | uPSComponent_Forms, uPSComponent_StdCtrls, uPSComponentExt, uPSDebugger, 15 | uPSDisassembly, uPSPreProcessor, uPSR_buttons, uPSR_classes, uPSR_controls, 16 | uPSR_dateutils, uPSR_DB, uPSR_dll, uPSR_extctrls, uPSR_forms, 17 | uPSR_graphics, uPSR_menus, uPSR_std, uPSR_stdctrls, uPSUtils, 18 | uPSComponent_COM, uPSC_comobj, uPSR_comobj, LazarusPackageIntf; 19 | 20 | implementation 21 | 22 | procedure Register; 23 | begin 24 | RegisterUnit('PascalScript_Core_Reg', @PascalScript_Core_Reg.Register); 25 | end; 26 | 27 | initialization 28 | RegisterPackage('PascalScript', @Register); 29 | end. 30 | -------------------------------------------------------------------------------- /Source/readme.txt: -------------------------------------------------------------------------------- 1 | RemObjects Pascal 2 | 3 | Files in this distribution: 4 | help/ - Help documents (html format) and examples 5 | demo/ - Test application. 6 | demo_import/ - Test application with class library. 7 | demo_kylix/ - Kylix test application. 8 | ifps3.pas - The runtime interpreter 9 | ifpscomp.pas - The compiler 10 | ifps3common.pas - The Common types and constants used by IFPS3 11 | ifps3lib_std.pas - The standard library 12 | ifps3lib_stdr.pas - The standard library (runtime) 13 | ifps3utl.pas - The utility unit 14 | ifps3_def.inc - The include file 15 | readme.txt - Readme (this file) 16 | license.txt - License Agreement 17 | ifpidll2runtime.pas - runtime dll support. 18 | ifpidll2.pas - Compiler dll loading support. 19 | ifpicall.pas - Call library used by all runtime calling units. 20 | ifpii_*.pas - Import libraries (compiler) 21 | ifpiir_*.pas - Import libraries (runtime) 22 | IFPS3CompExec.pas - A component wrapper around IFPS3 23 | 24 | http://www.carlo-kok.com/ 25 | 26 | Installing: 27 | 28 | The .dpk file was build with Delphi 7, if you don't have Delphi 7, it might 29 | complain about missing packages, you can remove those from the requires list 30 | and remove and compiler directives it will complain about. Install the .dpk 31 | file, and add the IFPS3 directory to your search paths. 32 | 33 | -------------------------------------------------------------------------------- /Source/uPSC_comobj.pas: -------------------------------------------------------------------------------- 1 | { compiletime ComObj support } 2 | unit uPSC_comobj; 3 | 4 | {$I PascalScript.inc} 5 | interface 6 | uses 7 | uPSCompiler, uPSUtils; 8 | 9 | { 10 | 11 | Will register: 12 | 13 | function CreateOleObject(const ClassName: String): IDispatch; 14 | function GetActiveOleObject(const ClassName: String): IDispatch; 15 | 16 | } 17 | 18 | procedure SIRegister_ComObj(cl: TPSPascalCompiler); 19 | 20 | implementation 21 | 22 | procedure SIRegister_ComObj(cl: TPSPascalCompiler); 23 | begin 24 | {$IFDEF FPC} 25 | {$IFDEF PS_FPC_HAS_COM} 26 | cl.AddTypeS('HResult', 'LongInt'); 27 | cl.AddTypeS('TGUID', 'record D1: LongWord; D2: Word; D3: Word; D4: array[0..7] of Byte; end;'); 28 | cl.AddTypeS('TCLSID', 'TGUID'); 29 | cl.AddTypeS('TIID', 'TGUID'); 30 | cl.AddDelphiFunction('procedure OleCheck(Result: HResult);'); 31 | cl.AddDelphiFunction('function StringToGUID(const S: string): TGUID;'); 32 | cl.AddDelphiFunction('function CreateComObject(const ClassID: TGUID): IUnknown;'); 33 | cl.AddDelphiFunction('function CreateOleObject(const ClassName: string): IDispatch;'); 34 | cl.AddDelphiFunction('function GetActiveOleObject(const ClassName: string): IDispatch;'); 35 | {$ENDIF} 36 | {$ELSE} 37 | cl.AddTypeS('HResult', 'LongInt'); 38 | cl.AddTypeS('TGUID', 'record D1: LongWord; D2: Word; D3: Word; D4: array[0..7] of Byte; end;'); 39 | cl.AddTypeS('TCLSID', 'TGUID'); 40 | cl.AddTypeS('TIID', 'TGUID'); 41 | cl.AddDelphiFunction('procedure OleCheck(Result: HResult);'); 42 | {$IFNDEF PS_NOINTERFACES} 43 | {$IFDEF DELPHI3UP} 44 | cl.AddDelphiFunction('function StringToGUID(const S: string): TGUID;'); 45 | cl.AddDelphiFunction('function CreateComObject(const ClassID: TGUID): IUnknown;'); 46 | {$ENDIF} 47 | {$ENDIF} 48 | cl.AddDelphiFunction('function CreateOleObject(const ClassName: string): IDispatch;'); 49 | cl.AddDelphiFunction('function GetActiveOleObject(const ClassName: string): IDispatch;'); 50 | {$ENDIF} 51 | end; 52 | 53 | end. 54 | -------------------------------------------------------------------------------- /Source/uPSC_dateutils.pas: -------------------------------------------------------------------------------- 1 | { Compile time Date Time library } 2 | unit uPSC_dateutils; 3 | 4 | interface 5 | uses 6 | SysUtils, uPSCompiler, uPSUtils; 7 | 8 | 9 | procedure RegisterDateTimeLibrary_C(S: TPSPascalCompiler); 10 | 11 | implementation 12 | 13 | procedure RegisterDatetimeLibrary_C(S: TPSPascalCompiler); 14 | begin 15 | s.AddType('TDateTime', btDouble).ExportName := True; 16 | s.AddDelphiFunction('function EncodeDate(Year, Month, Day: Word): TDateTime;'); 17 | s.AddDelphiFunction('function EncodeTime(Hour, Min, Sec, MSec: Word): TDateTime;'); 18 | s.AddDelphiFunction('function TryEncodeDate(Year, Month, Day: Word; var Date: TDateTime): Boolean;'); 19 | s.AddDelphiFunction('function TryEncodeTime(Hour, Min, Sec, MSec: Word; var Time: TDateTime): Boolean;'); 20 | s.AddDelphiFunction('procedure DecodeDate(const DateTime: TDateTime; var Year, Month, Day: Word);'); 21 | s.AddDelphiFunction('procedure DecodeTime(const DateTime: TDateTime; var Hour, Min, Sec, MSec: Word);'); 22 | s.AddDelphiFunction('function DayOfWeek(const DateTime: TDateTime): Word;'); 23 | s.AddDelphiFunction('function Date: TDateTime;'); 24 | s.AddDelphiFunction('function Time: TDateTime;'); 25 | s.AddDelphiFunction('function Now: TDateTime;'); 26 | s.AddDelphiFunction('function DateTimeToUnix(D: TDateTime): Int64;'); 27 | s.AddDelphiFunction('function UnixToDateTime(U: Int64): TDateTime;'); 28 | 29 | s.AddDelphiFunction('function DateToStr(D: TDateTime): string;'); 30 | s.AddDelphiFunction('function StrToDate(const S: string): TDateTime;'); 31 | s.AddDelphiFunction('function FormatDateTime(const fmt: string; D: TDateTime): string;'); 32 | end; 33 | 34 | end. 35 | -------------------------------------------------------------------------------- /Source/uPSComponent.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/Source/uPSComponent.dcr -------------------------------------------------------------------------------- /Source/uPSComponent_COM.pas: -------------------------------------------------------------------------------- 1 | 2 | unit uPSComponent_COM; 3 | 4 | interface 5 | uses 6 | SysUtils, Classes, uPSComponent, uPSCompiler, uPSRuntime; 7 | type 8 | 9 | TPSImport_ComObj = class(TPSPlugin) 10 | private 11 | public 12 | procedure CompileImport1(CompExec: TPSScript); override; 13 | procedure ExecImport1(CompExec: TPSScript; const ri: TPSRuntimeClassImporter); override; 14 | end; 15 | 16 | TIFPS3CE_ComObj = class(TPSImport_ComObj); 17 | 18 | implementation 19 | uses 20 | uPSC_comobj, 21 | uPSR_comobj; 22 | 23 | 24 | { TPSImport_ComObj } 25 | 26 | procedure TPSImport_ComObj.CompileImport1(CompExec: TPSScript); 27 | begin 28 | SIRegister_ComObj(CompExec.Comp); 29 | end; 30 | 31 | 32 | procedure TPSImport_ComObj.ExecImport1(CompExec: TPSScript; 33 | const ri: TPSRuntimeClassImporter); 34 | begin 35 | RIRegister_ComObj(CompExec.Exec); 36 | end; 37 | 38 | end. 39 | -------------------------------------------------------------------------------- /Source/uPSComponent_Controls.pas: -------------------------------------------------------------------------------- 1 | unit uPSComponent_Controls; 2 | 3 | interface 4 | uses 5 | SysUtils, Classes, uPSComponent, uPSCompiler, uPSRuntime; 6 | type 7 | 8 | TPSImport_Controls = class(TPSPlugin) 9 | private 10 | FEnableStreams: Boolean; 11 | FEnableGraphics: Boolean; 12 | FEnableControls: Boolean; 13 | public 14 | procedure CompileImport1(CompExec: TPSScript); override; 15 | procedure ExecImport1(CompExec: TPSScript; const ri: TPSRuntimeClassImporter); override; 16 | public 17 | constructor Create(AOwner: TComponent); override; 18 | published 19 | 20 | property EnableStreams: Boolean read FEnableStreams write FEnableStreams; 21 | 22 | property EnableGraphics: Boolean read FEnableGraphics write FEnableGraphics; 23 | 24 | property EnableControls: Boolean read FEnableControls write FEnableControls; 25 | end; 26 | 27 | TIFPS3CE_Controls = class(TPSImport_Controls); 28 | 29 | implementation 30 | uses 31 | uPSC_graphics, 32 | uPSC_controls, 33 | uPSR_graphics, 34 | uPSR_controls; 35 | 36 | 37 | { TPSImport_Controls } 38 | 39 | procedure TPSImport_Controls.CompileImport1(CompExec: TPSScript); 40 | begin 41 | if FEnableGraphics then 42 | SIRegister_Graphics(CompExec.Comp, FEnableStreams); 43 | if FEnableControls then 44 | SIRegister_Controls(CompExec.Comp); 45 | end; 46 | 47 | constructor TPSImport_Controls.Create(AOwner: TComponent); 48 | begin 49 | inherited Create(AOwner); 50 | FEnableStreams := True; 51 | FEnableGraphics := True; 52 | FEnableControls := True; 53 | end; 54 | 55 | procedure TPSImport_Controls.ExecImport1(CompExec: TPSScript; 56 | const ri: TPSRuntimeClassImporter); 57 | begin 58 | if FEnableGraphics then 59 | RIRegister_Graphics(ri, FEnableStreams); 60 | if FEnableControls then 61 | RIRegister_Controls(ri); 62 | end; 63 | 64 | 65 | end. 66 | -------------------------------------------------------------------------------- /Source/uPSComponent_DB.pas: -------------------------------------------------------------------------------- 1 | unit uPSComponent_DB; 2 | 3 | interface 4 | {$I PascalScript.inc} 5 | uses 6 | SysUtils, Classes, uPSComponent, uPSRuntime, uPSCompiler; 7 | type 8 | 9 | TPSImport_DB = class(TPSPlugin) 10 | public 11 | procedure CompileImport1(CompExec: TPSScript); override; 12 | procedure ExecImport1(CompExec: TPSScript; const ri: TPSRuntimeClassImporter); override; 13 | public 14 | end; 15 | 16 | TIFPS3CE_DB = class(TPSImport_DB); 17 | 18 | implementation 19 | uses 20 | uPSC_DB, 21 | uPSR_DB; 22 | 23 | { TPSImport_DB } 24 | 25 | procedure TPSImport_DB.CompileImport1(CompExec: TPSScript); 26 | begin 27 | SIRegister_DB(CompExec.Comp); 28 | end; 29 | 30 | procedure TPSImport_DB.ExecImport1(CompExec: TPSScript; 31 | const ri: TPSRuntimeClassImporter); 32 | begin 33 | RIRegister_DB(RI); 34 | end; 35 | 36 | end. 37 | -------------------------------------------------------------------------------- /Source/uPSComponent_Default.pas: -------------------------------------------------------------------------------- 1 | unit uPSComponent_Default; 2 | {$I PascalScript.inc} 3 | interface 4 | uses 5 | SysUtils, Classes, uPSComponent, uPSCompiler, uPSRuntime; 6 | 7 | type 8 | 9 | TPSImport_DateUtils = class(TPSPlugin) 10 | public 11 | procedure CompOnUses(CompExec: TPSScript); override; 12 | procedure ExecOnUses(CompExec: TPSScript); override; 13 | end; 14 | 15 | TPSImport_Classes = class(TPSPlugin) 16 | private 17 | FEnableStreams: Boolean; 18 | FEnableClasses: Boolean; 19 | public 20 | procedure CompileImport1(CompExec: TPSScript); override; 21 | procedure ExecImport1(CompExec: TPSScript; const ri: TPSRuntimeClassImporter); override; 22 | public 23 | 24 | constructor Create(AOwner: TComponent); override; 25 | published 26 | 27 | property EnableStreams: Boolean read FEnableStreams write FEnableStreams; 28 | 29 | property EnableClasses: Boolean read FEnableClasses write FEnableClasses; 30 | end; 31 | 32 | TIFPS3CE_Std = class(TPSImport_Classes); 33 | 34 | TIFPS3CE_DateUtils = class(TPSImport_DateUtils); 35 | 36 | implementation 37 | uses 38 | uPSC_std, 39 | uPSR_std, 40 | uPSC_classes, 41 | uPSR_classes, 42 | uPSC_dateutils, 43 | uPSR_dateutils; 44 | 45 | { TPSImport_Classes } 46 | 47 | procedure TPSImport_Classes.CompileImport1(CompExec: TPSScript); 48 | begin 49 | SIRegister_Std(CompExec.Comp); 50 | if FEnableClasses then 51 | SIRegister_Classes(CompExec.Comp, FEnableStreams); 52 | end; 53 | 54 | procedure TPSImport_Classes.ExecImport1(CompExec: TPSScript; 55 | const ri: TPSRuntimeClassImporter); 56 | begin 57 | RIRegister_Std(Ri); 58 | if FEnableClasses then 59 | RIRegister_Classes(ri, FEnableStreams); 60 | end; 61 | 62 | constructor TPSImport_Classes.Create(AOwner: TComponent); 63 | begin 64 | inherited Create(AOwner); 65 | FEnableStreams := True; 66 | FEnableClasses := True; 67 | end; 68 | 69 | { TPSImport_DateUtils } 70 | 71 | procedure TPSImport_DateUtils.CompOnUses(CompExec: TPSScript); 72 | begin 73 | RegisterDateTimeLibrary_C(CompExec.Comp); 74 | end; 75 | 76 | procedure TPSImport_DateUtils.ExecOnUses(CompExec: TPSScript); 77 | begin 78 | RegisterDateTimeLibrary_R(CompExec.Exec); 79 | end; 80 | 81 | end. 82 | -------------------------------------------------------------------------------- /Source/uPSComponent_Forms.pas: -------------------------------------------------------------------------------- 1 | 2 | unit uPSComponent_Forms; 3 | 4 | interface 5 | uses 6 | SysUtils, Classes, uPSRuntime, uPSCompiler, uPSComponent; 7 | type 8 | 9 | TPSImport_Forms = class(TPSPlugin) 10 | private 11 | FEnableForms: Boolean; 12 | FEnableMenus: Boolean; 13 | public 14 | procedure CompileImport1(CompExec: TPSScript); override; 15 | procedure ExecImport1(CompExec: TPSScript; const ri: TPSRuntimeClassImporter); override; 16 | public 17 | constructor Create(AOwner: TComponent); override; 18 | published 19 | 20 | property EnableForms: Boolean read FEnableForms write FEnableForms; 21 | 22 | property EnableMenus: Boolean read FEnableMenus write FEnableMenus; 23 | end; 24 | 25 | TIFPS3CE_Forms = class(TPSImport_Forms); 26 | 27 | implementation 28 | uses 29 | uPSC_forms, 30 | uPSC_menus, 31 | uPSR_forms, 32 | uPSR_menus; 33 | 34 | { TPSImport_Forms } 35 | 36 | procedure TPSImport_Forms.CompileImport1(CompExec: TPSScript); 37 | begin 38 | if FEnableForms then 39 | SIRegister_Forms(CompExec.comp); 40 | if FEnableMenus then 41 | SIRegister_Menus(CompExec.comp); 42 | end; 43 | 44 | constructor TPSImport_Forms.Create(AOwner: TComponent); 45 | begin 46 | inherited Create(Aowner); 47 | FEnableForms := True; 48 | FEnableMenus := True; 49 | end; 50 | 51 | procedure TPSImport_Forms.ExecImport1(CompExec: TPSScript; 52 | const ri: TPSRuntimeClassImporter); 53 | begin 54 | if FEnableForms then 55 | RIRegister_Forms(ri); 56 | 57 | if FEnableMenus then 58 | begin 59 | RIRegister_Menus(ri); 60 | RIRegister_Menus_Routines(compexec.Exec); 61 | end; 62 | 63 | end; 64 | 65 | end. 66 | -------------------------------------------------------------------------------- /Source/uPSComponent_StdCtrls.pas: -------------------------------------------------------------------------------- 1 | 2 | unit uPSComponent_StdCtrls; 3 | 4 | interface 5 | uses 6 | SysUtils, Classes, uPSComponent, uPSCompiler, uPSRuntime; 7 | type 8 | 9 | TPSImport_StdCtrls = class(TPSPlugin) 10 | private 11 | FEnableButtons: Boolean; 12 | FEnableExtCtrls: Boolean; 13 | public 14 | procedure CompileImport1(CompExec: TPSScript); override; 15 | procedure ExecImport1(CompExec: TPSScript; const ri: TPSRuntimeClassImporter); override; 16 | public 17 | constructor Create(AOwner: TComponent); override; 18 | published 19 | 20 | property EnableExtCtrls: Boolean read FEnableExtCtrls write FEnableExtCtrls; 21 | 22 | property EnableButtons: Boolean read FEnableButtons write FEnableButtons; 23 | end; 24 | 25 | TIFPS3CE_StdCtrls = class(TPSImport_StdCtrls); 26 | 27 | 28 | implementation 29 | uses 30 | uPSC_buttons, 31 | uPSC_stdctrls, 32 | uPSC_extctrls, 33 | uPSR_buttons, 34 | uPSR_stdctrls, 35 | uPSR_extctrls; 36 | 37 | { TPSImport_StdCtrls } 38 | 39 | procedure TPSImport_StdCtrls.CompileImport1(CompExec: TPSScript); 40 | begin 41 | SIRegister_stdctrls(CompExec.Comp); 42 | if FEnableExtCtrls then 43 | SIRegister_ExtCtrls(CompExec.Comp); 44 | if FEnableButtons then 45 | SIRegister_Buttons(CompExec.Comp); 46 | end; 47 | 48 | constructor TPSImport_StdCtrls.Create(AOwner: TComponent); 49 | begin 50 | inherited Create(Aowner); 51 | FEnableButtons := True; 52 | FEnableExtCtrls := True; 53 | end; 54 | 55 | procedure TPSImport_StdCtrls.ExecImport1(CompExec: TPSScript; 56 | const ri: TPSRuntimeClassImporter); 57 | begin 58 | RIRegister_stdctrls(RI); 59 | if FEnableExtCtrls then 60 | RIRegister_ExtCtrls(RI); 61 | if FEnableButtons then 62 | RIRegister_Buttons(RI); 63 | end; 64 | 65 | end. 66 | -------------------------------------------------------------------------------- /Source/uPSR_buttons.pas: -------------------------------------------------------------------------------- 1 | 2 | unit uPSR_buttons; 3 | {$I PascalScript.inc} 4 | interface 5 | uses 6 | uPSRuntime, uPSUtils; 7 | 8 | 9 | procedure RIRegisterTSPEEDBUTTON(Cl: TPSRuntimeClassImporter); 10 | procedure RIRegisterTBITBTN(Cl: TPSRuntimeClassImporter); 11 | 12 | procedure RIRegister_Buttons(Cl: TPSRuntimeClassImporter); 13 | 14 | implementation 15 | uses 16 | Classes{$IFDEF CLX}, QControls, QButtons{$ELSE}, Controls, Buttons{$ENDIF}; 17 | 18 | procedure RIRegisterTSPEEDBUTTON(Cl: TPSRuntimeClassImporter); 19 | begin 20 | Cl.Add(TSPEEDBUTTON); 21 | end; 22 | 23 | 24 | procedure RIRegisterTBITBTN(Cl: TPSRuntimeClassImporter); 25 | begin 26 | Cl.Add(TBITBTN); 27 | end; 28 | 29 | procedure RIRegister_Buttons(Cl: TPSRuntimeClassImporter); 30 | begin 31 | RIRegisterTSPEEDBUTTON(cl); 32 | RIRegisterTBITBTN(cl); 33 | end; 34 | 35 | // PS_MINIVCL changes by Martijn Laan 36 | 37 | 38 | end. 39 | -------------------------------------------------------------------------------- /Source/uPSR_dateutils.pas: -------------------------------------------------------------------------------- 1 | 2 | unit uPSR_dateutils; 3 | {$I PascalScript.inc} 4 | interface 5 | uses 6 | SysUtils, uPSRuntime; 7 | 8 | 9 | 10 | procedure RegisterDateTimeLibrary_R(S: TPSExec); 11 | 12 | implementation 13 | 14 | function TryEncodeDate(Year, Month, Day: Word; var Date: TDateTime): Boolean; 15 | begin 16 | try 17 | Date := EncodeDate(Year, Month, Day); 18 | Result := true; 19 | except 20 | Result := false; 21 | end; 22 | end; 23 | 24 | function TryEncodeTime(Hour, Min, Sec, MSec: Word; var Time: TDateTime): Boolean; 25 | begin 26 | try 27 | Time := EncodeTime(hour, Min, Sec, MSec); 28 | Result := true; 29 | except 30 | Result := false; 31 | end; 32 | end; 33 | 34 | function DateTimeToUnix(D: TDateTime): Int64; 35 | begin 36 | Result := Round((D - 25569) * 86400); 37 | end; 38 | 39 | function UnixToDateTime(U: Int64): TDateTime; 40 | begin 41 | Result := U / 86400 + 25569; 42 | end; 43 | 44 | procedure RegisterDateTimeLibrary_R(S: TPSExec); 45 | begin 46 | S.RegisterDelphiFunction(@EncodeDate, 'EncodeDate', cdRegister); 47 | S.RegisterDelphiFunction(@EncodeTime, 'EncodeTime', cdRegister); 48 | S.RegisterDelphiFunction(@TryEncodeDate, 'TryEncodeDate', cdRegister); 49 | S.RegisterDelphiFunction(@TryEncodeTime, 'TryEncodeTime', cdRegister); 50 | S.RegisterDelphiFunction(@DecodeDate, 'DecodeDate', cdRegister); 51 | S.RegisterDelphiFunction(@DecodeTime, 'DecodeTime', cdRegister); 52 | S.RegisterDelphiFunction(@DayOfWeek, 'DayOfWeek', cdRegister); 53 | S.RegisterDelphiFunction(@Date, 'Date', cdRegister); 54 | S.RegisterDelphiFunction(@Time, 'Time', cdRegister); 55 | S.RegisterDelphiFunction(@Now, 'Now', cdRegister); 56 | S.RegisterDelphiFunction(@DateTimeToUnix, 'DateTimeToUnix', cdRegister); 57 | S.RegisterDelphiFunction(@UnixToDateTime, 'UnixToDateTime', cdRegister); 58 | S.RegisterDelphiFunction(@DateToStr, 'DateToStr', cdRegister); 59 | S.RegisterDelphiFunction(@FormatDateTime, 'FormatDateTime', cdRegister); 60 | S.RegisterDelphiFunction(@StrToDate, 'StrToDate', cdRegister); 61 | end; 62 | 63 | end. 64 | -------------------------------------------------------------------------------- /dunit/ifps3_DUnit.dpr: -------------------------------------------------------------------------------- 1 | program ifps3_DUnit; 2 | 3 | uses 4 | Forms, 5 | TestFramework, 6 | GUITestRunner, 7 | CompilerTestBase in 'CompilerTestBase.pas', 8 | CompilerTestSimple in 'CompilerTestSimple.pas', 9 | CompilerTestFunctions in 'CompilerTestFunctions.pas', 10 | CompileTestExtended in 'CompileTestExtended.pas'; 11 | 12 | {$R *.res} 13 | 14 | var 15 | AGUITestRunner: TGUITestRunner; 16 | begin 17 | Application.Initialize; 18 | Application.CreateForm(TGUITestRunner, AGUITestRunner); 19 | AGUITestRunner.Suite := RegisteredTests; 20 | Application.Run; 21 | end. 22 | -------------------------------------------------------------------------------- /dunit/ifps3_DUnit.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/dunit/ifps3_DUnit.res -------------------------------------------------------------------------------- /dunit/ifps3_DUnit_Auto.dpr: -------------------------------------------------------------------------------- 1 | program ifps3_DUnit_Auto; 2 | {$APPTYPE CONSOLE} 3 | 4 | uses 5 | TestFramework, 6 | TextTestRunner, 7 | CompilerTestBase in 'CompilerTestBase.pas', 8 | CompilerTestSimple in 'CompilerTestSimple.pas', 9 | CompilerTestFunctions in 'CompilerTestFunctions.pas', 10 | CompileTestExtended in 'CompileTestExtended.pas'; 11 | 12 | exports 13 | RegisteredTests name 'Test'; 14 | 15 | {$R *.RES} 16 | begin 17 | RunRegisteredTests(rxbHaltOnFailures); 18 | end. 19 | -------------------------------------------------------------------------------- /dunit/ifps3_DUnit_Auto.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/dunit/ifps3_DUnit_Auto.res -------------------------------------------------------------------------------- /help/Pascal Script.dox: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/help/Pascal Script.dox -------------------------------------------------------------------------------- /patch.exe: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/patch.exe -------------------------------------------------------------------------------- /unit-importing/CMDimp.dpr: -------------------------------------------------------------------------------- 1 | program CMDimp; 2 | 3 | {$APPTYPE CONSOLE} 4 | 5 | uses 6 | SysUtils, 7 | Classes, 8 | ParserU in 'ParserU.pas', 9 | ParserUtils in 'ParserUtils.pas'; 10 | 11 | {$R *.res} 12 | 13 | var 14 | s: TStringList; 15 | x: TUnitParser; 16 | 17 | begin 18 | if ParamCount = 0 then 19 | begin 20 | Writeln('Command Line Unit Importing'); 21 | writeln; 22 | writeln('cmdimp '); 23 | halt(1); 24 | end; 25 | s := TStringList.Create; 26 | try 27 | s.LoadFromFile(Paramstr(1)); 28 | x := TUnitParser.Create(''); 29 | x.Unitname := ExtractFileName(paramstr(1)); 30 | x.SingleUnit := true; 31 | x.ParseUnit(s.Text); 32 | x.SaveToPath(ExtractFilePath(Paramstr(1))); 33 | Writeln('Successfully processed. Saved to file: '+ExtractFilePath(Paramstr(1))+x.UnitNameCmp); 34 | 35 | finally 36 | s.Free; 37 | end; 38 | end. 39 | -------------------------------------------------------------------------------- /unit-importing/CMDimp.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/unit-importing/CMDimp.res -------------------------------------------------------------------------------- /unit-importing/FormSettings.pas: -------------------------------------------------------------------------------- 1 | unit FormSettings; 2 | 3 | interface 4 | 5 | uses 6 | Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, 7 | StdCtrls, ExtCtrls; 8 | 9 | type 10 | TfrmSettings = class(TForm) 11 | Button1: TButton; 12 | Button2: TButton; 13 | Label1: TLabel; 14 | edtOutPutDir: TEdit; 15 | cbUseUnitAtCompileTime: TCheckBox; 16 | btnOutPutDir: TButton; 17 | cbCreateOneImportfile: TCheckBox; 18 | Bevel1: TBevel; 19 | Default: TCheckBox; 20 | edtPrefix: TEdit; 21 | Label2: TLabel; 22 | procedure btnOutPutDirClick(Sender: TObject); 23 | private 24 | { Private declarations } 25 | public 26 | { Public declarations } 27 | end; 28 | 29 | var 30 | frmSettings: TfrmSettings; 31 | 32 | implementation 33 | 34 | uses FileCtrl; 35 | 36 | {$R *.DFM} 37 | 38 | procedure TfrmSettings.btnOutPutDirClick(Sender: TObject); 39 | var 40 | dir : String; 41 | begin 42 | Dir := edtOutPutDir.Text; 43 | if SelectDirectory(Dir, [sdAllowCreate, sdPerformCreate, sdPrompt], 0) then 44 | edtOutPutDir.Text := Dir; 45 | end; 46 | 47 | end. 48 | -------------------------------------------------------------------------------- /unit-importing/Import/Extendedreg.pas: -------------------------------------------------------------------------------- 1 | unit Extendedreg; 2 | 3 | interface 4 | 5 | procedure Register; 6 | 7 | implementation 8 | 9 | uses classes, IFSI_IBX, {IFSI_lumSystem, IFSI_ImpExpStruct,} IFSI_JvMail, IFSI_Dialogs, IFSI_Registry; 10 | 11 | procedure Register; 12 | begin 13 | RegisterComponents('Innerfuse', [TIFPS3CE_IBX, {TIFPS3CE_lumSystem, TIFPS3CE_ImpExpStruct,} 14 | TIFPS3CE_JvMail, TIFPS3CE_Dialogs, TIFPS3CE_Registry]); 15 | 16 | end; 17 | 18 | end. 19 | -------------------------------------------------------------------------------- /unit-importing/Import/IFPS3_EXTENDED.dpk: -------------------------------------------------------------------------------- 1 | package IFPS3_IBX; 2 | 3 | {$R *.RES} 4 | {$ALIGN ON} 5 | {$ASSERTIONS ON} 6 | {$BOOLEVAL OFF} 7 | {$DEBUGINFO ON} 8 | {$EXTENDEDSYNTAX ON} 9 | {$IMPORTEDDATA ON} 10 | {$IOCHECKS ON} 11 | {$LOCALSYMBOLS ON} 12 | {$LONGSTRINGS ON} 13 | {$OPENSTRINGS ON} 14 | {$OPTIMIZATION ON} 15 | {$OVERFLOWCHECKS OFF} 16 | {$RANGECHECKS OFF} 17 | {$REFERENCEINFO ON} 18 | {$SAFEDIVIDE OFF} 19 | {$STACKFRAMES OFF} 20 | {$TYPEDADDRESS OFF} 21 | {$VARSTRINGCHECKS ON} 22 | {$WRITEABLECONST ON} 23 | {$MINENUMSIZE 1} 24 | {$IMAGEBASE $400000} 25 | {$DESCRIPTION 'Innerfuse Pascal Script 3 Extensions'} 26 | {$IMPLICITBUILD ON} 27 | 28 | requires 29 | ifps3pkg, 30 | JvCoreD5R, 31 | JvSystemD5R, 32 | JvNetD5R, 33 | VCLIB50; 34 | 35 | contains 36 | Extendedreg in 'Extendedreg.pas', 37 | IFSI_JvMail in 'IFSI_JvMail.pas', 38 | IFSI_Registry in 'IFSI_Registry.pas', 39 | IFSI_IBX in 'IFSI_IBX.pas'; 40 | 41 | end. 42 | -------------------------------------------------------------------------------- /unit-importing/Import/IFSI_IBXreg.pas: -------------------------------------------------------------------------------- 1 | unit IFSI_IBXreg; 2 | 3 | interface 4 | 5 | procedure Register; 6 | 7 | implementation 8 | 9 | uses classes, IFSI_IBX,IFSI_lumSystem, IFSI_ImpExpStruct, IFSI_JvMail,IFSI_Dialogs,IFSI_Registry; 10 | 11 | procedure Register; 12 | begin 13 | RegisterComponents('Innerfuse', [TIFPS3CE_IBX, TIFPS3CE_lumSystem, TIFPS3CE_ImpExpStruct, 14 | TIFPS3CE_JvMail, TIFPS3CE_Dialogs, TIFPS3CE_Registry]); 15 | 16 | end; 17 | 18 | end. 19 | -------------------------------------------------------------------------------- /unit-importing/TB_ReadMe.txt: -------------------------------------------------------------------------------- 1 | 2 | A modified UnitParser which creates a single import unit 3 | --------------------------------------------------------- 4 | IFPS3 1.21 5 | Delphi 7 Enterprise 6 | --------------------------------------------------------- 7 | 8 | Hi there 9 | 10 | I've modified the "imp" application a little. 11 | The "imp" application is written by M. Knight. 12 | 13 | Mainly I've added the private 14 | procedure FinishParseSingleUnit; 15 | to the ParserU.TUnitParser 16 | 17 | Now the UnitParser, (if the -added property- 18 | SingleUnit is True), creates a single import unit file 19 | after parsing the source file. 20 | 21 | The produced import file is given the name 22 | UnitPrefix + '_' + SourceUnitName + '.pas' 23 | when SingleUnit is True 24 | 25 | Also the 26 | procedure TUnitParser.SaveToPath(const Path: string); 27 | is added in order to save the produced file 28 | (or files if SingleUnit is False) 29 | 30 | When SingleUnit is True the produced import file 31 | contains 32 | the compile-time registration code 33 | the run-time registration code 34 | and a TIFPS3Plugin descendant, say TImport_XXX, 35 | which imports the registration code 36 | 37 | In order to use the produced import file, add 38 | its name to a uses clause and then code 39 | XXX_Importer := TImport_XXX.Create(Self); 40 | TIFPS3CEPluginItem(Debugger.Plugins.Add).Plugin := XXX_Importer; 41 | or just install TImport_XXX as a component, 42 | drop it on a form, etc. etc... 43 | 44 | I prefer the first method since it's more flexible 45 | and I modify my units all the time. 46 | 47 | Also, I've created an import file for the DBClient.pas 48 | since I use the TClientDataset too often. 49 | The DBClientImport folder contains the -truncated- 50 | source of the DBClient.pas (that's all the code I import) 51 | and the produced import file. You may take a look. 52 | 53 | 54 | Theo Bebekis 55 | teo@epektasis.gr 56 | 57 | -------------------------------------------------------------------------------- /unit-importing/UFrmGotoLine.dfm: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/unit-importing/UFrmGotoLine.dfm -------------------------------------------------------------------------------- /unit-importing/UFrmGotoLine.pas: -------------------------------------------------------------------------------- 1 | unit uFrmGotoLine; 2 | 3 | interface 4 | 5 | uses 6 | Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, 7 | Dialogs, StdCtrls, SynEditTypes; 8 | 9 | type 10 | TfrmGotoLine = class(TForm) 11 | edtCharNumber: TEdit; 12 | edtLineNumber: TEdit; 13 | Button1: TButton; 14 | btnGoto: TButton; 15 | lblLineNumber: TLabel; 16 | lblCharNumber: TLabel; 17 | procedure FormShow(Sender: TObject); 18 | private 19 | function GetCaret: TBufferCoord; 20 | procedure SetCaret(const Value: TBufferCoord); 21 | procedure SetChar(const Value: Integer); 22 | procedure SetLine(const Value: Integer); 23 | function GetChar: Integer; 24 | function GetLine: Integer; 25 | { Private declarations } 26 | public 27 | { Public declarations } 28 | property Char : Integer read GetChar write SetChar; 29 | property Line : Integer read GetLine write setLine; 30 | property CaretXY:TBufferCoord read GetCaret write SetCaret; 31 | end; 32 | 33 | var 34 | frmGotoLine: TfrmGotoLine; 35 | 36 | implementation 37 | 38 | {$R *.dfm} 39 | 40 | { TfrmGotoLine } 41 | 42 | function TfrmGotoLine.GetCaret: TBufferCoord; 43 | begin 44 | Result.Char := StrToInt(edtCharNumber.Text); 45 | Result.Line := StrToInt(edtLineNumber.Text); 46 | end; 47 | 48 | function TfrmGotoLine.GetChar: Integer; 49 | begin 50 | Result := StrToInt(edtCharNumber.Text) 51 | end; 52 | 53 | function TfrmGotoLine.GetLine: Integer; 54 | begin 55 | Result := StrToInt(edtLineNumber.Text) 56 | end; 57 | 58 | procedure TfrmGotoLine.SetCaret(const Value: TBufferCoord); 59 | begin 60 | edtCharNumber.Text := IntToStr(Value.Char); 61 | edtLineNumber.Text := IntToStr(Value.Line); 62 | end; 63 | 64 | procedure TfrmGotoLine.SetChar(const Value: Integer); 65 | begin 66 | edtCharNumber.Text := IntToStr(Value); 67 | end; 68 | 69 | procedure TfrmGotoLine.SetLine(const Value: Integer); 70 | begin 71 | edtLineNumber.Text := IntToStr(Value); 72 | end; 73 | 74 | procedure TfrmGotoLine.FormShow(Sender: TObject); 75 | begin 76 | edtLineNumber.SetFocus; 77 | end; 78 | 79 | end. 80 | -------------------------------------------------------------------------------- /unit-importing/bigini.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/unit-importing/bigini.pas -------------------------------------------------------------------------------- /unit-importing/imp.dpr: -------------------------------------------------------------------------------- 1 | program imp; 2 | 3 | uses 4 | Forms, 5 | Main in 'Main.pas' {frmMain}, 6 | ParserU in 'ParserU.pas', 7 | ParserUtils in 'ParserUtils.pas', 8 | BigIni in 'BigIni.pas', 9 | FormSettings in 'FormSettings.pas' {frmSettings}, 10 | UFrmGotoLine in 'UFrmGotoLine.pas' {frmGotoLine}; 11 | 12 | {$R *.res} 13 | 14 | begin 15 | Application.Initialize; 16 | Application.CreateForm(TfrmMain, frmMain); 17 | Application.CreateForm(TfrmGotoLine, frmGotoLine); 18 | Application.Run; 19 | end. 20 | -------------------------------------------------------------------------------- /unit-importing/imp.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/unit-importing/imp.res -------------------------------------------------------------------------------- /unit-importing/psUnitImporter.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/remobjects/pascalscript/997e3e88dc10e4b19eee7256f9f9ecb92ced2aac/unit-importing/psUnitImporter.ico --------------------------------------------------------------------------------