Upgraded and removed autogenerated units

Examples/Demox/Clouds/Clouds_c.cbproj

@@ -8,7 +8,7 @@
         <Config Condition="'$(Config)'==''">Debug</Config>
         <Platform Condition="'$(Platform)'==''">Win64x</Platform>
         <ProjectName Condition="'$(ProjectName)'==''">Clouds_c</ProjectName>
-        <TargetedPlatforms>1048579</TargetedPlatforms>
+        <TargetedPlatforms>1048576</TargetedPlatforms>
         <AppType>Application</AppType>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
@@ -89,7 +89,7 @@
         <DCC_Namespace>System;Xml;Data;Datasnap;Web;Soap;$(DCC_Namespace)</DCC_Namespace>
         <Icon_MainIcon>$(BDS)\bin\cbuilder_PROJECTICON.ico</Icon_MainIcon>
         <Icns_MainIcns>$(BDS)\bin\cbuilder_PROJECTICNS.icns</Icns_MainIcns>
-        <AllPackageLibs>rtl.lib;fmx.lib;GXScene_GBE.lib</AllPackageLibs>
+        <AllPackageLibs>rtl.lib;fmx.lib;GXScene_GBE_DTRT.lib</AllPackageLibs>
         <_TCHARMapping>wchar_t</_TCHARMapping>
         <Multithreaded>true</Multithreaded>
         <ILINK_LibraryPath>D:\LIBRARY\FMX_Demos\GBE_3D\demos\Clouds\;D:\GLScene\Examples\Demox\Clouds\;..\..\lib\Win64x;$(ILINK_LibraryPath)</ILINK_LibraryPath>
@@ -161,11 +161,11 @@
         <AppDPIAwarenessMode>PerMonitorV2</AppDPIAwarenessMode>
         <LinkPackageImports>rtl.bpi;fmx.bpi</LinkPackageImports>
         <BCC_UseClassicCompiler>false</BCC_UseClassicCompiler>
-        <ILINK_LibraryPath>$(BDSLIB)\$(PLATFORM)$(CC_SUFFIX)\debug;..\..\lib\$(Platform);$(ILINK_LibraryPath)</ILINK_LibraryPath>
+        <ILINK_LibraryPath>$(BDSLIB)\$(PLATFORM)$(CC_SUFFIX)\debug;..\..\..\lib\$(Platform);$(ILINK_LibraryPath)</ILINK_LibraryPath>
         <VerInfo_IncludeVerInfo>true</VerInfo_IncludeVerInfo>
-        <IncludePath>..\..\include\$(Platform);$(IncludePath)</IncludePath>
+        <IncludePath>..\..\..\include\$(Platform);$(IncludePath)</IncludePath>
         <VerInfo_Locale>1033</VerInfo_Locale>
-        <LinkPackageStatics>GXScene_GBE.lib</LinkPackageStatics>
+        <LinkPackageStatics>GXScene_GBE_DTRT.lib</LinkPackageStatics>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Cfg_1_Win64)'!=''">
         <AppDPIAwarenessMode>PerMonitorV2</AppDPIAwarenessMode>
@@ -177,9 +177,9 @@
         <AppDPIAwarenessMode>PerMonitorV2</AppDPIAwarenessMode>
         <VerInfo_IncludeVerInfo>true</VerInfo_IncludeVerInfo>
         <VerInfo_Locale>1033</VerInfo_Locale>
-        <IncludePath>..\..\..\include\Win64x;..\..\..\include\Win64;..\..\..\include\Win32;$(IncludePath)</IncludePath>
-        <ILINK_LibraryPath>..\..\..\lib\Win64x</ILINK_LibraryPath>
-        <LinkPackageImports>rtl.bpi;fmx.bpi;GXScene_GBE.bpi</LinkPackageImports>
+        <IncludePath>..\..\..\include\$(Platform)\</IncludePath>
+        <ILINK_LibraryPath>..\..\..\lib\$(Platform)\</ILINK_LibraryPath>
+        <LinkPackageImports>rtl.bpi;fmx.bpi;GXScene_GBE_DTRT.bpi</LinkPackageImports>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Cfg_2)'!=''">
         <Defines>NDEBUG;$(Defines)</Defines>
@@ -233,12 +233,6 @@
                     <Source Name="MainSource">Clouds_c.cpp</Source>
                 </Source>
                 <Excluded_Packages>
-                    <Excluded_Packages Name="C:\Users\Public\Documents\Embarcadero\Studio\23.0\Bpl\GLScene_DT.bpl">GLScene Engine</Excluded_Packages>
-                    <Excluded_Packages Name="C:\Users\Public\Documents\Embarcadero\Studio\23.0\Bpl\GLScene_Sounds_DT.bpl">GLScene Sound Managers</Excluded_Packages>
-                    <Excluded_Packages Name="C:\Users\Public\Documents\Embarcadero\Studio\23.0\Bpl\GLScene_Physics_DT.bpl">GLScene Physics Managers</Excluded_Packages>
-                    <Excluded_Packages Name="C:\Users\Public\Documents\Embarcadero\Studio\23.0\Bpl\GBComps.bpl">Geoblock - Components</Excluded_Packages>
-                    <Excluded_Packages Name="C:\Users\Public\Documents\Embarcadero\Studio\23.0\Bpl\GLScene_Cg_DT.bpl">GLScene Cg Shaders</Excluded_Packages>
-                    <Excluded_Packages Name="C:\Users\Public\Documents\Embarcadero\Studio\23.0\Bpl\GLScene_GPU_DT.bpl">GLScene GPU Computing</Excluded_Packages>
                     <Excluded_Packages Name="$(BDSBIN)\bcboffice2k290.bpl">Embarcadero C++Builder Office 2000 Servers Package</Excluded_Packages>
                     <Excluded_Packages Name="$(BDSBIN)\bcbofficexp290.bpl">Embarcadero C++Builder Office XP Servers Package</Excluded_Packages>
                     <Excluded_Packages Name="$(BDSBIN)\dcloffice2k290.bpl">Microsoft Office 2000 Sample Automation Server Wrapper Components</Excluded_Packages>
@@ -1273,8 +1267,8 @@
                 <ProjectRoot Platform="Win64x" Name="$(PROJECTNAME)"/>
             </Deployment>
             <Platforms>
-                <Platform value="Win32">True</Platform>
-                <Platform value="Win64">True</Platform>
+                <Platform value="Win32">False</Platform>
+                <Platform value="Win64">False</Platform>
                 <Platform value="Win64x">True</Platform>
             </Platforms>
         </BorlandProject>

Examples/Demox/Cube/Cube_c.cbproj

@@ -8,7 +8,7 @@
         <Config Condition="'$(Config)'==''">Debug</Config>
         <Platform Condition="'$(Platform)'==''">Win64x</Platform>
         <ProjectName Condition="'$(ProjectName)'==''">Cube_c</ProjectName>
-        <TargetedPlatforms>1048579</TargetedPlatforms>
+        <TargetedPlatforms>1048576</TargetedPlatforms>
         <AppType>Application</AppType>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
@@ -89,7 +89,7 @@
         <DCC_Namespace>System;Xml;Data;Datasnap;Web;Soap;$(DCC_Namespace)</DCC_Namespace>
         <Icon_MainIcon>$(BDS)\bin\cbuilder_PROJECTICON.ico</Icon_MainIcon>
         <Icns_MainIcns>$(BDS)\bin\cbuilder_PROJECTICNS.icns</Icns_MainIcns>
-        <AllPackageLibs>rtl.lib;fmx.lib;GXScene_GBE.lib;GXScene_GBE_DTRT.lib</AllPackageLibs>
+        <AllPackageLibs>rtl.lib;fmx.lib;GXScene_GBE_DTRT.lib</AllPackageLibs>
         <_TCHARMapping>wchar_t</_TCHARMapping>
         <Multithreaded>true</Multithreaded>
         <IncludePath>D:\LIBRARY\FMX_Demos\GBE_3D\demos\Cube\;D:\GLScene\Examples\Demox\Cube\;..\..\include\Win64x\;$(IncludePath)</IncludePath>
@@ -157,26 +157,26 @@
     </PropertyGroup>
     <PropertyGroup Condition="'$(Cfg_1_Win32)'!=''">
         <AppDPIAwarenessMode>PerMonitorV2</AppDPIAwarenessMode>
-        <LinkPackageImports>rtl.bpi;fmx.bpi;GBE3D.bpi</LinkPackageImports>
+        <LinkPackageImports>rtl.bpi;fmx.bpi</LinkPackageImports>
         <BCC_UseClassicCompiler>false</BCC_UseClassicCompiler>
         <ILINK_LibraryPath>$(BDSLIB)\$(PLATFORM)$(CC_SUFFIX)\debug;..\..\lib\$(Platform);$(ILINK_LibraryPath)</ILINK_LibraryPath>
         <BCC_IncludePath>..\..\include\$(Platform);$(BCC_IncludePath)</BCC_IncludePath>
         <VerInfo_IncludeVerInfo>true</VerInfo_IncludeVerInfo>
         <VerInfo_Locale>1033</VerInfo_Locale>
         <IncludePath>..\..\include\$(Platform);$(IncludePath)</IncludePath>
+        <LinkPackageStatics>GXScene_GBE_DTRT.lib</LinkPackageStatics>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Cfg_1_Win64)'!=''">
         <AppDPIAwarenessMode>PerMonitorV2</AppDPIAwarenessMode>
-        <LinkPackageImports>rtl.bpi;fmx.bpi;GXScene_GBE.bpi;GXScene_GBE_DTRT.bpi</LinkPackageImports>
+        <LinkPackageImports>rtl.bpi;fmx.bpi</LinkPackageImports>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Cfg_1_Win64x)'!=''">
         <AppDPIAwarenessMode>PerMonitorV2</AppDPIAwarenessMode>
         <VerInfo_IncludeVerInfo>true</VerInfo_IncludeVerInfo>
         <VerInfo_Locale>1033</VerInfo_Locale>
-        <IncludePath>..\..\..\include\Win64x</IncludePath>
-        <ILINK_LibraryPath>..\..\..\lib\Win64x</ILINK_LibraryPath>
-        <LinkPackageImports>rtl.bpi;fmx.bpi</LinkPackageImports>
-        <LinkPackageStatics>GXScene_GBE.lib;GXScene_GBE_DTRT.lib</LinkPackageStatics>
+        <IncludePath>..\..\..\include\$(Platform)\</IncludePath>
+        <ILINK_LibraryPath>..\..\..\lib\$(Platform)\</ILINK_LibraryPath>
+        <LinkPackageImports>rtl.bpi;fmx.bpi;GXScene_GBE_DTRT.bpi</LinkPackageImports>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Cfg_2)'!=''">
         <Defines>NDEBUG;$(Defines)</Defines>
@@ -1264,8 +1264,8 @@
                 <ProjectRoot Platform="Win64x" Name="$(PROJECTNAME)"/>
             </Deployment>
             <Platforms>
-                <Platform value="Win32">True</Platform>
-                <Platform value="Win64">True</Platform>
+                <Platform value="Win32">False</Platform>
+                <Platform value="Win64">False</Platform>
                 <Platform value="Win64x">True</Platform>
             </Platforms>
         </BorlandProject>

Examples/Demox/Cubemap/Cubemap_c.cbproj

@@ -8,7 +8,7 @@
         <Config Condition="'$(Config)'==''">Debug</Config>
         <Platform Condition="'$(Platform)'==''">Win64x</Platform>
         <ProjectName Condition="'$(ProjectName)'==''">Cubemap_c</ProjectName>
-        <TargetedPlatforms>1048579</TargetedPlatforms>
+        <TargetedPlatforms>1048576</TargetedPlatforms>
         <AppType>Application</AppType>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
@@ -89,7 +89,7 @@
         <DCC_Namespace>System;Xml;Data;Datasnap;Web;Soap;$(DCC_Namespace)</DCC_Namespace>
         <Icon_MainIcon>$(BDS)\bin\cbuilder_PROJECTICON.ico</Icon_MainIcon>
         <Icns_MainIcns>$(BDS)\bin\cbuilder_PROJECTICNS.icns</Icns_MainIcns>
-        <AllPackageLibs>rtl.lib;fmx.lib;GXScene_GBE.lib</AllPackageLibs>
+        <AllPackageLibs>rtl.lib;fmx.lib;GXScene_GBE.lib;GXScene_GBE_DTRT.lib</AllPackageLibs>
         <_TCHARMapping>wchar_t</_TCHARMapping>
         <Multithreaded>true</Multithreaded>
         <ILINK_LibraryPath>..\..\lib\$(Platform);$(ILINK_LibraryPath)</ILINK_LibraryPath>
@@ -170,11 +170,12 @@
     </PropertyGroup>
     <PropertyGroup Condition="'$(Cfg_1_Win64x)'!=''">
         <AppDPIAwarenessMode>PerMonitorV2</AppDPIAwarenessMode>
-        <IncludePath>..\..\..\include\Win64x\</IncludePath>
+        <IncludePath>..\..\..\include\$(Platform)\</IncludePath>
         <VerInfo_IncludeVerInfo>true</VerInfo_IncludeVerInfo>
         <VerInfo_Locale>1033</VerInfo_Locale>
-        <ILINK_LibraryPath>..\..\..\lib\Win64x\</ILINK_LibraryPath>
-        <LinkPackageImports>rtl.bpi;fmx.bpi;GXScene_GBE.bpi</LinkPackageImports>
+        <ILINK_LibraryPath>..\..\..\lib\$(Platform)\</ILINK_LibraryPath>
+        <LinkPackageImports>rtl.bpi;fmx.bpi;GXScene_GBE_DTRT.bpi</LinkPackageImports>
+        <LinkPackageStatics>GXScene_GBE.lib</LinkPackageStatics>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Cfg_2)'!=''">
         <Defines>NDEBUG;$(Defines)</Defines>
@@ -221,7 +222,7 @@
                 <ProjectProperties>
                     <ProjectProperties Name="AutoShowDeps">False</ProjectProperties>
                     <ProjectProperties Name="ManagePaths">True</ProjectProperties>
-                    <ProjectProperties Name="VerifyPackages">True</ProjectProperties>
+                    <ProjectProperties Name="VerifyPackages">False</ProjectProperties>
                     <ProjectProperties Name="IndexFiles">False</ProjectProperties>
                 </ProjectProperties>
                 <Source>
@@ -1262,8 +1263,8 @@
                 <ProjectRoot Platform="Win64x" Name="$(PROJECTNAME)"/>
             </Deployment>
             <Platforms>
-                <Platform value="Win32">True</Platform>
-                <Platform value="Win64">True</Platform>
+                <Platform value="Win32">False</Platform>
+                <Platform value="Win64">False</Platform>
                 <Platform value="Win64x">True</Platform>
             </Platforms>
         </BorlandProject>

Examples/Demox/CylinderExt/CylinderExt_c.cbproj

@@ -8,7 +8,7 @@
         <Config Condition="'$(Config)'==''">Debug</Config>
         <Platform Condition="'$(Platform)'==''">Win64x</Platform>
         <ProjectName Condition="'$(ProjectName)'==''">CylinderExt_c</ProjectName>
-        <TargetedPlatforms>1048579</TargetedPlatforms>
+        <TargetedPlatforms>1048576</TargetedPlatforms>
         <AppType>Application</AppType>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
@@ -89,7 +89,7 @@
         <DCC_Namespace>System;Xml;Data;Datasnap;Web;Soap;$(DCC_Namespace)</DCC_Namespace>
         <Icon_MainIcon>$(BDS)\bin\cbuilder_PROJECTICON.ico</Icon_MainIcon>
         <Icns_MainIcns>$(BDS)\bin\cbuilder_PROJECTICNS.icns</Icns_MainIcns>
-        <AllPackageLibs>rtl.lib;fmx.lib;GXScene_GBE.lib</AllPackageLibs>
+        <AllPackageLibs>rtl.lib;fmx.lib;GXScene_GBE.lib;GXScene_GBE_DTRT.lib</AllPackageLibs>
         <_TCHARMapping>wchar_t</_TCHARMapping>
         <Multithreaded>true</Multithreaded>
         <ILINK_LibraryPath>..\..\lib\Win64x\;$(ILINK_LibraryPath)</ILINK_LibraryPath>
@@ -155,24 +155,26 @@
     </PropertyGroup>
     <PropertyGroup Condition="'$(Cfg_1_Win32)'!=''">
         <AppDPIAwarenessMode>PerMonitorV2</AppDPIAwarenessMode>
-        <LinkPackageImports>rtl.bpi;fmx.bpi;GBE3D.bpi</LinkPackageImports>
+        <LinkPackageImports>rtl.bpi;fmx.bpi</LinkPackageImports>
         <BCC_UseClassicCompiler>false</BCC_UseClassicCompiler>
         <ILINK_LibraryPath>$(BDSLIB)\$(PLATFORM)$(CC_SUFFIX)\debug;..\..\lib\$(Platform);$(ILINK_LibraryPath)</ILINK_LibraryPath>
         <IncludePath>..\..\include\$(Platform);$(IncludePath)</IncludePath>
         <VerInfo_IncludeVerInfo>true</VerInfo_IncludeVerInfo>
         <VerInfo_Locale>1033</VerInfo_Locale>
+        <LinkPackageStatics>GXScene_GBE.lib;GXScene_GBE_DTRT.lib</LinkPackageStatics>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Cfg_1_Win64)'!=''">
         <AppDPIAwarenessMode>PerMonitorV2</AppDPIAwarenessMode>
-        <LinkPackageImports>rtl.bpi;fmx.bpi;GXScene_GBE.bpi</LinkPackageImports>
+        <LinkPackageImports>rtl.bpi;fmx.bpi</LinkPackageImports>
+        <LinkPackageStatics>GXScene_GBE.lib</LinkPackageStatics>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Cfg_1_Win64x)'!=''">
         <AppDPIAwarenessMode>PerMonitorV2</AppDPIAwarenessMode>
         <VerInfo_IncludeVerInfo>true</VerInfo_IncludeVerInfo>
         <VerInfo_Locale>1033</VerInfo_Locale>
-        <IncludePath>..\..\..\include\Win64x\;$(IncludePath)</IncludePath>
-        <ILINK_LibraryPath>..\..\..\lib\Win64x\</ILINK_LibraryPath>
-        <LinkPackageImports>rtl.bpi;fmx.bpi</LinkPackageImports>
+        <IncludePath>..\..\..\include\$(Platform)\;$(IncludePath)</IncludePath>
+        <ILINK_LibraryPath>..\..\..\lib\$(Platform)\</ILINK_LibraryPath>
+        <LinkPackageImports>rtl.bpi;fmx.bpi;GXScene_GBE_DTRT.bpi</LinkPackageImports>
         <LinkPackageStatics>GXScene_GBE.lib</LinkPackageStatics>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Cfg_2)'!=''">
@@ -220,7 +222,7 @@
                 <ProjectProperties>
                     <ProjectProperties Name="AutoShowDeps">False</ProjectProperties>
                     <ProjectProperties Name="ManagePaths">True</ProjectProperties>
-                    <ProjectProperties Name="VerifyPackages">True</ProjectProperties>
+                    <ProjectProperties Name="VerifyPackages">False</ProjectProperties>
                     <ProjectProperties Name="IndexFiles">False</ProjectProperties>
                 </ProjectProperties>
                 <Source>
@@ -1261,8 +1263,8 @@
                 <ProjectRoot Platform="Win64x" Name="$(PROJECTNAME)"/>
             </Deployment>
             <Platforms>
-                <Platform value="Win32">True</Platform>
-                <Platform value="Win64">True</Platform>
+                <Platform value="Win32">False</Platform>
+                <Platform value="Win64">False</Platform>
                 <Platform value="Win64x">True</Platform>
             </Platforms>
         </BorlandProject>

Examples/Demox/Genoise/Genoise_c.cbproj

@@ -8,7 +8,7 @@
         <Config Condition="'$(Config)'==''">Debug</Config>
         <Platform Condition="'$(Platform)'==''">Win64x</Platform>
         <ProjectName Condition="'$(ProjectName)'==''">Genoise_c</ProjectName>
-        <TargetedPlatforms>1048579</TargetedPlatforms>
+        <TargetedPlatforms>1048576</TargetedPlatforms>
         <AppType>Application</AppType>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
@@ -1261,8 +1261,8 @@
                 <ProjectRoot Platform="Win64x" Name="$(PROJECTNAME)"/>
             </Deployment>
             <Platforms>
-                <Platform value="Win32">True</Platform>
-                <Platform value="Win64">True</Platform>
+                <Platform value="Win32">False</Platform>
+                <Platform value="Win64">False</Platform>
                 <Platform value="Win64x">True</Platform>
             </Platforms>
         </BorlandProject>

Examples/Demox/Grass/Grass_c.cbproj

@@ -8,7 +8,7 @@
         <Config Condition="'$(Config)'==''">Debug</Config>
         <Platform Condition="'$(Platform)'==''">Win64x</Platform>
         <ProjectName Condition="'$(ProjectName)'==''">Grass_c</ProjectName>
-        <TargetedPlatforms>1048579</TargetedPlatforms>
+        <TargetedPlatforms>1048576</TargetedPlatforms>
         <AppType>Application</AppType>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
@@ -89,7 +89,7 @@
         <DCC_Namespace>System;Xml;Data;Datasnap;Web;Soap;$(DCC_Namespace)</DCC_Namespace>
         <Icon_MainIcon>$(BDS)\bin\cbuilder_PROJECTICON.ico</Icon_MainIcon>
         <Icns_MainIcns>$(BDS)\bin\cbuilder_PROJECTICNS.icns</Icns_MainIcns>
-        <AllPackageLibs>rtl.lib;fmx.lib;GXScene_GBE.lib;GXScene_DTRT.lib</AllPackageLibs>
+        <AllPackageLibs>rtl.lib;fmx.lib;GXScene_GBE.lib;GXScene_DTRT.lib;GXScene_GBE_DTRT.lib</AllPackageLibs>
         <_TCHARMapping>wchar_t</_TCHARMapping>
         <Multithreaded>true</Multithreaded>
         <IncludePath>..\..\include\Win64x\;$(IncludePath)</IncludePath>
@@ -173,10 +173,10 @@
         <AppDPIAwarenessMode>PerMonitorV2</AppDPIAwarenessMode>
         <VerInfo_IncludeVerInfo>true</VerInfo_IncludeVerInfo>
         <VerInfo_Locale>1033</VerInfo_Locale>
-        <IncludePath>..\..\..\include\Win64x\</IncludePath>
-        <ILINK_LibraryPath>..\..\..\lib\Win64x\</ILINK_LibraryPath>
-        <LinkPackageImports>rtl.bpi;fmx.bpi</LinkPackageImports>
-        <LinkPackageStatics>GXScene_GBE.lib</LinkPackageStatics>
+        <IncludePath>..\..\..\include\$(Platform)\</IncludePath>
+        <ILINK_LibraryPath>..\..\..\lib\$(Platform)\</ILINK_LibraryPath>
+        <LinkPackageImports>rtl.bpi;fmx.bpi;GXScene_GBE_DTRT.bpi</LinkPackageImports>
+        <LinkPackageStatics>GXScene_GBE.lib;GXScene_DTRT.lib</LinkPackageStatics>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Cfg_2)'!=''">
         <Defines>NDEBUG;$(Defines)</Defines>
@@ -1264,8 +1264,8 @@
                 <ProjectRoot Platform="Win64x" Name="$(PROJECTNAME)"/>
             </Deployment>
             <Platforms>
-                <Platform value="Win32">True</Platform>
-                <Platform value="Win64">True</Platform>
+                <Platform value="Win32">False</Platform>
+                <Platform value="Win64">False</Platform>
                 <Platform value="Win64x">True</Platform>
             </Platforms>
         </BorlandProject>

Examples/Demox/Heightmap/Heightmap_c.cbproj

@@ -8,7 +8,7 @@
         <Config Condition="'$(Config)'==''">Debug</Config>
         <Platform Condition="'$(Platform)'==''">Win64x</Platform>
         <ProjectName Condition="'$(ProjectName)'==''">Heightmap_c</ProjectName>
-        <TargetedPlatforms>1048579</TargetedPlatforms>
+        <TargetedPlatforms>1048576</TargetedPlatforms>
         <AppType>Application</AppType>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
@@ -89,7 +89,7 @@
         <DCC_Namespace>System;Xml;Data;Datasnap;Web;Soap;$(DCC_Namespace)</DCC_Namespace>
         <Icon_MainIcon>$(BDS)\bin\cbuilder_PROJECTICON.ico</Icon_MainIcon>
         <Icns_MainIcns>$(BDS)\bin\cbuilder_PROJECTICNS.icns</Icns_MainIcns>
-        <AllPackageLibs>rtl.lib;fmx.lib;GXScene_GBE.lib</AllPackageLibs>
+        <AllPackageLibs>rtl.lib;fmx.lib;GXScene_GBE_DTRT.lib</AllPackageLibs>
         <_TCHARMapping>wchar_t</_TCHARMapping>
         <Multithreaded>true</Multithreaded>
         <IncludePath>..\..\include\Win64x\;$(IncludePath)</IncludePath>
@@ -131,6 +131,7 @@
         <UWP_CppLogo44>$(BDS)\bin\Artwork\Windows\UWP\cppreg_UwpDefault_44.png</UWP_CppLogo44>
         <UWP_CppLogo150>$(BDS)\bin\Artwork\Windows\UWP\cppreg_UwpDefault_150.png</UWP_CppLogo150>
         <BCC_EnableBatchCompilation>true</BCC_EnableBatchCompilation>
+        <AppDPIAwarenessMode>none</AppDPIAwarenessMode>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Cfg_1)'!=''">
         <BCC_OptimizeForSpeed>false</BCC_OptimizeForSpeed>
@@ -172,10 +173,9 @@
         <AppDPIAwarenessMode>PerMonitorV2</AppDPIAwarenessMode>
         <VerInfo_IncludeVerInfo>true</VerInfo_IncludeVerInfo>
         <VerInfo_Locale>1033</VerInfo_Locale>
-        <IncludePath>..\..\..\include\Win64x\</IncludePath>
-        <ILINK_LibraryPath>..\..\..\lib\Win64x\</ILINK_LibraryPath>
-        <LinkPackageImports>rtl.bpi;fmx.bpi</LinkPackageImports>
-        <LinkPackageStatics>GXScene_GBE.lib</LinkPackageStatics>
+        <IncludePath>..\..\..\include\$(Platform)\</IncludePath>
+        <ILINK_LibraryPath>..\..\..\lib\$(Platform)\</ILINK_LibraryPath>
+        <LinkPackageImports>rtl.bpi;fmx.bpi;GXScene_GBE_DTRT.bpi</LinkPackageImports>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Cfg_2)'!=''">
         <Defines>NDEBUG;$(Defines)</Defines>
@@ -1263,8 +1263,8 @@
                 <ProjectRoot Platform="Win64x" Name="$(PROJECTNAME)"/>
             </Deployment>
             <Platforms>
-                <Platform value="Win32">True</Platform>
-                <Platform value="Win64">True</Platform>
+                <Platform value="Win32">False</Platform>
+                <Platform value="Win64">False</Platform>
                 <Platform value="Win64x">True</Platform>
             </Platforms>
         </BorlandProject>

Examples/Demox/Waves/Waves_c.cbproj

@@ -8,7 +8,7 @@
         <Config Condition="'$(Config)'==''">Debug</Config>
         <Platform Condition="'$(Platform)'==''">Win64x</Platform>
         <ProjectName Condition="'$(ProjectName)'==''">Waves_c</ProjectName>
-        <TargetedPlatforms>1048579</TargetedPlatforms>
+        <TargetedPlatforms>1048576</TargetedPlatforms>
         <AppType>Application</AppType>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
@@ -89,7 +89,7 @@
         <DCC_Namespace>System;Xml;Data;Datasnap;Web;Soap;$(DCC_Namespace)</DCC_Namespace>
         <Icon_MainIcon>$(BDS)\bin\cbuilder_PROJECTICON.ico</Icon_MainIcon>
         <Icns_MainIcns>$(BDS)\bin\cbuilder_PROJECTICNS.icns</Icns_MainIcns>
-        <AllPackageLibs>rtl.lib;fmx.lib;GXScene_GBE.lib</AllPackageLibs>
+        <AllPackageLibs>rtl.lib;fmx.lib</AllPackageLibs>
         <_TCHARMapping>wchar_t</_TCHARMapping>
         <Multithreaded>true</Multithreaded>
         <SanitizedProjectName>Waves_c</SanitizedProjectName>
@@ -170,12 +170,11 @@
     </PropertyGroup>
     <PropertyGroup Condition="'$(Cfg_1_Win64x)'!=''">
         <AppDPIAwarenessMode>PerMonitorV2</AppDPIAwarenessMode>
-        <IncludePath>..\..\..\include\Win64x\</IncludePath>
+        <IncludePath>..\..\..\include\$(Platform)\</IncludePath>
         <VerInfo_IncludeVerInfo>true</VerInfo_IncludeVerInfo>
         <VerInfo_Locale>1033</VerInfo_Locale>
-        <ILINK_LibraryPath>..\..\..\lib\Win64x\</ILINK_LibraryPath>
+        <ILINK_LibraryPath>..\..\..\lib\$(Platform)\</ILINK_LibraryPath>
         <LinkPackageImports>rtl.bpi;fmx.bpi</LinkPackageImports>
-        <LinkPackageStatics>GXScene_GBE.lib</LinkPackageStatics>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Cfg_2)'!=''">
         <Defines>NDEBUG;$(Defines)</Defines>
@@ -1263,8 +1262,8 @@
                 <ProjectRoot Platform="Win64x" Name="$(PROJECTNAME)"/>
             </Deployment>
             <Platforms>
-                <Platform value="Win32">True</Platform>
-                <Platform value="Win64">True</Platform>
+                <Platform value="Win32">False</Platform>
+                <Platform value="Win64">False</Platform>
                 <Platform value="Win64x">True</Platform>
             </Platforms>
         </BorlandProject>

Packages/GXScene_Cg_RT.dproj

@@ -6,7 +6,7 @@
         <FrameworkType>None</FrameworkType>
         <Base>True</Base>
         <Config Condition="'$(Config)'==''">Debug</Config>
-        <Platform Condition="'$(Platform)'==''">Win64</Platform>
+        <Platform Condition="'$(Platform)'==''">Win64x</Platform>
         <TargetedPlatforms>1048579</TargetedPlatforms>
         <AppType>Package</AppType>
         <ProjectName Condition="'$(ProjectName)'==''">GXScene_Cg_RT</ProjectName>

Packages/GXScene_DT.dproj

@@ -6,7 +6,7 @@
         <FrameworkType>FMX</FrameworkType>
         <Base>True</Base>
         <Config Condition="'$(Config)'==''">Debug</Config>
-        <Platform Condition="'$(Platform)'==''">Win64</Platform>
+        <Platform Condition="'$(Platform)'==''">Win64x</Platform>
         <TargetedPlatforms>1048579</TargetedPlatforms>
         <AppType>Package</AppType>
         <ProjectName Condition="'$(ProjectName)'==''">GXScene_DT</ProjectName>

Packages/GXScene_GBE_DTRT.dproj

@@ -6,7 +6,7 @@
         <FrameworkType>FMX</FrameworkType>
         <Base>True</Base>
         <Config Condition="'$(Config)'==''">Debug</Config>
-        <Platform Condition="'$(Platform)'==''">Win64</Platform>
+        <Platform Condition="'$(Platform)'==''">Win64x</Platform>
         <TargetedPlatforms>1048579</TargetedPlatforms>
         <AppType>Package</AppType>
         <ProjectName Condition="'$(ProjectName)'==''">GXScene_GBE_DTRT</ProjectName>
@@ -237,9 +237,6 @@
                     <Source Name="MainSource">GXScene_GBE_DTRT.dpk</Source>
                 </Source>
                 <Excluded_Packages>
-                    <Excluded_Packages Name="C:\Users\Public\Documents\Embarcadero\Studio\23.0\Bpl\GLXEngine_DTRT.bpl">File C:\Users\Public\Documents\Embarcadero\Studio\23.0\Bpl\GLXEngine_DTRT.bpl not found</Excluded_Packages>
-                    <Excluded_Packages Name="C:\Users\Public\Documents\Embarcadero\Studio\23.0\Bpl\GXScene_GBE.bpl">GXScene GBE</Excluded_Packages>
-                    <Excluded_Packages Name="C:\Users\Public\Documents\Embarcadero\Studio\23.0\Bpl\GBComps.bpl">Geoblock - Components</Excluded_Packages>
                     <Excluded_Packages Name="$(BDSBIN)\bcboffice2k290.bpl">Embarcadero C++Builder Office 2000 Servers Package</Excluded_Packages>
                     <Excluded_Packages Name="$(BDSBIN)\bcbofficexp290.bpl">Embarcadero C++Builder Office XP Servers Package</Excluded_Packages>
                     <Excluded_Packages Name="$(BDSBIN)\dcloffice2k290.bpl">Microsoft Office 2000 Sample Automation Server Wrapper Components</Excluded_Packages>

Packages/GXScene_GPU_RT.dproj

@@ -8,7 +8,7 @@
         <AppType>Package</AppType>
         <FrameworkType>FMX</FrameworkType>
         <ProjectVersion>20.3</ProjectVersion>
-        <Platform Condition="'$(Platform)'==''">Win64</Platform>
+        <Platform Condition="'$(Platform)'==''">Win64x</Platform>
         <ProjectName Condition="'$(ProjectName)'==''">GXScene_GPU_RT</ProjectName>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">

Packages/GXScene_Physics_RT.dproj

@@ -8,7 +8,7 @@
         <AppType>Package</AppType>
         <FrameworkType>VCL</FrameworkType>
         <ProjectVersion>20.3</ProjectVersion>
-        <Platform Condition="'$(Platform)'==''">Win64</Platform>
+        <Platform Condition="'$(Platform)'==''">Win64x</Platform>
         <ProjectName Condition="'$(ProjectName)'==''">GXScene_Physics_RT</ProjectName>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">

Packages/GXScene_RT.dproj

@@ -8,7 +8,7 @@
         <AppType>Package</AppType>
         <FrameworkType>FMX</FrameworkType>
         <ProjectVersion>20.3</ProjectVersion>
-        <Platform Condition="'$(Platform)'==''">Win64</Platform>
+        <Platform Condition="'$(Platform)'==''">Win32</Platform>
         <ProjectName Condition="'$(ProjectName)'==''">GXScene_RT</ProjectName>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">

Packages/GXScene_Sounds_RT.dproj

@@ -6,7 +6,7 @@
         <FrameworkType>FMX</FrameworkType>
         <Base>True</Base>
         <Config Condition="'$(Config)'==''">Debug</Config>
-        <Platform Condition="'$(Platform)'==''">Win32</Platform>
+        <Platform Condition="'$(Platform)'==''">Win64x</Platform>
         <TargetedPlatforms>1048579</TargetedPlatforms>
         <AppType>Package</AppType>
         <ProjectName Condition="'$(ProjectName)'==''">GXScene_Sounds_RT</ProjectName>

_clean.cmd

@@ -7,15 +7,15 @@ rem del *.res /s
 @echo off delete delphi units but not packages
 del *.dcu /s
 del *.bak /s
-rem del *.bpl /s
-rem del *.dcp /s
-rem del *.rsm /s
+del *.bpl /s
+del *.dcp /s
+del *.rsm /s
 
 @echo off not delete C++ includes and libs
-rem del *.hpp /s
-rem del *.bpi /s
-rem del *.lib /s
-rem del *.a /s
+del *.hpp /s
+del *.bpi /s
+del *.lib /s
+del *.a /s
 
 @echo off delete debug files
 del *.ddp /s
@@ -58,13 +58,11 @@ echo             Don't delete some files
 echo ************************************************
 
 attrib +R "AdvDemos/Q3Demo/Model/animation.cfg"
-rem del *.cfg /s - there are quake's animations
+rem del *.cfg /s - there are quake's animations in assets
 attrib -R "AdvDemos/Q3Demo/Model/animation.cfg"
 
 echo---------------------------------------------------------
  
-rem echo delete all .svn directories with subdirectories and files 
-rem for /r %1 %%R in (.svn) do if exist "%%R" (rd /s /q "%%R")
 rem echo delete all .git directories with subdirectories and files 
 rem for /r %1 %%R in (.git) do if exist "%%R" (rd /s /q "%%R")
 

bpl/#Win32.txt

@@ -0,0 +1 @@
+The Win32 directory for compiled *bpl packages

bpl/#bpl.txt

@@ -1 +0,0 @@
-The directory for compiled *bpl files

bpl/Win64/#Win64.txt

@@ -0,0 +1 @@
+The Win64 directory for compiled *bpl packages

include/Win32/BASS.Import.hpp

@@ -1,949 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'BASS.Import.pas' rev: 36.00 (Windows)
-
-#ifndef BASS_ImportHPP
-#define BASS_ImportHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <Winapi.Windows.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Bass
-{
-namespace Import
-{
-//-- forward type declarations -----------------------------------------------
-struct BASS_DEVICEINFO;
-struct BASS_INFO;
-struct BASS_RECORDINFO;
-struct BASS_SAMPLE;
-struct BASS_CHANNELINFO;
-struct BASS_PLUGINFORM;
-struct BASS_PLUGININFO;
-struct BASS_3DVECTOR;
-struct BASS_FILEPROCS;
-struct TAG_ID3;
-struct TAG_APE_BINARY;
-struct TAG_BEXT;
-struct BASS_DX8_CHORUS;
-struct BASS_DX8_COMPRESSOR;
-struct BASS_DX8_DISTORTION;
-struct BASS_DX8_ECHO;
-struct BASS_DX8_FLANGER;
-struct BASS_DX8_GARGLE;
-struct BASS_DX8_I3DL2REVERB;
-struct BASS_DX8_PARAMEQ;
-struct BASS_DX8_REVERB;
-struct BASS_FX_VOLUME_PARAM;
-//-- type declarations -------------------------------------------------------
-typedef unsigned DWORD;
-
-typedef System::LongBool BOOL;
-
-typedef __int64 QWORD;
-
-typedef DWORD HMUSIC;
-
-typedef DWORD HSAMPLE;
-
-typedef DWORD HCHANNEL;
-
-typedef DWORD HSTREAM;
-
-typedef DWORD HRECORD;
-
-typedef DWORD HSYNC;
-
-typedef DWORD HDSP;
-
-typedef DWORD HFX;
-
-typedef DWORD HPLUGIN;
-
-struct DECLSPEC_DRECORD BASS_DEVICEINFO
-{
-public:
-	char *name;
-	char *driver;
-	DWORD flags;
-};
-
-
-struct DECLSPEC_DRECORD BASS_INFO
-{
-public:
-	DWORD flags;
-	DWORD hwsize;
-	DWORD hwfree;
-	DWORD freesam;
-	DWORD free3d;
-	DWORD minrate;
-	DWORD maxrate;
-	BOOL eax;
-	DWORD minbuf;
-	DWORD dsver;
-	DWORD latency;
-	DWORD initflags;
-	DWORD speakers;
-	DWORD freq;
-};
-
-
-struct DECLSPEC_DRECORD BASS_RECORDINFO
-{
-public:
-	DWORD flags;
-	DWORD formats;
-	DWORD inputs;
-	BOOL singlein;
-	DWORD freq;
-};
-
-
-struct DECLSPEC_DRECORD BASS_SAMPLE
-{
-public:
-	DWORD freq;
-	float volume;
-	float pan;
-	DWORD flags;
-	DWORD length;
-	DWORD max;
-	DWORD origres;
-	DWORD chans;
-	DWORD mingap;
-	DWORD mode3d;
-	float mindist;
-	float maxdist;
-	DWORD iangle;
-	DWORD oangle;
-	float outvol;
-	DWORD vam;
-	DWORD priority;
-};
-
-
-struct DECLSPEC_DRECORD BASS_CHANNELINFO
-{
-public:
-	DWORD freq;
-	DWORD chans;
-	DWORD flags;
-	DWORD ctype;
-	DWORD origres;
-	HPLUGIN plugin;
-	HSAMPLE sample;
-	System::WideChar *filename;
-};
-
-
-struct DECLSPEC_DRECORD BASS_PLUGINFORM
-{
-public:
-	DWORD ctype;
-	char *name;
-	char *exts;
-};
-
-
-typedef System::StaticArray<BASS_PLUGINFORM, 178956970> TBASS_PLUGINFORMS;
-
-typedef TBASS_PLUGINFORMS *PBASS_PLUGINFORMS;
-
-typedef BASS_PLUGININFO *PBASS_PLUGININFO;
-
-struct DECLSPEC_DRECORD BASS_PLUGININFO
-{
-public:
-	DWORD version;
-	DWORD formatc;
-	PBASS_PLUGINFORMS formats;
-};
-
-
-struct DECLSPEC_DRECORD BASS_3DVECTOR
-{
-public:
-	float x;
-	float y;
-	float z;
-};
-
-
-typedef void __stdcall (*FILECLOSEPROC)(void * user);
-
-typedef QWORD __stdcall (*FILELENPROC)(void * user);
-
-typedef DWORD __stdcall (*FILEREADPROC)(void * buffer, DWORD length, void * user);
-
-typedef BOOL __stdcall (*FILESEEKPROC)(QWORD offset, void * user);
-
-struct DECLSPEC_DRECORD BASS_FILEPROCS
-{
-public:
-	FILECLOSEPROC close;
-	FILELENPROC length;
-	FILEREADPROC read;
-	FILESEEKPROC seek;
-};
-
-
-typedef TAG_ID3 *PTAG_ID3;
-
-struct DECLSPEC_DRECORD TAG_ID3
-{
-public:
-	System::StaticArray<char, 3> id;
-	System::StaticArray<char, 30> title;
-	System::StaticArray<char, 30> artist;
-	System::StaticArray<char, 30> album;
-	System::StaticArray<char, 4> year;
-	System::StaticArray<char, 30> comment;
-	System::Byte genre;
-};
-
-
-typedef TAG_APE_BINARY *PTAG_APE_BINARY;
-
-struct DECLSPEC_DRECORD TAG_APE_BINARY
-{
-public:
-	char *key;
-	char *data;
-	DWORD length;
-};
-
-
-typedef TAG_BEXT *PTAG_BEXT;
-
-#pragma pack(push,1)
-struct DECLSPEC_DRECORD TAG_BEXT
-{
-public:
-	System::StaticArray<char, 256> Description;
-	System::StaticArray<char, 32> Originator;
-	System::StaticArray<char, 32> OriginatorReference;
-	System::StaticArray<char, 10> OriginationDate;
-	System::StaticArray<char, 8> OriginationTime;
-	QWORD TimeReference;
-	System::Word Version;
-	System::StaticArray<System::Byte, 64> UMID;
-	System::StaticArray<System::Byte, 190> Reserved;
-	char CodingHistory;
-};
-#pragma pack(pop)
-
-
-struct DECLSPEC_DRECORD BASS_DX8_CHORUS
-{
-public:
-	float fWetDryMix;
-	float fDepth;
-	float fFeedback;
-	float fFrequency;
-	DWORD lWaveform;
-	float fDelay;
-	DWORD lPhase;
-};
-
-
-struct DECLSPEC_DRECORD BASS_DX8_COMPRESSOR
-{
-public:
-	float fGain;
-	float fAttack;
-	float fRelease;
-	float fThreshold;
-	float fRatio;
-	float fPredelay;
-};
-
-
-struct DECLSPEC_DRECORD BASS_DX8_DISTORTION
-{
-public:
-	float fGain;
-	float fEdge;
-	float fPostEQCenterFrequency;
-	float fPostEQBandwidth;
-	float fPreLowpassCutoff;
-};
-
-
-struct DECLSPEC_DRECORD BASS_DX8_ECHO
-{
-public:
-	float fWetDryMix;
-	float fFeedback;
-	float fLeftDelay;
-	float fRightDelay;
-	BOOL lPanDelay;
-};
-
-
-struct DECLSPEC_DRECORD BASS_DX8_FLANGER
-{
-public:
-	float fWetDryMix;
-	float fDepth;
-	float fFeedback;
-	float fFrequency;
-	DWORD lWaveform;
-	float fDelay;
-	DWORD lPhase;
-};
-
-
-struct DECLSPEC_DRECORD BASS_DX8_GARGLE
-{
-public:
-	DWORD dwRateHz;
-	DWORD dwWaveShape;
-};
-
-
-struct DECLSPEC_DRECORD BASS_DX8_I3DL2REVERB
-{
-public:
-	int lRoom;
-	int lRoomHF;
-	float flRoomRolloffFactor;
-	float flDecayTime;
-	float flDecayHFRatio;
-	int lReflections;
-	float flReflectionsDelay;
-	int lReverb;
-	float flReverbDelay;
-	float flDiffusion;
-	float flDensity;
-	float flHFReference;
-};
-
-
-struct DECLSPEC_DRECORD BASS_DX8_PARAMEQ
-{
-public:
-	float fCenter;
-	float fBandwidth;
-	float fGain;
-};
-
-
-struct DECLSPEC_DRECORD BASS_DX8_REVERB
-{
-public:
-	float fInGain;
-	float fReverbMix;
-	float fReverbTime;
-	float fHighFreqRTRatio;
-};
-
-
-struct DECLSPEC_DRECORD BASS_FX_VOLUME_PARAM
-{
-public:
-	float fTarget;
-	float fCurrent;
-	float fTime;
-	DWORD lCurve;
-};
-
-
-typedef DWORD __stdcall (*STREAMPROC)(HSTREAM handle, void * buffer, DWORD length, void * user);
-
-typedef void __stdcall (*DOWNLOADPROC)(void * buffer, DWORD length, void * user);
-
-typedef void __stdcall (*SYNCPROC)(HSYNC handle, DWORD channel, DWORD data, void * user);
-
-typedef void __stdcall (*DSPPROC)(HDSP handle, DWORD channel, void * buffer, DWORD length, void * user);
-
-typedef BOOL __stdcall (*RECORDPROC)(HRECORD handle, void * buffer, DWORD length, void * user);
-
-typedef Winapi::Windows::HINST TBASSModuleHandle;
-
-//-- var, const, procedure ---------------------------------------------------
-#define bassdll L"bass32.dll"
-static _DELPHI_CONST System::Word BASSVERSION = System::Word(0x204);
-#define BASSVERSIONTEXT L"2.4"
-static _DELPHI_CONST unsigned DW_ERROR = unsigned(0xffffffff);
-static _DELPHI_CONST __int64 QW_ERROR = -1LL;
-static _DELPHI_CONST System::Int8 BASS_OK = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 BASS_ERROR_MEM = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 BASS_ERROR_FILEOPEN = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 BASS_ERROR_DRIVER = System::Int8(0x3);
-static _DELPHI_CONST System::Int8 BASS_ERROR_BUFLOST = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 BASS_ERROR_HANDLE = System::Int8(0x5);
-static _DELPHI_CONST System::Int8 BASS_ERROR_FORMAT = System::Int8(0x6);
-static _DELPHI_CONST System::Int8 BASS_ERROR_POSITION = System::Int8(0x7);
-static _DELPHI_CONST System::Int8 BASS_ERROR_INIT = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 BASS_ERROR_START = System::Int8(0x9);
-static _DELPHI_CONST System::Int8 BASS_ERROR_SSL = System::Int8(0xa);
-static _DELPHI_CONST System::Int8 BASS_ERROR_REINIT = System::Int8(0xb);
-static _DELPHI_CONST System::Int8 BASS_ERROR_ALREADY = System::Int8(0xe);
-static _DELPHI_CONST System::Int8 BASS_ERROR_NOTAUDIO = System::Int8(0x11);
-static _DELPHI_CONST System::Int8 BASS_ERROR_NOCHAN = System::Int8(0x12);
-static _DELPHI_CONST System::Int8 BASS_ERROR_ILLTYPE = System::Int8(0x13);
-static _DELPHI_CONST System::Int8 BASS_ERROR_ILLPARAM = System::Int8(0x14);
-static _DELPHI_CONST System::Int8 BASS_ERROR_NO3D = System::Int8(0x15);
-static _DELPHI_CONST System::Int8 BASS_ERROR_NOEAX = System::Int8(0x16);
-static _DELPHI_CONST System::Int8 BASS_ERROR_DEVICE = System::Int8(0x17);
-static _DELPHI_CONST System::Int8 BASS_ERROR_NOPLAY = System::Int8(0x18);
-static _DELPHI_CONST System::Int8 BASS_ERROR_FREQ = System::Int8(0x19);
-static _DELPHI_CONST System::Int8 BASS_ERROR_NOTFILE = System::Int8(0x1b);
-static _DELPHI_CONST System::Int8 BASS_ERROR_NOHW = System::Int8(0x1d);
-static _DELPHI_CONST System::Int8 BASS_ERROR_EMPTY = System::Int8(0x1f);
-static _DELPHI_CONST System::Int8 BASS_ERROR_NONET = System::Int8(0x20);
-static _DELPHI_CONST System::Int8 BASS_ERROR_CREATE = System::Int8(0x21);
-static _DELPHI_CONST System::Int8 BASS_ERROR_NOFX = System::Int8(0x22);
-static _DELPHI_CONST System::Int8 BASS_ERROR_NOTAVAIL = System::Int8(0x25);
-static _DELPHI_CONST System::Int8 BASS_ERROR_DECODE = System::Int8(0x26);
-static _DELPHI_CONST System::Int8 BASS_ERROR_DX = System::Int8(0x27);
-static _DELPHI_CONST System::Int8 BASS_ERROR_TIMEOUT = System::Int8(0x28);
-static _DELPHI_CONST System::Int8 BASS_ERROR_FILEFORM = System::Int8(0x29);
-static _DELPHI_CONST System::Int8 BASS_ERROR_SPEAKER = System::Int8(0x2a);
-static _DELPHI_CONST System::Int8 BASS_ERROR_VERSION = System::Int8(0x2b);
-static _DELPHI_CONST System::Int8 BASS_ERROR_CODEC = System::Int8(0x2c);
-static _DELPHI_CONST System::Int8 BASS_ERROR_ENDED = System::Int8(0x2d);
-static _DELPHI_CONST System::Int8 BASS_ERROR_BUSY = System::Int8(0x2e);
-static _DELPHI_CONST System::Int8 BASS_ERROR_UNSTREAMABLE = System::Int8(0x2f);
-static _DELPHI_CONST System::Int8 BASS_ERROR_PROTOCOL = System::Int8(0x30);
-static _DELPHI_CONST System::Int8 BASS_ERROR_DENIED = System::Int8(0x31);
-static _DELPHI_CONST System::Int8 BASS_ERROR_UNKNOWN = System::Int8(-1);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_BUFFER = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_UPDATEPERIOD = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_GVOL_SAMPLE = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_GVOL_STREAM = System::Int8(0x5);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_GVOL_MUSIC = System::Int8(0x6);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_CURVE_VOL = System::Int8(0x7);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_CURVE_PAN = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_FLOATDSP = System::Int8(0x9);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_3DALGORITHM = System::Int8(0xa);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_NET_TIMEOUT = System::Int8(0xb);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_NET_BUFFER = System::Int8(0xc);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_PAUSE_NOPLAY = System::Int8(0xd);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_NET_PREBUF = System::Int8(0xf);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_NET_PASSIVE = System::Int8(0x12);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_REC_BUFFER = System::Int8(0x13);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_NET_PLAYLIST = System::Int8(0x15);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_MUSIC_VIRTUAL = System::Int8(0x16);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_VERIFY = System::Int8(0x17);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_UPDATETHREADS = System::Int8(0x18);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_DEV_BUFFER = System::Int8(0x1b);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_REC_LOOPBACK = System::Int8(0x1c);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_VISTA_TRUEPOS = System::Int8(0x1e);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_IOS_SESSION = System::Int8(0x22);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_IOS_MIXAUDIO = System::Int8(0x22);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_DEV_DEFAULT = System::Int8(0x24);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_NET_READTIMEOUT = System::Int8(0x25);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_VISTA_SPEAKERS = System::Int8(0x26);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_IOS_SPEAKER = System::Int8(0x27);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_MF_DISABLE = System::Int8(0x28);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_HANDLES = System::Int8(0x29);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_UNICODE = System::Int8(0x2a);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_SRC = System::Int8(0x2b);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_SRC_SAMPLE = System::Int8(0x2c);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_ASYNCFILE_BUFFER = System::Int8(0x2d);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_OGG_PRESCAN = System::Int8(0x2f);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_MF_VIDEO = System::Int8(0x30);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_AIRPLAY = System::Int8(0x31);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_DEV_NONSTOP = System::Int8(0x32);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_IOS_NOCATEGORY = System::Int8(0x33);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_VERIFY_NET = System::Int8(0x34);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_DEV_PERIOD = System::Int8(0x35);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_FLOAT = System::Int8(0x36);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_NET_SEEK = System::Int8(0x38);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_AM_DISABLE = System::Int8(0x3a);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_NET_PLAYLIST_DEPTH = System::Int8(0x3b);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_NET_PREBUF_WAIT = System::Int8(0x3c);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_ANDROID_SESSIONID = System::Int8(0x3e);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_WASAPI_PERSIST = System::Int8(0x41);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_REC_WASAPI = System::Int8(0x42);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_ANDROID_AAUDIO = System::Int8(0x43);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_SAMPLE_ONEHANDLE = System::Int8(0x45);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_NET_META = System::Int8(0x47);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_NET_RESTRATE = System::Int8(0x48);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_REC_DEFAULT = System::Int8(0x49);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_NORAMP = System::Int8(0x4a);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_NET_AGENT = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_NET_PROXY = System::Int8(0x11);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_ANDROID_JAVAVM = System::Int8(0x3f);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_LIBSSL = System::Int8(0x40);
-static _DELPHI_CONST System::Int8 BASS_CONFIG_FILENAME = System::Int8(0x4b);
-static _DELPHI_CONST int BASS_CONFIG_THREAD = int(0x40000000);
-static _DELPHI_CONST System::Int8 BASS_IOS_SESSION_MIX = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 BASS_IOS_SESSION_DUCK = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 BASS_IOS_SESSION_AMBIENT = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 BASS_IOS_SESSION_SPEAKER = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 BASS_IOS_SESSION_DISABLE = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 BASS_IOS_SESSION_DEACTIVATE = System::Int8(0x20);
-static _DELPHI_CONST System::Int8 BASS_IOS_SESSION_AIRPLAY = System::Int8(0x40);
-static _DELPHI_CONST System::Byte BASS_IOS_SESSION_BTHFP = System::Byte(0x80);
-static _DELPHI_CONST System::Word BASS_IOS_SESSION_BTA2DP = System::Word(0x100);
-static _DELPHI_CONST System::Int8 BASS_DEVICE_8BITS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 BASS_DEVICE_MONO = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 BASS_DEVICE_3D = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 BASS_DEVICE_16BITS = System::Int8(0x8);
-static _DELPHI_CONST System::Byte BASS_DEVICE_REINIT = System::Byte(0x80);
-static _DELPHI_CONST System::Word BASS_DEVICE_LATENCY = System::Word(0x100);
-static _DELPHI_CONST System::Word BASS_DEVICE_CPSPEAKERS = System::Word(0x400);
-static _DELPHI_CONST System::Word BASS_DEVICE_SPEAKERS = System::Word(0x800);
-static _DELPHI_CONST System::Word BASS_DEVICE_NOSPEAKER = System::Word(0x1000);
-static _DELPHI_CONST System::Word BASS_DEVICE_DMIX = System::Word(0x2000);
-static _DELPHI_CONST System::Word BASS_DEVICE_FREQ = System::Word(0x4000);
-static _DELPHI_CONST System::Word BASS_DEVICE_STEREO = System::Word(0x8000);
-static _DELPHI_CONST int BASS_DEVICE_AUDIOTRACK = int(0x20000);
-static _DELPHI_CONST int BASS_DEVICE_DSOUND = int(0x40000);
-static _DELPHI_CONST int BASS_DEVICE_SOFTWARE = int(0x80000);
-static _DELPHI_CONST System::Int8 BASS_OBJECT_DS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 BASS_OBJECT_DS3DL = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 BASS_DEVICE_ENABLED = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 BASS_DEVICE_DEFAULT = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 BASS_DEVICE_INIT = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 BASS_DEVICE_LOOPBACK = System::Int8(0x8);
-static _DELPHI_CONST System::Byte BASS_DEVICE_DEFAULTCOM = System::Byte(0x80);
-static _DELPHI_CONST unsigned BASS_DEVICE_TYPE_MASK = unsigned(0xff000000);
-static _DELPHI_CONST int BASS_DEVICE_TYPE_NETWORK = int(0x1000000);
-static _DELPHI_CONST int BASS_DEVICE_TYPE_SPEAKERS = int(0x2000000);
-static _DELPHI_CONST int BASS_DEVICE_TYPE_LINE = int(0x3000000);
-static _DELPHI_CONST int BASS_DEVICE_TYPE_HEADPHONES = int(0x4000000);
-static _DELPHI_CONST int BASS_DEVICE_TYPE_MICROPHONE = int(0x5000000);
-static _DELPHI_CONST int BASS_DEVICE_TYPE_HEADSET = int(0x6000000);
-static _DELPHI_CONST int BASS_DEVICE_TYPE_HANDSET = int(0x7000000);
-static _DELPHI_CONST int BASS_DEVICE_TYPE_DIGITAL = int(0x8000000);
-static _DELPHI_CONST int BASS_DEVICE_TYPE_SPDIF = int(0x9000000);
-static _DELPHI_CONST int BASS_DEVICE_TYPE_HDMI = int(0xa000000);
-static _DELPHI_CONST int BASS_DEVICE_TYPE_DISPLAYPORT = int(0x40000000);
-static _DELPHI_CONST int BASS_DEVICES_AIRPLAY = int(0x1000000);
-static _DELPHI_CONST System::Int8 DSCAPS_EMULDRIVER = System::Int8(0x20);
-static _DELPHI_CONST System::Int8 DSCAPS_CERTIFIED = System::Int8(0x40);
-static _DELPHI_CONST unsigned DSCAPS_HARDWARE = unsigned(0x80000000);
-static _DELPHI_CONST System::Int8 DSCCAPS_EMULDRIVER = System::Int8(0x20);
-static _DELPHI_CONST System::Int8 DSCCAPS_CERTIFIED = System::Int8(0x40);
-static _DELPHI_CONST System::Int8 BASS_SAMPLE_8BITS = System::Int8(0x1);
-static _DELPHI_CONST System::Word BASS_SAMPLE_FLOAT = System::Word(0x100);
-static _DELPHI_CONST System::Int8 BASS_SAMPLE_MONO = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 BASS_SAMPLE_LOOP = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 BASS_SAMPLE_3D = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 BASS_SAMPLE_SOFTWARE = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 BASS_SAMPLE_MUTEMAX = System::Int8(0x20);
-static _DELPHI_CONST System::Int8 BASS_SAMPLE_VAM = System::Int8(0x40);
-static _DELPHI_CONST System::Byte BASS_SAMPLE_FX = System::Byte(0x80);
-static _DELPHI_CONST int BASS_SAMPLE_OVER_VOL = int(0x10000);
-static _DELPHI_CONST int BASS_SAMPLE_OVER_POS = int(0x20000);
-static _DELPHI_CONST int BASS_SAMPLE_OVER_DIST = int(0x30000);
-static _DELPHI_CONST int BASS_STREAM_PRESCAN = int(0x20000);
-static _DELPHI_CONST int BASS_STREAM_AUTOFREE = int(0x40000);
-static _DELPHI_CONST int BASS_STREAM_RESTRATE = int(0x80000);
-static _DELPHI_CONST int BASS_STREAM_BLOCK = int(0x100000);
-static _DELPHI_CONST int BASS_STREAM_DECODE = int(0x200000);
-static _DELPHI_CONST int BASS_STREAM_STATUS = int(0x800000);
-static _DELPHI_CONST System::Word BASS_MP3_IGNOREDELAY = System::Word(0x200);
-static _DELPHI_CONST int BASS_MP3_SETPOS = int(0x20000);
-static _DELPHI_CONST System::Word BASS_MUSIC_FLOAT = System::Word(0x100);
-static _DELPHI_CONST System::Int8 BASS_MUSIC_MONO = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 BASS_MUSIC_LOOP = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 BASS_MUSIC_3D = System::Int8(0x8);
-static _DELPHI_CONST System::Byte BASS_MUSIC_FX = System::Byte(0x80);
-static _DELPHI_CONST int BASS_MUSIC_AUTOFREE = int(0x40000);
-static _DELPHI_CONST int BASS_MUSIC_DECODE = int(0x200000);
-static _DELPHI_CONST int BASS_MUSIC_PRESCAN = int(0x20000);
-static _DELPHI_CONST int BASS_MUSIC_CALCLEN = int(0x20000);
-static _DELPHI_CONST System::Word BASS_MUSIC_RAMP = System::Word(0x200);
-static _DELPHI_CONST System::Word BASS_MUSIC_RAMPS = System::Word(0x400);
-static _DELPHI_CONST System::Word BASS_MUSIC_SURROUND = System::Word(0x800);
-static _DELPHI_CONST System::Word BASS_MUSIC_SURROUND2 = System::Word(0x1000);
-static _DELPHI_CONST System::Word BASS_MUSIC_FT2PAN = System::Word(0x2000);
-static _DELPHI_CONST System::Word BASS_MUSIC_FT2MOD = System::Word(0x2000);
-static _DELPHI_CONST System::Word BASS_MUSIC_PT1MOD = System::Word(0x4000);
-static _DELPHI_CONST int BASS_MUSIC_NONINTER = int(0x10000);
-static _DELPHI_CONST int BASS_MUSIC_SINCINTER = int(0x800000);
-static _DELPHI_CONST System::Word BASS_MUSIC_POSRESET = System::Word(0x8000);
-static _DELPHI_CONST int BASS_MUSIC_POSRESETEX = int(0x400000);
-static _DELPHI_CONST int BASS_MUSIC_STOPBACK = int(0x80000);
-static _DELPHI_CONST int BASS_MUSIC_NOSAMPLE = int(0x100000);
-static _DELPHI_CONST int BASS_SPEAKER_FRONT = int(0x1000000);
-static _DELPHI_CONST int BASS_SPEAKER_REAR = int(0x2000000);
-static _DELPHI_CONST int BASS_SPEAKER_CENLFE = int(0x3000000);
-static _DELPHI_CONST int BASS_SPEAKER_SIDE = int(0x4000000);
-static _DELPHI_CONST int BASS_SPEAKER_LEFT = int(0x10000000);
-static _DELPHI_CONST int BASS_SPEAKER_RIGHT = int(0x20000000);
-static _DELPHI_CONST int BASS_SPEAKER_FRONTLEFT = int(0x11000000);
-static _DELPHI_CONST int BASS_SPEAKER_FRONTRIGHT = int(0x21000000);
-static _DELPHI_CONST int BASS_SPEAKER_REARLEFT = int(0x12000000);
-static _DELPHI_CONST int BASS_SPEAKER_REARRIGHT = int(0x22000000);
-static _DELPHI_CONST int BASS_SPEAKER_CENTER = int(0x13000000);
-static _DELPHI_CONST int BASS_SPEAKER_LFE = int(0x23000000);
-static _DELPHI_CONST int BASS_SPEAKER_SIDELEFT = int(0x14000000);
-static _DELPHI_CONST int BASS_SPEAKER_SIDERIGHT = int(0x24000000);
-static _DELPHI_CONST int BASS_SPEAKER_REAR2 = int(0x4000000);
-static _DELPHI_CONST int BASS_SPEAKER_REAR2LEFT = int(0x14000000);
-static _DELPHI_CONST int BASS_SPEAKER_REAR2RIGHT = int(0x24000000);
-static _DELPHI_CONST int BASS_ASYNCFILE = int(0x40000000);
-static _DELPHI_CONST unsigned BASS_UNICODE = unsigned(0x80000000);
-static _DELPHI_CONST System::Word BASS_RECORD_PAUSE = System::Word(0x8000);
-static _DELPHI_CONST System::Int8 BASS_VAM_HARDWARE = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 BASS_VAM_SOFTWARE = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 BASS_VAM_TERM_TIME = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 BASS_VAM_TERM_DIST = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 BASS_VAM_TERM_PRIO = System::Int8(0x10);
-static _DELPHI_CONST int BASS_ORIGRES_FLOAT = int(0x10000);
-static _DELPHI_CONST System::Int8 BASS_CTYPE_SAMPLE = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 BASS_CTYPE_RECORD = System::Int8(0x2);
-static _DELPHI_CONST int BASS_CTYPE_STREAM = int(0x10000);
-static _DELPHI_CONST int BASS_CTYPE_STREAM_VORBIS = int(0x10002);
-static _DELPHI_CONST int BASS_CTYPE_STREAM_OGG = int(0x10002);
-static _DELPHI_CONST int BASS_CTYPE_STREAM_MP1 = int(0x10003);
-static _DELPHI_CONST int BASS_CTYPE_STREAM_MP2 = int(0x10004);
-static _DELPHI_CONST int BASS_CTYPE_STREAM_MP3 = int(0x10005);
-static _DELPHI_CONST int BASS_CTYPE_STREAM_AIFF = int(0x10006);
-static _DELPHI_CONST int BASS_CTYPE_STREAM_CA = int(0x10007);
-static _DELPHI_CONST int BASS_CTYPE_STREAM_MF = int(0x10008);
-static _DELPHI_CONST int BASS_CTYPE_STREAM_AM = int(0x10009);
-static _DELPHI_CONST int BASS_CTYPE_STREAM_SAMPLE = int(0x1000a);
-static _DELPHI_CONST int BASS_CTYPE_STREAM_DUMMY = int(0x18000);
-static _DELPHI_CONST int BASS_CTYPE_STREAM_DEVICE = int(0x18001);
-static _DELPHI_CONST int BASS_CTYPE_STREAM_WAV = int(0x40000);
-static _DELPHI_CONST int BASS_CTYPE_STREAM_WAV_PCM = int(0x50001);
-static _DELPHI_CONST int BASS_CTYPE_STREAM_WAV_FLOAT = int(0x50003);
-static _DELPHI_CONST int BASS_CTYPE_MUSIC_MOD = int(0x20000);
-static _DELPHI_CONST int BASS_CTYPE_MUSIC_MTM = int(0x20001);
-static _DELPHI_CONST int BASS_CTYPE_MUSIC_S3M = int(0x20002);
-static _DELPHI_CONST int BASS_CTYPE_MUSIC_XM = int(0x20003);
-static _DELPHI_CONST int BASS_CTYPE_MUSIC_IT = int(0x20004);
-static _DELPHI_CONST System::Word BASS_CTYPE_MUSIC_MO3 = System::Word(0x100);
-static _DELPHI_CONST System::Int8 BASS_PLUGIN_PROC = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 BASS_3DMODE_NORMAL = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 BASS_3DMODE_RELATIVE = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 BASS_3DMODE_OFF = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 BASS_3DALG_DEFAULT = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 BASS_3DALG_OFF = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 BASS_3DALG_FULL = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 BASS_3DALG_LIGHT = System::Int8(0x3);
-static _DELPHI_CONST System::Int8 EAX_ENVIRONMENT_GENERIC = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 EAX_ENVIRONMENT_PADDEDCELL = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 EAX_ENVIRONMENT_ROOM = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 EAX_ENVIRONMENT_BATHROOM = System::Int8(0x3);
-static _DELPHI_CONST System::Int8 EAX_ENVIRONMENT_LIVINGROOM = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 EAX_ENVIRONMENT_STONEROOM = System::Int8(0x5);
-static _DELPHI_CONST System::Int8 EAX_ENVIRONMENT_AUDITORIUM = System::Int8(0x6);
-static _DELPHI_CONST System::Int8 EAX_ENVIRONMENT_CONCERTHALL = System::Int8(0x7);
-static _DELPHI_CONST System::Int8 EAX_ENVIRONMENT_CAVE = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 EAX_ENVIRONMENT_ARENA = System::Int8(0x9);
-static _DELPHI_CONST System::Int8 EAX_ENVIRONMENT_HANGAR = System::Int8(0xa);
-static _DELPHI_CONST System::Int8 EAX_ENVIRONMENT_CARPETEDHALLWAY = System::Int8(0xb);
-static _DELPHI_CONST System::Int8 EAX_ENVIRONMENT_HALLWAY = System::Int8(0xc);
-static _DELPHI_CONST System::Int8 EAX_ENVIRONMENT_STONECORRIDOR = System::Int8(0xd);
-static _DELPHI_CONST System::Int8 EAX_ENVIRONMENT_ALLEY = System::Int8(0xe);
-static _DELPHI_CONST System::Int8 EAX_ENVIRONMENT_FOREST = System::Int8(0xf);
-static _DELPHI_CONST System::Int8 EAX_ENVIRONMENT_CITY = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 EAX_ENVIRONMENT_MOUNTAINS = System::Int8(0x11);
-static _DELPHI_CONST System::Int8 EAX_ENVIRONMENT_QUARRY = System::Int8(0x12);
-static _DELPHI_CONST System::Int8 EAX_ENVIRONMENT_PLAIN = System::Int8(0x13);
-static _DELPHI_CONST System::Int8 EAX_ENVIRONMENT_PARKINGLOT = System::Int8(0x14);
-static _DELPHI_CONST System::Int8 EAX_ENVIRONMENT_SEWERPIPE = System::Int8(0x15);
-static _DELPHI_CONST System::Int8 EAX_ENVIRONMENT_UNDERWATER = System::Int8(0x16);
-static _DELPHI_CONST System::Int8 EAX_ENVIRONMENT_DRUGGED = System::Int8(0x17);
-static _DELPHI_CONST System::Int8 EAX_ENVIRONMENT_DIZZY = System::Int8(0x18);
-static _DELPHI_CONST System::Int8 EAX_ENVIRONMENT_PSYCHOTIC = System::Int8(0x19);
-static _DELPHI_CONST System::Int8 EAX_ENVIRONMENT_COUNT = System::Int8(0x1a);
-static _DELPHI_CONST unsigned BASS_STREAMPROC_END = unsigned(0x80000000);
-static _DELPHI_CONST System::Int8 STREAMFILE_NOBUFFER = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 STREAMFILE_BUFFER = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 STREAMFILE_BUFFERPUSH = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 BASS_FILEDATA_END = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 BASS_FILEPOS_CURRENT = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 BASS_FILEPOS_DECODE = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 BASS_FILEPOS_DOWNLOAD = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 BASS_FILEPOS_END = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 BASS_FILEPOS_START = System::Int8(0x3);
-static _DELPHI_CONST System::Int8 BASS_FILEPOS_CONNECTED = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 BASS_FILEPOS_BUFFER = System::Int8(0x5);
-static _DELPHI_CONST System::Int8 BASS_FILEPOS_SOCKET = System::Int8(0x6);
-static _DELPHI_CONST System::Int8 BASS_FILEPOS_ASYNCBUF = System::Int8(0x7);
-static _DELPHI_CONST System::Int8 BASS_FILEPOS_SIZE = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 BASS_FILEPOS_BUFFERING = System::Int8(0x9);
-static _DELPHI_CONST System::Int8 BASS_FILEPOS_AVAILABLE = System::Int8(0xa);
-static _DELPHI_CONST System::Int8 BASS_SYNC_POS = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 BASS_SYNC_END = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 BASS_SYNC_META = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 BASS_SYNC_SLIDE = System::Int8(0x5);
-static _DELPHI_CONST System::Int8 BASS_SYNC_STALL = System::Int8(0x6);
-static _DELPHI_CONST System::Int8 BASS_SYNC_DOWNLOAD = System::Int8(0x7);
-static _DELPHI_CONST System::Int8 BASS_SYNC_FREE = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 BASS_SYNC_SETPOS = System::Int8(0xb);
-static _DELPHI_CONST System::Int8 BASS_SYNC_MUSICPOS = System::Int8(0xa);
-static _DELPHI_CONST System::Int8 BASS_SYNC_MUSICINST = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 BASS_SYNC_MUSICFX = System::Int8(0x3);
-static _DELPHI_CONST System::Int8 BASS_SYNC_OGG_CHANGE = System::Int8(0xc);
-static _DELPHI_CONST System::Int8 BASS_SYNC_DEV_FAIL = System::Int8(0xe);
-static _DELPHI_CONST System::Int8 BASS_SYNC_DEV_FORMAT = System::Int8(0xf);
-static _DELPHI_CONST int BASS_SYNC_THREAD = int(0x20000000);
-static _DELPHI_CONST int BASS_SYNC_MIXTIME = int(0x40000000);
-static _DELPHI_CONST unsigned BASS_SYNC_ONETIME = unsigned(0x80000000);
-static _DELPHI_CONST System::Int8 BASS_ACTIVE_STOPPED = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 BASS_ACTIVE_PLAYING = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 BASS_ACTIVE_STALLED = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 BASS_ACTIVE_PAUSED = System::Int8(0x3);
-static _DELPHI_CONST System::Int8 BASS_ACTIVE_PAUSED_DEVICE = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 BASS_ATTRIB_FREQ = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 BASS_ATTRIB_VOL = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 BASS_ATTRIB_PAN = System::Int8(0x3);
-static _DELPHI_CONST System::Int8 BASS_ATTRIB_EAXMIX = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 BASS_ATTRIB_NOBUFFER = System::Int8(0x5);
-static _DELPHI_CONST System::Int8 BASS_ATTRIB_VBR = System::Int8(0x6);
-static _DELPHI_CONST System::Int8 BASS_ATTRIB_CPU = System::Int8(0x7);
-static _DELPHI_CONST System::Int8 BASS_ATTRIB_SRC = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 BASS_ATTRIB_NET_RESUME = System::Int8(0x9);
-static _DELPHI_CONST System::Int8 BASS_ATTRIB_SCANINFO = System::Int8(0xa);
-static _DELPHI_CONST System::Int8 BASS_ATTRIB_NORAMP = System::Int8(0xb);
-static _DELPHI_CONST System::Int8 BASS_ATTRIB_BITRATE = System::Int8(0xc);
-static _DELPHI_CONST System::Int8 BASS_ATTRIB_BUFFER = System::Int8(0xd);
-static _DELPHI_CONST System::Int8 BASS_ATTRIB_GRANULE = System::Int8(0xe);
-static _DELPHI_CONST System::Int8 BASS_ATTRIB_USER = System::Int8(0xf);
-static _DELPHI_CONST System::Int8 BASS_ATTRIB_TAIL = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 BASS_ATTRIB_PUSH_LIMIT = System::Int8(0x11);
-static _DELPHI_CONST System::Int8 BASS_ATTRIB_DOWNLOADPROC = System::Int8(0x12);
-static _DELPHI_CONST System::Int8 BASS_ATTRIB_VOLDSP = System::Int8(0x13);
-static _DELPHI_CONST System::Int8 BASS_ATTRIB_VOLDSP_PRIORITY = System::Int8(0x14);
-static _DELPHI_CONST System::Word BASS_ATTRIB_MUSIC_AMPLIFY = System::Word(0x100);
-static _DELPHI_CONST System::Word BASS_ATTRIB_MUSIC_PANSEP = System::Word(0x101);
-static _DELPHI_CONST System::Word BASS_ATTRIB_MUSIC_PSCALER = System::Word(0x102);
-static _DELPHI_CONST System::Word BASS_ATTRIB_MUSIC_BPM = System::Word(0x103);
-static _DELPHI_CONST System::Word BASS_ATTRIB_MUSIC_SPEED = System::Word(0x104);
-static _DELPHI_CONST System::Word BASS_ATTRIB_MUSIC_VOL_GLOBAL = System::Word(0x105);
-static _DELPHI_CONST System::Word BASS_ATTRIB_MUSIC_ACTIVE = System::Word(0x106);
-static _DELPHI_CONST System::Word BASS_ATTRIB_MUSIC_VOL_CHAN = System::Word(0x200);
-static _DELPHI_CONST System::Word BASS_ATTRIB_MUSIC_VOL_INST = System::Word(0x300);
-static _DELPHI_CONST int BASS_SLIDE_LOG = int(0x1000000);
-static _DELPHI_CONST System::Int8 BASS_DATA_AVAILABLE = System::Int8(0x0);
-static _DELPHI_CONST int BASS_DATA_NOREMOVE = int(0x10000000);
-static _DELPHI_CONST int BASS_DATA_FIXED = int(0x20000000);
-static _DELPHI_CONST int BASS_DATA_FLOAT = int(0x40000000);
-static _DELPHI_CONST unsigned BASS_DATA_FFT256 = unsigned(0x80000000);
-static _DELPHI_CONST unsigned BASS_DATA_FFT512 = unsigned(0x80000001);
-static _DELPHI_CONST unsigned BASS_DATA_FFT1024 = unsigned(0x80000002);
-static _DELPHI_CONST unsigned BASS_DATA_FFT2048 = unsigned(0x80000003);
-static _DELPHI_CONST unsigned BASS_DATA_FFT4096 = unsigned(0x80000004);
-static _DELPHI_CONST unsigned BASS_DATA_FFT8192 = unsigned(0x80000005);
-static _DELPHI_CONST unsigned BASS_DATA_FFT16384 = unsigned(0x80000006);
-static _DELPHI_CONST unsigned BASS_DATA_FFT32768 = unsigned(0x80000007);
-static _DELPHI_CONST System::Int8 BASS_DATA_FFT_INDIVIDUAL = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 BASS_DATA_FFT_NOWINDOW = System::Int8(0x20);
-static _DELPHI_CONST System::Int8 BASS_DATA_FFT_REMOVEDC = System::Int8(0x40);
-static _DELPHI_CONST System::Byte BASS_DATA_FFT_COMPLEX = System::Byte(0x80);
-static _DELPHI_CONST System::Word BASS_DATA_FFT_NYQUIST = System::Word(0x100);
-static _DELPHI_CONST System::Int8 BASS_LEVEL_MONO = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 BASS_LEVEL_STEREO = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 BASS_LEVEL_RMS = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 BASS_LEVEL_VOLPAN = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 BASS_LEVEL_NOREMOVE = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 BASS_TAG_ID3 = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 BASS_TAG_ID3V2 = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 BASS_TAG_OGG = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 BASS_TAG_HTTP = System::Int8(0x3);
-static _DELPHI_CONST System::Int8 BASS_TAG_ICY = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 BASS_TAG_META = System::Int8(0x5);
-static _DELPHI_CONST System::Int8 BASS_TAG_APE = System::Int8(0x6);
-static _DELPHI_CONST System::Int8 BASS_TAG_MP4 = System::Int8(0x7);
-static _DELPHI_CONST System::Int8 BASS_TAG_WMA = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 BASS_TAG_VENDOR = System::Int8(0x9);
-static _DELPHI_CONST System::Int8 BASS_TAG_LYRICS3 = System::Int8(0xa);
-static _DELPHI_CONST System::Int8 BASS_TAG_CA_CODEC = System::Int8(0xb);
-static _DELPHI_CONST System::Int8 BASS_TAG_MF = System::Int8(0xd);
-static _DELPHI_CONST System::Int8 BASS_TAG_WAVEFORMAT = System::Int8(0xe);
-static _DELPHI_CONST System::Int8 BASS_TAG_AM_NAME = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 BASS_TAG_ID3V2_2 = System::Int8(0x11);
-static _DELPHI_CONST System::Int8 BASS_TAG_AM_MIME = System::Int8(0x12);
-static _DELPHI_CONST System::Int8 BASS_TAG_LOCATION = System::Int8(0x13);
-static _DELPHI_CONST System::Word BASS_TAG_RIFF_INFO = System::Word(0x100);
-static _DELPHI_CONST System::Word BASS_TAG_RIFF_BEXT = System::Word(0x101);
-static _DELPHI_CONST System::Word BASS_TAG_RIFF_CART = System::Word(0x102);
-static _DELPHI_CONST System::Word BASS_TAG_RIFF_DISP = System::Word(0x103);
-static _DELPHI_CONST System::Word BASS_TAG_RIFF_CUE = System::Word(0x104);
-static _DELPHI_CONST System::Word BASS_TAG_RIFF_SMPL = System::Word(0x105);
-static _DELPHI_CONST System::Word BASS_TAG_APE_BINARY = System::Word(0x1000);
-static _DELPHI_CONST int BASS_TAG_MUSIC_NAME = int(0x10000);
-static _DELPHI_CONST int BASS_TAG_MUSIC_MESSAGE = int(0x10001);
-static _DELPHI_CONST int BASS_TAG_MUSIC_ORDERS = int(0x10002);
-static _DELPHI_CONST int BASS_TAG_MUSIC_AUTH = int(0x10003);
-static _DELPHI_CONST int BASS_TAG_MUSIC_INST = int(0x10100);
-static _DELPHI_CONST int BASS_TAG_MUSIC_CHAN = int(0x10200);
-static _DELPHI_CONST int BASS_TAG_MUSIC_SAMPLE = int(0x10300);
-static _DELPHI_CONST System::Int8 BASS_POS_BYTE = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 BASS_POS_MUSIC_ORDER = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 BASS_POS_OGG = System::Int8(0x3);
-static _DELPHI_CONST System::Int8 BASS_POS_END = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 BASS_POS_LOOP = System::Int8(0x11);
-static _DELPHI_CONST int BASS_POS_FLUSH = int(0x1000000);
-static _DELPHI_CONST int BASS_POS_RESET = int(0x2000000);
-static _DELPHI_CONST int BASS_POS_RELATIVE = int(0x4000000);
-static _DELPHI_CONST int BASS_POS_INEXACT = int(0x8000000);
-static _DELPHI_CONST int BASS_POS_DECODE = int(0x10000000);
-static _DELPHI_CONST int BASS_POS_DECODETO = int(0x20000000);
-static _DELPHI_CONST int BASS_POS_SCAN = int(0x40000000);
-static _DELPHI_CONST int BASS_NODEVICE = int(0x20000);
-static _DELPHI_CONST int BASS_INPUT_OFF = int(0x10000);
-static _DELPHI_CONST int BASS_INPUT_ON = int(0x20000);
-static _DELPHI_CONST unsigned BASS_INPUT_TYPE_MASK = unsigned(0xff000000);
-static _DELPHI_CONST System::Int8 BASS_INPUT_TYPE_UNDEF = System::Int8(0x0);
-static _DELPHI_CONST int BASS_INPUT_TYPE_DIGITAL = int(0x1000000);
-static _DELPHI_CONST int BASS_INPUT_TYPE_LINE = int(0x2000000);
-static _DELPHI_CONST int BASS_INPUT_TYPE_MIC = int(0x3000000);
-static _DELPHI_CONST int BASS_INPUT_TYPE_SYNTH = int(0x4000000);
-static _DELPHI_CONST int BASS_INPUT_TYPE_CD = int(0x5000000);
-static _DELPHI_CONST int BASS_INPUT_TYPE_PHONE = int(0x6000000);
-static _DELPHI_CONST int BASS_INPUT_TYPE_SPEAKER = int(0x7000000);
-static _DELPHI_CONST int BASS_INPUT_TYPE_WAVE = int(0x8000000);
-static _DELPHI_CONST int BASS_INPUT_TYPE_AUX = int(0x9000000);
-static _DELPHI_CONST int BASS_INPUT_TYPE_ANALOG = int(0xa000000);
-static _DELPHI_CONST System::Int8 BASS_FX_DX8_CHORUS = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 BASS_FX_DX8_COMPRESSOR = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 BASS_FX_DX8_DISTORTION = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 BASS_FX_DX8_ECHO = System::Int8(0x3);
-static _DELPHI_CONST System::Int8 BASS_FX_DX8_FLANGER = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 BASS_FX_DX8_GARGLE = System::Int8(0x5);
-static _DELPHI_CONST System::Int8 BASS_FX_DX8_I3DL2REVERB = System::Int8(0x6);
-static _DELPHI_CONST System::Int8 BASS_FX_DX8_PARAMEQ = System::Int8(0x7);
-static _DELPHI_CONST System::Int8 BASS_FX_DX8_REVERB = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 BASS_FX_VOLUME = System::Int8(0x9);
-static _DELPHI_CONST System::Int8 BASS_DX8_PHASE_NEG_180 = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 BASS_DX8_PHASE_NEG_90 = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 BASS_DX8_PHASE_ZERO = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 BASS_DX8_PHASE_90 = System::Int8(0x3);
-static _DELPHI_CONST System::Int8 BASS_DX8_PHASE_180 = System::Int8(0x4);
-#define STREAMPROC_DUMMY (void *)(0)
-#define STREAMPROC_PUSH (void *)(0xffffffff)
-#define STREAMPROC_DEVICE (void *)(0xfffffffe)
-#define STREAMPROC_DEVICE_3D (void *)(0xfffffffd)
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_SetConfig)(DWORD option, DWORD value);
-extern DELPHI_PACKAGE unsigned __stdcall (*BASS_GetConfig)(DWORD option);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_SetConfigPtr)(DWORD option, void * value);
-extern DELPHI_PACKAGE void * __stdcall (*BASS_GetConfigPtr)(DWORD option);
-extern DELPHI_PACKAGE unsigned __stdcall (*BASS_GetVersion)(void);
-extern DELPHI_PACKAGE int __stdcall (*BASS_ErrorGetCode)(void);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_GetDeviceInfo)(DWORD device, BASS_DEVICEINFO &info);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_Init)(System::LongInt device, DWORD freq, DWORD flags, HWND win, System::PGUID clsid);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_SetDevice)(DWORD device);
-extern DELPHI_PACKAGE unsigned __stdcall (*BASS_GetDevice)(void);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_Free)(void);
-extern DELPHI_PACKAGE void * __stdcall (*BASS_GetDSoundObject)(DWORD obj);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_GetInfo)(BASS_INFO &info);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_Update)(DWORD length);
-extern DELPHI_PACKAGE float __stdcall (*BASS_GetCPU)(void);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_Start)(void);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_Stop)(void);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_Pause)(void);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_SetVolume)(float volume);
-extern DELPHI_PACKAGE float __stdcall (*BASS_GetVolume)(void);
-extern DELPHI_PACKAGE unsigned __stdcall (*BASS_PluginLoad)(System::WideChar * filename, DWORD flags);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_PluginFree)(HPLUGIN handle);
-extern DELPHI_PACKAGE PBASS_PLUGININFO __stdcall (*BASS_PluginGetInfo)(HPLUGIN handle);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_Set3DFactors)(float distf, float rollf, float doppf);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_Get3DFactors)(float &distf, float &rollf, float &doppf);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_Set3DPosition)(BASS_3DVECTOR &pos, BASS_3DVECTOR &vel, BASS_3DVECTOR &front, BASS_3DVECTOR &top);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_Get3DPosition)(BASS_3DVECTOR &pos, BASS_3DVECTOR &vel, BASS_3DVECTOR &front, BASS_3DVECTOR &top);
-extern DELPHI_PACKAGE void __stdcall (*BASS_Apply3D)(void);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_SetEAXParameters)(System::LongInt env, float vol, float decay, float damp);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_GetEAXParameters)(DWORD &env, float &vol, float &decay, float &damp);
-extern DELPHI_PACKAGE unsigned __stdcall (*BASS_MusicLoad)(BOOL mem, void * f, QWORD offset, DWORD length, DWORD flags, DWORD freq);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_MusicFree)(HMUSIC handle);
-extern DELPHI_PACKAGE unsigned __stdcall (*BASS_SampleLoad)(BOOL mem, void * f, QWORD offset, DWORD length, DWORD max, DWORD flags);
-extern DELPHI_PACKAGE unsigned __stdcall (*BASS_SampleCreate)(DWORD length, DWORD freq, DWORD chans, DWORD max, DWORD flags);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_SampleFree)(HSAMPLE handle);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_SampleSetData)(HSAMPLE handle, void * buffer);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_SampleGetData)(HSAMPLE handle, void * buffer);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_SampleGetInfo)(HSAMPLE handle, BASS_SAMPLE &info);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_SampleSetInfo)(HSAMPLE handle, BASS_SAMPLE &info);
-extern DELPHI_PACKAGE unsigned __stdcall (*BASS_SampleGetChannel)(HSAMPLE handle, BOOL onlynew);
-extern DELPHI_PACKAGE unsigned __stdcall (*BASS_SampleGetChannels)(HSAMPLE handle, void * channels);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_SampleStop)(HSAMPLE handle);
-extern DELPHI_PACKAGE unsigned __stdcall (*BASS_StreamCreate)(DWORD freq, DWORD chans, DWORD flags, STREAMPROC proc, void * user);
-extern DELPHI_PACKAGE unsigned __stdcall (*BASS_StreamCreateFile)(BOOL mem, void * f, QWORD offset, QWORD length, DWORD flags);
-extern DELPHI_PACKAGE unsigned __stdcall (*BASS_StreamCreateURL)(char * url, DWORD offset, DWORD flags, DOWNLOADPROC proc, void * user);
-extern DELPHI_PACKAGE unsigned __stdcall (*BASS_StreamCreateFileUser)(DWORD system, DWORD flags, BASS_FILEPROCS &procs, void * user);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_StreamFree)(HSTREAM handle);
-extern DELPHI_PACKAGE __int64 __stdcall (*BASS_StreamGetFilePosition)(HSTREAM handle, DWORD mode);
-extern DELPHI_PACKAGE unsigned __stdcall (*BASS_StreamPutData)(HSTREAM handle, void * buffer, DWORD length);
-extern DELPHI_PACKAGE unsigned __stdcall (*BASS_StreamPutFileData)(HSTREAM handle, void * buffer, DWORD length);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_RecordGetDeviceInfo)(DWORD device, BASS_DEVICEINFO &info);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_RecordInit)(System::LongInt device);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_RecordSetDevice)(DWORD device);
-extern DELPHI_PACKAGE unsigned __stdcall (*BASS_RecordGetDevice)(void);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_RecordFree)(void);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_RecordGetInfo)(BASS_RECORDINFO &info);
-extern DELPHI_PACKAGE char * __stdcall (*BASS_RecordGetInputName)(System::LongInt input);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_RecordSetInput)(System::LongInt input, DWORD flags, float volume);
-extern DELPHI_PACKAGE unsigned __stdcall (*BASS_RecordGetInput)(System::LongInt input, float &volume);
-extern DELPHI_PACKAGE unsigned __stdcall (*BASS_RecordStart)(DWORD freq, DWORD chans, DWORD flags, RECORDPROC proc, void * user);
-extern DELPHI_PACKAGE double __stdcall (*BASS_ChannelBytes2Seconds)(DWORD handle, QWORD pos);
-extern DELPHI_PACKAGE __int64 __stdcall (*BASS_ChannelSeconds2Bytes)(DWORD handle, double pos);
-extern DELPHI_PACKAGE unsigned __stdcall (*BASS_ChannelGetDevice)(DWORD handle);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_ChannelSetDevice)(DWORD handle, DWORD device);
-extern DELPHI_PACKAGE unsigned __stdcall (*BASS_ChannelIsActive)(DWORD handle);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_ChannelGetInfo)(DWORD handle, BASS_CHANNELINFO &info);
-extern DELPHI_PACKAGE char * __stdcall (*BASS_ChannelGetTags)(HSTREAM handle, DWORD tags);
-extern DELPHI_PACKAGE unsigned __stdcall (*BASS_ChannelFlags)(DWORD handle, DWORD flags, DWORD mask);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_ChannelUpdate)(DWORD handle, DWORD length);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_ChannelLock)(DWORD handle, BOOL lock);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_ChannelPlay)(DWORD handle, BOOL restart);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_ChannelStop)(DWORD handle);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_ChannelPause)(DWORD handle);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_ChannelSetAttribute)(DWORD handle, DWORD attrib, float value);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_ChannelGetAttribute)(DWORD handle, DWORD attrib, float &value);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_ChannelSlideAttribute)(DWORD handle, DWORD attrib, float value, DWORD time);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_ChannelIsSliding)(DWORD handle, DWORD attrib);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_ChannelSetAttributeEx)(DWORD handle, DWORD attrib, void * value, DWORD size);
-extern DELPHI_PACKAGE unsigned __stdcall (*BASS_ChannelGetAttributeEx)(DWORD handle, DWORD attrib, void * value, DWORD size);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_ChannelSet3DAttributes)(DWORD handle, System::LongInt mode, float min, float max, System::LongInt iangle, System::LongInt oangle, System::LongInt outvol);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_ChannelGet3DAttributes)(DWORD handle, DWORD &mode, float &min, float &max, DWORD &iangle, DWORD &oangle, DWORD &outvol);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_ChannelSet3DPosition)(DWORD handle, BASS_3DVECTOR &pos, BASS_3DVECTOR &orient, BASS_3DVECTOR &vel);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_ChannelGet3DPosition)(DWORD handle, BASS_3DVECTOR &pos, BASS_3DVECTOR &orient, BASS_3DVECTOR &vel);
-extern DELPHI_PACKAGE __int64 __stdcall (*BASS_ChannelGetLength)(DWORD handle, DWORD mode);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_ChannelSetPosition)(DWORD handle, QWORD pos, DWORD mode);
-extern DELPHI_PACKAGE __int64 __stdcall (*BASS_ChannelGetPosition)(DWORD handle, DWORD mode);
-extern DELPHI_PACKAGE unsigned __stdcall (*BASS_ChannelGetLevel)(DWORD handle);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_ChannelGetLevelEx)(DWORD handle, Winapi::Windows::PSingle levels, float length, DWORD flags);
-extern DELPHI_PACKAGE unsigned __stdcall (*BASS_ChannelGetData)(DWORD handle, void * buffer, DWORD length);
-extern DELPHI_PACKAGE unsigned __stdcall (*BASS_ChannelSetSync)(DWORD handle, DWORD type_, QWORD param, SYNCPROC proc, void * user);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_ChannelRemoveSync)(DWORD handle, HSYNC sync);
-extern DELPHI_PACKAGE unsigned __stdcall (*BASS_ChannelSetDSP)(DWORD handle, DSPPROC proc, void * user, System::LongInt priority);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_ChannelRemoveDSP)(DWORD handle, HDSP dsp);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_ChannelSetLink)(DWORD handle, DWORD chan);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_ChannelRemoveLink)(DWORD handle, DWORD chan);
-extern DELPHI_PACKAGE unsigned __stdcall (*BASS_ChannelSetFX)(DWORD handle, DWORD type_, System::LongInt priority);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_ChannelRemoveFX)(DWORD handle, HFX fx);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_FXSetParameters)(HFX handle, void * par);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_FXGetParameters)(HFX handle, void * par);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_FXReset)(HFX handle);
-extern DELPHI_PACKAGE System::LongBool __stdcall (*BASS_FXSetPriority)(HFX handle, System::LongInt priority);
-extern DELPHI_PACKAGE DWORD __fastcall BASS_SPEAKER_N(DWORD n);
-extern DELPHI_PACKAGE BOOL __fastcall BASS_SetEAXPreset(System::LongInt env);
-extern DELPHI_PACKAGE bool __fastcall BASS_Load(System::WideChar * LibName);
-extern DELPHI_PACKAGE void __fastcall BASS_UnLoad(void);
-extern DELPHI_PACKAGE bool __fastcall BASS_IsLoaded(void);
-}	/* namespace Import */
-}	/* namespace Bass */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_BASS_IMPORT)
-using namespace Bass::Import;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_BASS)
-using namespace Bass;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// BASS_ImportHPP

include/Win32/CUDA.DataAccess.hpp

@@ -1,118 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'CUDA.DataAccess.pas' rev: 36.00 (Windows)
-
-#ifndef CUDA_DataAccessHPP
-#define CUDA_DataAccessHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <System.SysUtils.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Cuda
-{
-namespace Dataaccess
-{
-//-- forward type declarations -----------------------------------------------
-template<typename TScalar> class DELPHICLASS GCUDAHostElementAccess__1;
-//-- type declarations -------------------------------------------------------
-typedef System::Word THalfFloat;
-
-#pragma pack(push,4)
-// Template declaration generated by Delphi parameterized types is
-// used only for accessing Delphi variables and fields.
-// Don't instantiate with new type parameters in user code.
-template<typename TScalar> class PASCALIMPLEMENTATION GCUDAHostElementAccess__1 : public System::TObject
-{
-	typedef System::TObject inherited;
-	
-	
-public:
-	typedef System::StaticArray<TScalar, 2> TVector2;
-	
-	typedef System::Int8 _1;
-	
-	typedef System::StaticArray<TScalar, 3> TVector3;
-	
-	typedef System::Int8 _2;
-	
-	typedef System::StaticArray<TScalar, 4> TVector4;
-	
-	typedef System::Int8 _3;
-	
-	
-public:
-	static _DELPHI_CONST int ElementSize = int(0x0);
-	
-	
-private:
-	__classmethod void __fastcall CheckElementSize(unsigned ACNum);
-	__classmethod TScalar __fastcall GetScalar();
-	__classmethod System::StaticArray<TScalar, 2> __fastcall GetVector2();
-	__classmethod System::StaticArray<TScalar, 3> __fastcall GetVector3();
-	__classmethod System::StaticArray<TScalar, 4> __fastcall GetVector4();
-	__classmethod void __fastcall SetScalar(const TScalar AValue);
-	__classmethod void __fastcall SetVector2(const System::StaticArray<TScalar, 2> AValue);
-	__classmethod void __fastcall SetVector3(const System::StaticArray<TScalar, 3> AValue);
-	__classmethod void __fastcall SetVector4(const System::StaticArray<TScalar, 4> AValue);
-	
-public:
-	__property TScalar Scalar = {read=GetScalar, write=SetScalar};
-	__property System::StaticArray<TScalar, 2> Vector2 = {read=GetVector2, write=SetVector2};
-	__property System::StaticArray<TScalar, 3> Vector3 = {read=GetVector3, write=SetVector3};
-	__property System::StaticArray<TScalar, 4> Vector4 = {read=GetVector4, write=SetVector4};
-public:
-	/* TObject.Create */ inline __fastcall GCUDAHostElementAccess__1() : System::TObject() { }
-	/* TObject.Destroy */ inline __fastcall virtual ~GCUDAHostElementAccess__1() { }
-	
-};
-
-#pragma pack(pop)
-
-typedef GCUDAHostElementAccess__1<System::Byte> UByteElement;
-
-typedef GCUDAHostElementAccess__1<System::Int8> ByteElement;
-
-typedef GCUDAHostElementAccess__1<System::Word> UShortElement;
-
-typedef GCUDAHostElementAccess__1<short> ShortElement;
-
-typedef GCUDAHostElementAccess__1<System::LongWord> UIntElement;
-
-typedef GCUDAHostElementAccess__1<System::LongInt> IntElement;
-
-typedef GCUDAHostElementAccess__1<THalfFloat> HalfElement;
-
-typedef GCUDAHostElementAccess__1<float> FloatElement;
-
-typedef GCUDAHostElementAccess__1<double> DoubleElement;
-
-//-- var, const, procedure ---------------------------------------------------
-extern DELPHI_PACKAGE System::PByte __fastcall GetElementAccessAddress(void);
-extern DELPHI_PACKAGE unsigned __fastcall GetElementAccessSize(void);
-extern DELPHI_PACKAGE void __fastcall SetElementAccessAddress(System::PByte AValue, unsigned ASize);
-}	/* namespace Dataaccess */
-}	/* namespace Cuda */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_CUDA_DATAACCESS)
-using namespace Cuda::Dataaccess;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_CUDA)
-using namespace Cuda;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// CUDA_DataAccessHPP

include/Win32/CUDA.FourierTransform.hpp

@@ -1,180 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'CUDA.FourierTransform.pas' rev: 36.00 (Windows)
-
-#ifndef CUDA_FourierTransformHPP
-#define CUDA_FourierTransformHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <Winapi.Windows.hpp>
-#include <CUDA.Import.hpp>
-#include <CUDA.Runtime.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Cuda
-{
-namespace Fouriertransform
-{
-//-- forward type declarations -----------------------------------------------
-struct TcufftDoubleComplex;
-struct TcufftComplex;
-//-- type declarations -------------------------------------------------------
-typedef System::StaticArray<System::UnicodeString, 10> Cuda_Fouriertransform__1;
-
-typedef unsigned TcufftHandle;
-
-typedef float TcufftReal;
-
-typedef float *PcufftReal;
-
-typedef float TcufftRealfloat;
-
-typedef double *PcufftDoubleReal;
-
-typedef double TcufftDoubleReal;
-
-typedef TcufftDoubleComplex *PcufftDoubleComplex;
-
-struct DECLSPEC_DRECORD TcufftDoubleComplex
-{
-	
-public:
-	union
-	{
-		struct 
-		{
-			double X;
-			double Y;
-		};
-		struct 
-		{
-			System::StaticArray<double, 2> V;
-		};
-		
-	};
-};
-
-
-typedef TcufftComplex *PcufftComplex;
-
-struct DECLSPEC_DRECORD TcufftComplex
-{
-	
-public:
-	union
-	{
-		struct 
-		{
-			float X;
-			float Y;
-		};
-		struct 
-		{
-			System::StaticArray<float, 2> V;
-		};
-		
-	};
-};
-
-
-typedef System::Byte TcufftResult;
-
-typedef unsigned TcufftType;
-
-enum DECLSPEC_DENUM TcudaRoundMode : unsigned char { cudaRoundNearest, cudaRoundZero, cudaRoundPosInf, cudaRoundMinInf };
-
-typedef unsigned TcufftCompatibility;
-
-typedef TcufftResult __stdcall (*TcufftPlan1d)(/* out */ TcufftHandle &plan, int nx, TcufftType atype, int batch);
-
-typedef TcufftResult __stdcall (*TcufftPlan2d)(/* out */ TcufftHandle &plan, int nx, int ny, TcufftType atype);
-
-typedef TcufftResult __stdcall (*TcufftPlan3d)(/* out */ TcufftHandle &plan, int nx, int ny, int nz, TcufftType atype);
-
-typedef TcufftResult __stdcall (*TcufftDestroy)(TcufftHandle plan);
-
-typedef TcufftResult __stdcall (*TcufftPlanMany)(/* out */ TcufftHandle &plan, int rank, int &n, int &inembed, int istride, int idist, int &onembed, int ostride, int odist, TcufftType ctype, int batch);
-
-typedef TcufftResult __stdcall (*TcufftExecC2C)(TcufftHandle plan, PcufftComplex idata, PcufftComplex odata, int direction);
-
-typedef TcufftResult __stdcall (*TcufftExecR2C)(TcufftHandle plan, PcufftReal idata, PcufftComplex odata);
-
-typedef TcufftResult __stdcall (*TcufftExecC2R)(TcufftHandle plan, PcufftComplex idata, PcufftReal odata);
-
-typedef TcufftResult __stdcall (*TcufftExecZ2Z)(TcufftHandle plan, PcufftDoubleComplex idata, PcufftDoubleComplex odata, int direction);
-
-typedef TcufftResult __stdcall (*TcufftExecD2Z)(TcufftHandle plan, PcufftDoubleReal idata, PcufftDoubleComplex odata);
-
-typedef TcufftResult __stdcall (*TcufftExecZ2D)(TcufftHandle plan, PcufftDoubleComplex idata, PcufftDoubleReal odata);
-
-typedef TcufftResult __stdcall (*TcufftSetStream)(TcufftHandle p, int stream);
-
-typedef TcufftResult __stdcall (*TcufftSetCompatibilityMode)(TcufftHandle plan, TcufftCompatibility mode);
-
-//-- var, const, procedure ---------------------------------------------------
-extern DELPHI_PACKAGE Cuda_Fouriertransform__1 CUFFTDLLNAMES;
-static _DELPHI_CONST unsigned INVALID_CUFFT_HANDLE = unsigned(0xffffffff);
-extern DELPHI_PACKAGE TcufftResult CUFFT_SUCCESS;
-extern DELPHI_PACKAGE TcufftResult CUFFT_INVALID_PLAN;
-extern DELPHI_PACKAGE TcufftResult CUFFT_ALLOC_FAILED;
-extern DELPHI_PACKAGE TcufftResult CUFFT_INVALID_TYPE;
-extern DELPHI_PACKAGE TcufftResult CUFFT_INVALID_VALUE;
-extern DELPHI_PACKAGE TcufftResult CUFFT_INTERNAL_ERROR;
-extern DELPHI_PACKAGE TcufftResult CUFFT_EXEC_FAILED;
-extern DELPHI_PACKAGE TcufftResult CUFFT_SETUP_FAILED;
-extern DELPHI_PACKAGE TcufftResult CUFFT_INVALID_SIZE;
-static _DELPHI_CONST System::Int8 CUFFT_FORWARD = System::Int8(-1);
-static _DELPHI_CONST System::Int8 CUFFT_INVERSE = System::Int8(0x1);
-extern DELPHI_PACKAGE TcufftType CUFFT_R2C;
-extern DELPHI_PACKAGE TcufftType CUFFT_C2R;
-extern DELPHI_PACKAGE TcufftType CUFFT_C2C;
-extern DELPHI_PACKAGE TcufftType CUFFT_D2Z;
-extern DELPHI_PACKAGE TcufftType CUFFT_Z2D;
-extern DELPHI_PACKAGE TcufftType CUFFT_Z2Z;
-extern DELPHI_PACKAGE TcufftCompatibility CUFFT_COMPATIBILITY_NORMAL;
-extern DELPHI_PACKAGE TcufftCompatibility CUFFT_COMPATIBILITY_FFTW_PADDING;
-extern DELPHI_PACKAGE TcufftCompatibility CUFFT_COMPATIBILITY_FFTW_C2R_ASYMMETRIC;
-extern DELPHI_PACKAGE TcufftCompatibility CUFFT_COMPATIBILITY_FFTW;
-extern DELPHI_PACKAGE TcufftPlan1d cufftPlan1d;
-extern DELPHI_PACKAGE TcufftPlan2d cufftPlan2d;
-extern DELPHI_PACKAGE TcufftPlan3d cufftPlan3d;
-extern DELPHI_PACKAGE TcufftDestroy cufftDestroy;
-extern DELPHI_PACKAGE TcufftPlanMany cufftPlanMany;
-extern DELPHI_PACKAGE TcufftExecC2C cufftExecC2C;
-extern DELPHI_PACKAGE TcufftExecR2C cufftExecR2C;
-extern DELPHI_PACKAGE TcufftExecC2R cufftExecC2R;
-extern DELPHI_PACKAGE TcufftExecZ2Z cufftExecZ2Z;
-extern DELPHI_PACKAGE TcufftExecD2Z cufftExecD2Z;
-extern DELPHI_PACKAGE TcufftExecZ2D cufftExecZ2D;
-extern DELPHI_PACKAGE TcufftSetStream cufftSetStream;
-extern DELPHI_PACKAGE TcufftSetCompatibilityMode cufftSetCompatibilityMode;
-extern DELPHI_PACKAGE bool __fastcall InitCUFFT(void);
-extern DELPHI_PACKAGE void __fastcall CloseCUFFT(void);
-extern DELPHI_PACKAGE bool __fastcall InitCUFFTFromLibrary(const System::WideString LibName);
-extern DELPHI_PACKAGE bool __fastcall IsCUFFTInitialized(void);
-extern DELPHI_PACKAGE System::UnicodeString __fastcall Get_CUDA_FFT_Error_String(TcufftResult AError);
-}	/* namespace Fouriertransform */
-}	/* namespace Cuda */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_CUDA_FOURIERTRANSFORM)
-using namespace Cuda::Fouriertransform;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_CUDA)
-using namespace Cuda;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// CUDA_FourierTransformHPP

include/Win32/CUDA.Import.hpp

@@ -1,661 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'CUDA.Import.pas' rev: 36.00 (Windows)
-
-#ifndef CUDA_ImportHPP
-#define CUDA_ImportHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <Winapi.Windows.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Cuda
-{
-namespace Import
-{
-//-- forward type declarations -----------------------------------------------
-struct DECLSPEC_DRECORD TCUcontext
-{
-};
-
-
-struct DECLSPEC_DRECORD TCUmodule
-{
-};
-
-
-struct DECLSPEC_DRECORD TCUfunction
-{
-};
-
-
-struct DECLSPEC_DRECORD TCUarray
-{
-};
-
-
-struct DECLSPEC_DRECORD TCUtexref
-{
-};
-
-
-struct DECLSPEC_DRECORD TCUevent
-{
-};
-
-
-struct DECLSPEC_DRECORD TCUstream
-{
-};
-
-
-struct DECLSPEC_DRECORD TCUgraphicsResource
-{
-};
-
-
-struct TCUdevprop;
-struct TcudaFuncAttributes;
-struct TCUDA_MEMCPY2D;
-struct TCUDA_MEMCPY3D;
-struct TCUDA_ARRAY_DESCRIPTOR;
-struct TCUDA_ARRAY3D_DESCRIPTOR;
-//-- type declarations -------------------------------------------------------
-typedef void * TCUdeviceptr;
-
-typedef int TCUdevice;
-
-typedef TCUcontext *PCUcontext;
-
-typedef TCUmodule *PCUmodule;
-
-typedef TCUfunction *PCUfunction;
-
-typedef TCUarray *PCUarray;
-
-typedef TCUtexref *PCUtexref;
-
-typedef TCUevent *PCUevent;
-
-typedef TCUstream *PCUstream;
-
-typedef TCUgraphicsResource *PCUgraphicsResource;
-
-typedef PCUgraphicsResource *PPCUgraphicsResource;
-
-enum DECLSPEC_DENUM TCUctx_flags : unsigned char { CU_CTX_SCHED_AUTO, CU_CTX_SCHED_SPIN, CU_CTX_SCHED_YIELD, CU_CTX_SCHED_MASK, CU_CTX_BLOCKING_SYNC, CU_CTX_MAP_HOST = 8, CU_CTX_FLAGS_MASK = 15 };
-
-enum DECLSPEC_DENUM TCUevent_flags : unsigned char { CU_EVENT_DEFAULT, CU_EVENT_BLOCKING_SYNC };
-
-enum DECLSPEC_DENUM TCUarray_format : unsigned char { CU_AD_FORMAT_UNSIGNED_INT8 = 1, CU_AD_FORMAT_UNSIGNED_INT16, CU_AD_FORMAT_UNSIGNED_INT32, CU_AD_FORMAT_SIGNED_INT8 = 8, CU_AD_FORMAT_SIGNED_INT16, CU_AD_FORMAT_SIGNED_INT32, CU_AD_FORMAT_HALF = 16, CU_AD_FORMAT_FLOAT = 32 };
-
-enum DECLSPEC_DENUM TCUaddress_mode : unsigned char { CU_TR_ADDRESS_MODE_WRAP, CU_TR_ADDRESS_MODE_CLAMP, CU_TR_ADDRESS_MODE_MIRROR };
-
-enum DECLSPEC_DENUM TCUfilter_mode : unsigned char { CU_TR_FILTER_MODE_POINT, CU_TR_FILTER_MODE_LINEAR };
-
-enum DECLSPEC_DENUM TCUdevice_attribute : unsigned char { CU_DEVICE_ATTRIBUTE_MAX_THREADS_PER_BLOCK = 1, CU_DEVICE_ATTRIBUTE_MAX_BLOCK_DIM_X, CU_DEVICE_ATTRIBUTE_MAX_BLOCK_DIM_Y, CU_DEVICE_ATTRIBUTE_MAX_BLOCK_DIM_Z, CU_DEVICE_ATTRIBUTE_MAX_GRID_DIM_X, CU_DEVICE_ATTRIBUTE_MAX_GRID_DIM_Y, CU_DEVICE_ATTRIBUTE_MAX_GRID_DIM_Z, CU_DEVICE_ATTRIBUTE_MAX_SHARED_MEMORY_PER_BLOCK, CU_DEVICE_ATTRIBUTE_SHARED_MEMORY_PER_BLOCK = 8, CU_DEVICE_ATTRIBUTE_TOTAL_CONSTANT_MEMORY, CU_DEVICE_ATTRIBUTE_WARP_SIZE, CU_DEVICE_ATTRIBUTE_MAX_PITCH, CU_DEVICE_ATTRIBUTE_MAX_REGISTERS_PER_BLOCK, CU_DEVICE_ATTRIBUTE_REGISTERS_PER_BLOCK = 12, CU_DEVICE_ATTRIBUTE_CLOCK_RATE, CU_DEVICE_ATTRIBUTE_TEXTURE_ALIGNMENT, CU_DEVICE_ATTRIBUTE_GPU_OVERLAP, CU_DEVICE_ATTRIBUTE_MULTIPROCESSOR_COUNT, 
-	CU_DEVICE_ATTRIBUTE_KERNEL_EXEC_TIMEOUT, CU_DEVICE_ATTRIBUTE_INTEGRATED, CU_DEVICE_ATTRIBUTE_CAN_MAP_HOST_MEMORY, CU_DEVICE_ATTRIBUTE_COMPUTE_MODE };
-
-enum DECLSPEC_DENUM TcudaLimit : unsigned char { cudaLimitStackSize, cudaLimitPrintfFifoSize };
-
-struct DECLSPEC_DRECORD TCUdevprop
-{
-public:
-	int maxThreadsPerBlock;
-	System::StaticArray<int, 3> maxThreadsDim;
-	System::StaticArray<int, 3> maxGridSize;
-	int sharedMemPerBlock;
-	int totalConstantMemory;
-	int SIMDWidth;
-	int memPitch;
-	int regsPerBlock;
-	int clockRate;
-	int textureAlign;
-};
-
-
-enum DECLSPEC_DENUM TCUfunction_attribute : unsigned char { CU_FUNC_ATTRIBUTE_MAX_THREADS_PER_BLOCK, CU_FUNC_ATTRIBUTE_SHARED_SIZE_BYTES, CU_FUNC_ATTRIBUTE_CONST_SIZE_BYTES, CU_FUNC_ATTRIBUTE_LOCAL_SIZE_BYTES, CU_FUNC_ATTRIBUTE_NUM_REGS, CU_FUNC_ATTRIBUTE_MAX };
-
-enum DECLSPEC_DENUM TCUmemorytype : unsigned char { CU_MEMORYTYPE_HOST = 1, CU_MEMORYTYPE_DEVICE, CU_MEMORYTYPE_ARRAY };
-
-enum DECLSPEC_DENUM TCUcomputemode : unsigned char { CU_COMPUTEMODE_DEFAULT, CU_COMPUTEMODE_EXCLUSIVE, CU_COMPUTEMODE_PROHIBITED };
-
-enum DECLSPEC_DENUM TCUjit_option : unsigned char { CU_JIT_MAX_REGISTERS, CU_JIT_THREADS_PER_BLOCK, CU_JIT_WALL_TIME, CU_JIT_INFO_LOG_BUFFER, CU_JIT_INFO_LOG_BUFFER_SIZE_BYTES, CU_JIT_ERROR_LOG_BUFFER, CU_JIT_ERROR_LOG_BUFFER_SIZE_BYTES, CU_JIT_OPTIMIZATION_LEVEL, CU_JIT_TARGET_FROM_CUCONTEXT, CU_JIT_TARGET, CU_JIT_FALLBACK_STRATEGY };
-
-enum DECLSPEC_DENUM TCUjit_target : unsigned char { CU_TARGET_COMPUTE_10, CU_TARGET_COMPUTE_11, CU_TARGET_COMPUTE_12, CU_TARGET_COMPUTE_13 };
-
-enum DECLSPEC_DENUM TCUjit_fallback : unsigned char { CU_PREFER_PTX, CU_PREFER_BINARY };
-
-enum DECLSPEC_DENUM TCUgraphicsRegisterFlags : unsigned char { CU_GRAPHICS_REGISTER_FLAGS_NONE };
-
-enum DECLSPEC_DENUM TCUgraphicsMapResourceFlags : unsigned char { CU_GRAPHICS_MAP_RESOURCE_FLAGS_NONE, CU_GRAPHICS_MAP_RESOURCE_FLAGS_READ_ONLY, CU_GRAPHICS_MAP_RESOURCE_FLAGS_WRITE_DISCARD };
-
-enum DECLSPEC_DENUM TCUarray_cubemap_face : unsigned char { CU_CUBEMAP_FACE_POSITIVE_X, CU_CUBEMAP_FACE_NEGATIVE_X, CU_CUBEMAP_FACE_POSITIVE_Y, CU_CUBEMAP_FACE_NEGATIVE_Y, CU_CUBEMAP_FACE_POSITIVE_Z, CU_CUBEMAP_FACE_NEGATIVE_Z };
-
-struct DECLSPEC_DRECORD TcudaFuncAttributes
-{
-public:
-	System::NativeUInt sharedSizeBytes;
-	System::NativeUInt constSizeBytes;
-	System::NativeUInt localSizeBytes;
-	int maxThreadsPerBlock;
-	int numRegs;
-	int ptxVersion;
-	int binaryVersion;
-	System::StaticArray<int, 6> __cudaReserved;
-};
-
-
-enum DECLSPEC_DENUM TcudaFuncCache : unsigned char { cudaFuncCachePreferNone, cudaFuncCachePreferShared, cudaFuncCachePreferL1 };
-
-typedef unsigned TCUresult;
-
-typedef TCUDA_MEMCPY2D *PCUDA_MEMCPY2D;
-
-struct DECLSPEC_DRECORD TCUDA_MEMCPY2D
-{
-public:
-	unsigned srcXInBytes;
-	unsigned srcY;
-	TCUmemorytype srcMemoryType;
-	void *srcHost;
-	TCUdeviceptr srcDevice;
-	PCUarray srcArray;
-	unsigned srcPitch;
-	unsigned dstXInBytes;
-	unsigned dstY;
-	TCUmemorytype dstMemoryType;
-	void *dstHost;
-	TCUdeviceptr dstDevice;
-	PCUarray dstArray;
-	unsigned dstPitch;
-	unsigned WidthInBytes;
-	unsigned Height;
-};
-
-
-struct DECLSPEC_DRECORD TCUDA_MEMCPY3D
-{
-public:
-	unsigned srcXInBytes;
-	unsigned srcY;
-	unsigned srcZ;
-	unsigned srcLOD;
-	TCUmemorytype srcMemoryType;
-	void *srcHost;
-	TCUdeviceptr srcDevice;
-	PCUarray srcArray;
-	void *reserved0;
-	unsigned srcPitch;
-	unsigned srcHeight;
-	unsigned dstXInBytes;
-	unsigned dstY;
-	unsigned dstZ;
-	unsigned dstLOD;
-	TCUmemorytype dstMemoryType;
-	void *dstHost;
-	TCUdeviceptr dstDevice;
-	PCUarray dstArray;
-	void *reserved1;
-	unsigned dstPitch;
-	unsigned dstHeight;
-	unsigned WidthInBytes;
-	unsigned Height;
-	unsigned Depth;
-};
-
-
-typedef TCUDA_ARRAY_DESCRIPTOR *PCUDA_ARRAY_DESCRIPTOR;
-
-struct DECLSPEC_DRECORD TCUDA_ARRAY_DESCRIPTOR
-{
-public:
-	unsigned Width;
-	unsigned Height;
-	TCUarray_format Format;
-	unsigned NumChannels;
-};
-
-
-struct DECLSPEC_DRECORD TCUDA_ARRAY3D_DESCRIPTOR
-{
-public:
-	unsigned Width;
-	unsigned Height;
-	unsigned Depth;
-	TCUarray_format Format;
-	unsigned NumChannels;
-	unsigned Flags;
-};
-
-
-enum DECLSPEC_DENUM TCUGLmap_flags : unsigned char { CU_GL_MAP_RESOURCE_FLAGS_NONE, CU_GL_MAP_RESOURCE_FLAGS_READ_ONLY, CU_GL_MAP_RESOURCE_FLAGS_WRITE_DISCARD };
-
-typedef System::StaticArray<unsigned, 3> TDim3;
-
-typedef void * HGPUNV;
-
-typedef TCUresult __stdcall (*TcuInit)(unsigned Flags);
-
-typedef TCUresult __stdcall (*TcuDriverGetVersion)(/* out */ int &driverVersion);
-
-typedef TCUresult __stdcall (*TcuDeviceGet)(TCUdevice &device, int ordinal);
-
-typedef TCUresult __stdcall (*TcuDeviceGetCount)(int &count);
-
-typedef TCUresult __stdcall (*TcuDeviceGetName)(char * name, int len, TCUdevice dev);
-
-typedef TCUresult __stdcall (*TcuDeviceComputeCapability)(int &major, int &minor, TCUdevice dev);
-
-typedef TCUresult __stdcall (*TcuDeviceTotalMem)(PSIZE_T bytes, TCUdevice dev);
-
-typedef TCUresult __stdcall (*TcuDeviceGetProperties)(TCUdevprop &prop, TCUdevice dev);
-
-typedef TCUresult __stdcall (*TcuDeviceGetAttribute)(PSIZE_T pi, TCUdevice_attribute attrib, TCUdevice dev);
-
-typedef TCUresult __stdcall (*TcuCtxCreate)(PCUcontext &pctx, unsigned Flags, TCUdevice dev);
-
-typedef TCUresult __stdcall (*TcuCtxDestroy)(PCUcontext ctx);
-
-typedef TCUresult __stdcall (*TcuCtxAttach)(PCUcontext &pctx, unsigned Flags);
-
-typedef TCUresult __stdcall (*TcuCtxDetach)(PCUcontext ctx);
-
-typedef TCUresult __stdcall (*TcuCtxPushCurrent)(PCUcontext ctx);
-
-typedef TCUresult __stdcall (*TcuCtxPopCurrent)(PCUcontext &pctx);
-
-typedef TCUresult __stdcall (*TcuCtxGetDevice)(TCUdevice &device);
-
-typedef TCUresult __stdcall (*TcuCtxSynchronize)(void);
-
-typedef TCUresult __stdcall (*TcuModuleLoad)(PCUmodule &module, const char * fname);
-
-typedef TCUresult __stdcall (*TcuModuleLoadData)(PCUmodule &module, const char * image);
-
-typedef TCUresult __stdcall (*TcuModuleLoadDataEx)(PCUmodule &module, void *image, unsigned numOptions, TCUjit_option &options, void *optionValues);
-
-typedef TCUresult __stdcall (*TcuModuleLoadFatBinary)(PCUmodule &module, void *fatCubin);
-
-typedef TCUresult __stdcall (*TcuModuleUnload)(PCUmodule hmod);
-
-typedef TCUresult __stdcall (*TcuModuleGetFunction)(/* out */ PCUfunction &hfunc, PCUmodule hmod, const char * name);
-
-typedef TCUresult __stdcall (*TcuModuleGetGlobal)(/* out */ TCUdeviceptr &dptr, unsigned &bytes, PCUmodule hmod, const char * name);
-
-typedef TCUresult __stdcall (*TcuModuleGetTexRef)(/* out */ PCUtexref &pTexRef, PCUmodule hmod, const char * name);
-
-typedef TCUresult __stdcall (*TcuMemGetInfo)(unsigned &free, unsigned &total);
-
-typedef TCUresult __stdcall (*TcuMemAlloc)(TCUdeviceptr &dptr, unsigned bytesize);
-
-typedef TCUresult __stdcall (*TcuMemAllocPitch)(TCUdeviceptr &dptr, unsigned &pPitch, unsigned WidthInBytes, unsigned Height, unsigned ElementSizeBytes);
-
-typedef TCUresult __stdcall (*TcuMemFree)(TCUdeviceptr dptr);
-
-typedef TCUresult __stdcall (*TcuMemGetAddressRange)(TCUdeviceptr &pbase, unsigned &psize, TCUdeviceptr dptr);
-
-typedef TCUresult __stdcall (*TcuMemAllocHost)(void *pp, unsigned bytesize);
-
-typedef TCUresult __stdcall (*TcuMemFreeHost)(void * p);
-
-typedef TCUresult __stdcall (*TcuMemHostAlloc)(void * &pp, unsigned bytesize, unsigned Flags);
-
-typedef TCUresult __stdcall (*TcuMemHostGetDevicePointer)(TCUdeviceptr &pdptr, void * p, unsigned Flags);
-
-typedef TCUresult __stdcall (*TcuMemHostGetFlags)(unsigned &pFlags, void *p);
-
-typedef TCUresult __stdcall (*TcuMemcpyHtoD)(TCUdeviceptr dstDevice, const void * srcHost, unsigned ByteCount);
-
-typedef TCUresult __stdcall (*TcuMemcpyDtoH)(const void * dstHost, TCUdeviceptr srcDevice, unsigned ByteCount);
-
-typedef TCUresult __stdcall (*TcuMemcpyDtoD)(TCUdeviceptr dstDevice, TCUdeviceptr srcDevice, unsigned ByteCount);
-
-typedef TCUresult __stdcall (*TcuMemcpyDtoDAsync)(TCUdeviceptr dstDevice, TCUdeviceptr srcDevice, unsigned ByteCount, PCUstream hStream);
-
-typedef TCUresult __stdcall (*TcuMemcpyDtoA)(PCUarray dstArray, unsigned dstIndex, TCUdeviceptr srcDevice, unsigned ByteCount);
-
-typedef TCUresult __stdcall (*TcuMemcpyAtoD)(TCUdeviceptr dstDevice, PCUarray hSrc, unsigned SrcIndex, unsigned ByteCount);
-
-typedef TCUresult __stdcall (*TcuMemcpyHtoA)(PCUarray dstArray, unsigned dstIndex, void * pSrc, unsigned ByteCount);
-
-typedef TCUresult __stdcall (*TcuMemcpyAtoH)(void * dstHost, PCUarray srcArray, unsigned SrcIndex, unsigned ByteCount);
-
-typedef TCUresult __stdcall (*TcuMemcpyAtoA)(PCUarray dstArray, unsigned dstIndex, PCUarray srcArray, unsigned SrcIndex, unsigned ByteCount);
-
-typedef TCUresult __stdcall (*TcuMemcpy2D)(const PCUDA_MEMCPY2D pCopy);
-
-typedef TCUresult __stdcall (*TcuMemcpy2DUnaligned)(TCUDA_MEMCPY2D &pCopy);
-
-typedef TCUresult __stdcall (*TcuMemcpy3D)(TCUDA_MEMCPY3D &pCopy);
-
-typedef TCUresult __stdcall (*TcuMemcpyHtoDAsync)(TCUdeviceptr dstDevice, void *srcHost, unsigned ByteCount, PCUstream hStream);
-
-typedef TCUresult __stdcall (*TcuMemcpyDtoHAsync)(void *dstHost, TCUdeviceptr srcDevice, unsigned ByteCount, PCUstream hStream);
-
-typedef TCUresult __stdcall (*TcuMemcpyHtoAAsync)(PCUarray dstArray, unsigned dstIndex, void *pSrc, unsigned ByteCount, PCUstream hStream);
-
-typedef TCUresult __stdcall (*TcuMemcpyAtoHAsync)(void *dstHost, PCUstream srcArray, unsigned SrcIndex, unsigned ByteCount, PCUstream hStream);
-
-typedef TCUresult __stdcall (*TcuMemcpy2DAsync)(TCUDA_MEMCPY2D &pCopy, PCUstream hStream);
-
-typedef TCUresult __stdcall (*TcuMemcpy3DAsync)(TCUDA_MEMCPY3D &pCopy, PCUstream hStream);
-
-typedef TCUresult __stdcall (*TcuMemsetD8)(TCUdeviceptr dstDevice, System::Byte ub, unsigned N);
-
-typedef TCUresult __stdcall (*TcuMemsetD16)(TCUdeviceptr dstDevice, System::Word uw, unsigned N);
-
-typedef TCUresult __stdcall (*TcuMemsetD32)(TCUdeviceptr dstDevice, unsigned ui, unsigned N);
-
-typedef TCUresult __stdcall (*TcuMemsetD2D8)(TCUdeviceptr dstDevice, unsigned dstPitch, System::Byte ub, unsigned Width, unsigned Height);
-
-typedef TCUresult __stdcall (*TcuMemsetD2D16)(TCUdeviceptr dstDevice, unsigned dstPitch, System::Word uw, unsigned Width, unsigned Height);
-
-typedef TCUresult __stdcall (*TcuMemsetD2D32)(TCUdeviceptr dstDevice, unsigned dstPitch, unsigned ui, unsigned Width, unsigned Height);
-
-typedef TCUresult __stdcall (*TcuFuncSetBlockShape)(PCUfunction hfunc, int x, int y, int z);
-
-typedef TCUresult __stdcall (*TcuFuncSetSharedSize)(PCUfunction hfunc, unsigned bytes);
-
-typedef TCUresult __stdcall (*TcuFuncGetAttribute)(int &pi, TCUfunction_attribute attrib, PCUfunction hfunc);
-
-typedef TCUresult __stdcall (*TcuArrayCreate)(PCUarray &pHandle, TCUDA_ARRAY_DESCRIPTOR &pAllocateArray);
-
-typedef TCUresult __stdcall (*TcuArrayGetDescriptor)(TCUDA_ARRAY_DESCRIPTOR &pArrayDescriptor, PCUarray hArray);
-
-typedef TCUresult __stdcall (*TcuArrayDestroy)(PCUarray hArray);
-
-typedef TCUresult __stdcall (*TcuArray3DCreate)(PCUarray &pHandle, TCUDA_ARRAY3D_DESCRIPTOR &pAllocateArray);
-
-typedef TCUresult __stdcall (*TcuArray3DGetDescriptor)(TCUDA_ARRAY3D_DESCRIPTOR &pArrayDescriptor, PCUarray hArray);
-
-typedef TCUresult __stdcall (*TcuTexRefCreate)(PCUtexref &pTexRef);
-
-typedef TCUresult __stdcall (*TcuTexRefDestroy)(PCUtexref hTexRef);
-
-typedef TCUresult __stdcall (*TcuTexRefSetArray)(PCUtexref hTexRef, PCUarray hArray, unsigned Flags);
-
-typedef TCUresult __stdcall (*TcuTexRefSetAddress)(unsigned &ByteOffset, PCUtexref hTexRef, TCUdeviceptr dptr, unsigned bytes);
-
-typedef TCUresult __stdcall (*TcuTexRefSetAddress2D)(PCUtexref hTexRef, TCUDA_ARRAY_DESCRIPTOR &desc, TCUdeviceptr dptr, unsigned Pitch);
-
-typedef TCUresult __stdcall (*TcuTexRefSetFormat)(PCUtexref hTexRef, TCUarray_format fmt, int NumPackedComponents);
-
-typedef TCUresult __stdcall (*TcuTexRefSetAddressMode)(PCUtexref hTexRef, int dim, TCUaddress_mode am);
-
-typedef TCUresult __stdcall (*TcuTexRefSetFilterMode)(PCUtexref hTexRef, TCUfilter_mode fm);
-
-typedef TCUresult __stdcall (*TcuTexRefSetFlags)(PCUtexref hTexRef, unsigned Flags);
-
-typedef TCUresult __stdcall (*TcuTexRefGetAddress)(TCUdeviceptr &pdptr, PCUtexref hTexRef);
-
-typedef TCUresult __stdcall (*TcuTexRefGetArray)(PCUarray &phArray, PCUtexref hTexRef);
-
-typedef TCUresult __stdcall (*TcuTexRefGetAddressMode)(TCUaddress_mode &pam, PCUtexref hTexRef, int dim);
-
-typedef TCUresult __stdcall (*TcuTexRefGetFilterMode)(TCUfilter_mode &pfm, PCUtexref hTexRef);
-
-typedef TCUresult __stdcall (*TcuTexRefGetFormat)(TCUarray_format &pFormat, int &pNumChannels, PCUtexref hTexRef);
-
-typedef TCUresult __stdcall (*TcuTexRefGetFlags)(unsigned &pFlags, PCUtexref hTexRef);
-
-typedef TCUresult __stdcall (*TcuParamSetSize)(PCUfunction hfunc, unsigned numbytes);
-
-typedef TCUresult __stdcall (*TcuParamSeti)(PCUfunction hfunc, int offset, unsigned value);
-
-typedef TCUresult __stdcall (*TcuParamSetf)(PCUfunction hfunc, int offset, float value);
-
-typedef TCUresult __stdcall (*TcuParamSetv)(PCUfunction hfunc, int offset, void *ptr, unsigned numbytes);
-
-typedef TCUresult __stdcall (*TcuParamSetTexRef)(PCUfunction hfunc, int texunit, PCUtexref hTexRef);
-
-typedef TCUresult __stdcall (*TcuLaunch)(PCUfunction f);
-
-typedef TCUresult __stdcall (*TcuLaunchGrid)(PCUfunction f, int grid_width, int grid_height);
-
-typedef TCUresult __stdcall (*TcuLaunchGridAsync)(PCUfunction f, int grid_width, int grid_height, PCUstream hStream);
-
-typedef TCUresult __stdcall (*TcuEventCreate)(PCUevent &phEvent, unsigned Flags);
-
-typedef TCUresult __stdcall (*TcuEventRecord)(PCUevent hEvent, PCUstream hStream);
-
-typedef TCUresult __stdcall (*TcuEventQuery)(PCUevent hEvent);
-
-typedef TCUresult __stdcall (*TcuEventSynchronize)(PCUevent hEvent);
-
-typedef TCUresult __stdcall (*TcuEventDestroy)(PCUevent hEvent);
-
-typedef TCUresult __stdcall (*TcuEventElapsedTime)(float &pMilliseconds, PCUevent hStart, PCUevent hEnd);
-
-typedef TCUresult __stdcall (*TcuStreamCreate)(PCUstream &phStream, unsigned Flags);
-
-typedef TCUresult __stdcall (*TcuStreamQuery)(PCUstream hStream);
-
-typedef TCUresult __stdcall (*TcuStreamSynchronize)(PCUstream hStream);
-
-typedef TCUresult __stdcall (*TcuStreamDestroy)(PCUstream hStream);
-
-typedef TCUresult __stdcall (*TcuGLCtxCreate)(PCUcontext &pctx, unsigned Flags, TCUdevice device);
-
-typedef TCUresult __stdcall (*TcuGraphicsGLRegisterBuffer)(PCUgraphicsResource &pCudaResource, unsigned buffer, TCUgraphicsMapResourceFlags Flags);
-
-typedef TCUresult __stdcall (*TcuGraphicsGLRegisterImage)(PCUgraphicsResource &pCudaResource, unsigned image, unsigned target, TCUgraphicsMapResourceFlags Flags);
-
-typedef TCUresult __stdcall (*TcuWGLGetDevice)(TCUdevice &pDevice, HGPUNV hGpu);
-
-typedef TCUresult __stdcall (*TcuGraphicsUnregisterResource)(PCUgraphicsResource resource);
-
-typedef TCUresult __stdcall (*TcuGraphicsSubResourceGetMappedArray)(PCUarray &pArray, PCUgraphicsResource resource, unsigned arrayIndex, unsigned mipLevel);
-
-typedef TCUresult __stdcall (*TcuGraphicsResourceGetMappedPointer)(TCUdeviceptr &pDevPtr, /* out */ unsigned &psize, PCUgraphicsResource resource);
-
-typedef TCUresult __stdcall (*TcuGraphicsResourceSetMapFlags)(PCUgraphicsResource resource, unsigned Flags);
-
-typedef TCUresult __stdcall (*TcuGraphicsMapResources)(unsigned count, PPCUgraphicsResource resources, PCUstream hStream);
-
-typedef TCUresult __stdcall (*TcuGraphicsUnmapResources)(unsigned count, PPCUgraphicsResource resources, PCUstream hStream);
-
-typedef void __stdcall (*TcuGLInit)(void);
-
-typedef TCUresult __stdcall (*TcuGLRegisterBufferObject)(unsigned buffer);
-
-typedef TCUresult __stdcall (*TcuGLMapBufferObject)(TCUdeviceptr &dptr, unsigned &size, unsigned buffer);
-
-typedef TCUresult __stdcall (*TcuGLUnmapBufferObject)(unsigned buffer);
-
-typedef TCUresult __stdcall (*TcuGLUnregisterBufferObject)(unsigned buffer);
-
-typedef TCUresult __stdcall (*TcuGLSetBufferObjectMapFlags)(unsigned buffer, unsigned Flags);
-
-typedef TCUresult __stdcall (*TcuGLMapBufferObjectAsync)(TCUdeviceptr &dptr, unsigned &size, unsigned buffer, PCUstream hStream);
-
-typedef TCUresult __stdcall (*TcuGLUnmapBufferObjectAsync)(unsigned buffer, PCUstream hStream);
-
-//-- var, const, procedure ---------------------------------------------------
-#define CUDAAPIDLL L"nvcuda.dll"
-extern DELPHI_PACKAGE TCUresult CUDA_SUCCESS;
-static _DELPHI_CONST System::Int8 CUDA_ERROR_INVALID_VALUE = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 CUDA_ERROR_OUT_OF_MEMORY = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 CUDA_ERROR_NOT_INITIALIZED = System::Int8(0x3);
-static _DELPHI_CONST System::Int8 CUDA_ERROR_DEINITIALIZED = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 CUDA_ERROR_NO_DEVICE = System::Int8(0x64);
-static _DELPHI_CONST System::Int8 CUDA_ERROR_INVALID_DEVICE = System::Int8(0x65);
-static _DELPHI_CONST System::Byte CUDA_ERROR_INVALID_IMAGE = System::Byte(0xc8);
-static _DELPHI_CONST System::Byte CUDA_ERROR_INVALID_CONTEXT = System::Byte(0xc9);
-static _DELPHI_CONST System::Byte CUDA_ERROR_CONTEXT_ALREADY_CURRENT = System::Byte(0xca);
-static _DELPHI_CONST System::Byte CUDA_ERROR_MAP_FAILED = System::Byte(0xcd);
-static _DELPHI_CONST System::Byte CUDA_ERROR_UNMAP_FAILED = System::Byte(0xce);
-static _DELPHI_CONST System::Byte CUDA_ERROR_ARRAY_IS_MAPPED = System::Byte(0xcf);
-static _DELPHI_CONST System::Byte CUDA_ERROR_ALREADY_MAPPED = System::Byte(0xd0);
-static _DELPHI_CONST System::Byte CUDA_ERROR_NO_BINARY_FOR_GPU = System::Byte(0xd1);
-static _DELPHI_CONST System::Byte CUDA_ERROR_ALREADY_ACQUIRED = System::Byte(0xd2);
-static _DELPHI_CONST System::Byte CUDA_ERROR_NOT_MAPPED = System::Byte(0xd3);
-static _DELPHI_CONST System::Byte CUDA_ERROR_NOT_MAPPED_AS_ARRAY = System::Byte(0xd4);
-static _DELPHI_CONST System::Byte CUDA_ERROR_NOT_MAPPED_AS_POINTER = System::Byte(0xd5);
-static _DELPHI_CONST System::Word CUDA_ERROR_INVALID_SOURCE = System::Word(0x12c);
-static _DELPHI_CONST System::Word CUDA_ERROR_FILE_NOT_FOUND = System::Word(0x12d);
-static _DELPHI_CONST System::Word CUDA_ERROR_INVALID_HANDLE = System::Word(0x190);
-static _DELPHI_CONST System::Word CUDA_ERROR_NOT_FOUND = System::Word(0x1f4);
-static _DELPHI_CONST System::Word CUDA_ERROR_NOT_READY = System::Word(0x258);
-static _DELPHI_CONST System::Word CUDA_ERROR_LAUNCH_FAILED = System::Word(0x2bc);
-static _DELPHI_CONST System::Word CUDA_ERROR_LAUNCH_OUT_OF_RESOURCES = System::Word(0x2bd);
-static _DELPHI_CONST System::Word CUDA_ERROR_LAUNCH_TIMEOUT = System::Word(0x2be);
-static _DELPHI_CONST System::Word CUDA_ERROR_LAUNCH_INCOMPATIBLE_TEXTURING = System::Word(0x2bf);
-static _DELPHI_CONST System::Word CUDA_ERROR_POINTER_IS_64BIT = System::Word(0x320);
-static _DELPHI_CONST System::Word CUDA_ERROR_SIZE_IS_64BIT = System::Word(0x321);
-static _DELPHI_CONST System::Word CUDA_ERROR_UNKNOWN = System::Word(0x3e7);
-static _DELPHI_CONST System::Int8 CU_MEMHOSTALLOC_PORTABLE = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 CU_MEMHOSTALLOC_DEVICEMAP = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 CU_MEMHOSTALLOC_WRITECOMBINED = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 CU_TRSA_OVERRIDE_FORMAT = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 CU_TRSF_READ_AS_INTEGER = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 CU_TRSF_NORMALIZED_COORDINATES = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 CU_PARAM_TR_DEFAULT = System::Int8(-1);
-extern DELPHI_PACKAGE TcuInit cuInit;
-extern DELPHI_PACKAGE TcuDriverGetVersion cuDriverGetVersion;
-extern DELPHI_PACKAGE TcuDeviceGet cuDeviceGet;
-extern DELPHI_PACKAGE TcuDeviceGetCount cuDeviceGetCount;
-extern DELPHI_PACKAGE TcuDeviceGetName cuDeviceGetName;
-extern DELPHI_PACKAGE TcuDeviceComputeCapability cuDeviceComputeCapability;
-extern DELPHI_PACKAGE TcuDeviceTotalMem cuDeviceTotalMem;
-extern DELPHI_PACKAGE TcuDeviceGetProperties cuDeviceGetProperties;
-extern DELPHI_PACKAGE TcuDeviceGetAttribute cuDeviceGetAttribute;
-extern DELPHI_PACKAGE TcuCtxCreate cuCtxCreate;
-extern DELPHI_PACKAGE TcuCtxDestroy cuCtxDestroy;
-extern DELPHI_PACKAGE TcuCtxAttach cuCtxAttach;
-extern DELPHI_PACKAGE TcuCtxDetach cuCtxDetach;
-extern DELPHI_PACKAGE TcuCtxPushCurrent cuCtxPushCurrent;
-extern DELPHI_PACKAGE TcuCtxPopCurrent cuCtxPopCurrent;
-extern DELPHI_PACKAGE TcuCtxGetDevice cuCtxGetDevice;
-extern DELPHI_PACKAGE TcuCtxSynchronize cuCtxSynchronize;
-extern DELPHI_PACKAGE TcuModuleLoad cuModuleLoad;
-extern DELPHI_PACKAGE TcuModuleLoadData cuModuleLoadData;
-extern DELPHI_PACKAGE TcuModuleLoadDataEx cuModuleLoadDataEx;
-extern DELPHI_PACKAGE TcuModuleLoadFatBinary cuModuleLoadFatBinary;
-extern DELPHI_PACKAGE TcuModuleUnload cuModuleUnload;
-extern DELPHI_PACKAGE TcuModuleGetFunction cuModuleGetFunction;
-extern DELPHI_PACKAGE TcuModuleGetGlobal cuModuleGetGlobal;
-extern DELPHI_PACKAGE TcuModuleGetTexRef cuModuleGetTexRef;
-extern DELPHI_PACKAGE TcuMemGetInfo cuMemGetInfo;
-extern DELPHI_PACKAGE TcuMemAlloc cuMemAlloc;
-extern DELPHI_PACKAGE TcuMemAllocPitch cuMemAllocPitch;
-extern DELPHI_PACKAGE TcuMemFree cuMemFree;
-extern DELPHI_PACKAGE TcuMemGetAddressRange cuMemGetAddressRange;
-extern DELPHI_PACKAGE TcuMemAllocHost cuMemAllocHost;
-extern DELPHI_PACKAGE TcuMemFreeHost cuMemFreeHost;
-extern DELPHI_PACKAGE TcuMemHostAlloc cuMemHostAlloc;
-extern DELPHI_PACKAGE TcuMemHostGetDevicePointer cuMemHostGetDevicePointer;
-extern DELPHI_PACKAGE TcuMemHostGetFlags cuMemHostGetFlags;
-extern DELPHI_PACKAGE TcuMemcpyHtoD cuMemcpyHtoD;
-extern DELPHI_PACKAGE TcuMemcpyDtoH cuMemcpyDtoH;
-extern DELPHI_PACKAGE TcuMemcpyDtoD cuMemcpyDtoD;
-extern DELPHI_PACKAGE TcuMemcpyDtoDAsync cuMemcpyDtoDAsync;
-extern DELPHI_PACKAGE TcuMemcpyDtoA cuMemcpyDtoA;
-extern DELPHI_PACKAGE TcuMemcpyAtoD cuMemcpyAtoD;
-extern DELPHI_PACKAGE TcuMemcpyHtoA cuMemcpyHtoA;
-extern DELPHI_PACKAGE TcuMemcpyAtoH cuMemcpyAtoH;
-extern DELPHI_PACKAGE TcuMemcpyAtoA cuMemcpyAtoA;
-extern DELPHI_PACKAGE TcuMemcpy2D cuMemcpy2D;
-extern DELPHI_PACKAGE TcuMemcpy2DUnaligned cuMemcpy2DUnaligned;
-extern DELPHI_PACKAGE TcuMemcpy3D cuMemcpy3D;
-extern DELPHI_PACKAGE TcuMemcpyHtoDAsync cuMemcpyHtoDAsync;
-extern DELPHI_PACKAGE TcuMemcpyDtoHAsync cuMemcpyDtoHAsync;
-extern DELPHI_PACKAGE TcuMemcpyHtoAAsync cuMemcpyHtoAAsync;
-extern DELPHI_PACKAGE TcuMemcpyAtoHAsync cuMemcpyAtoHAsync;
-extern DELPHI_PACKAGE TcuMemcpy2DAsync cuMemcpy2DAsync;
-extern DELPHI_PACKAGE TcuMemcpy3DAsync cuMemcpy3DAsync;
-extern DELPHI_PACKAGE TcuMemsetD8 cuMemsetD8;
-extern DELPHI_PACKAGE TcuMemsetD16 cuMemsetD16;
-extern DELPHI_PACKAGE TcuMemsetD32 cuMemsetD32;
-extern DELPHI_PACKAGE TcuMemsetD2D8 cuMemsetD2D8;
-extern DELPHI_PACKAGE TcuMemsetD2D16 cuMemsetD2D16;
-extern DELPHI_PACKAGE TcuMemsetD2D32 cuMemsetD2D32;
-extern DELPHI_PACKAGE TcuFuncSetBlockShape cuFuncSetBlockShape;
-extern DELPHI_PACKAGE TcuFuncSetSharedSize cuFuncSetSharedSize;
-extern DELPHI_PACKAGE TcuFuncGetAttribute cuFuncGetAttribute;
-extern DELPHI_PACKAGE TcuArrayCreate cuArrayCreate;
-extern DELPHI_PACKAGE TcuArrayGetDescriptor cuArrayGetDescriptor;
-extern DELPHI_PACKAGE TcuArrayDestroy cuArrayDestroy;
-extern DELPHI_PACKAGE TcuArray3DCreate cuArray3DCreate;
-extern DELPHI_PACKAGE TcuArray3DGetDescriptor cuArray3DGetDescriptor;
-extern DELPHI_PACKAGE TcuTexRefCreate cuTexRefCreate;
-extern DELPHI_PACKAGE TcuTexRefDestroy cuTexRefDestroy;
-extern DELPHI_PACKAGE TcuTexRefSetArray cuTexRefSetArray;
-extern DELPHI_PACKAGE TcuTexRefSetAddress cuTexRefSetAddress;
-extern DELPHI_PACKAGE TcuTexRefSetAddress2D cuTexRefSetAddress2D;
-extern DELPHI_PACKAGE TcuTexRefSetFormat cuTexRefSetFormat;
-extern DELPHI_PACKAGE TcuTexRefSetAddressMode cuTexRefSetAddressMode;
-extern DELPHI_PACKAGE TcuTexRefSetFilterMode cuTexRefSetFilterMode;
-extern DELPHI_PACKAGE TcuTexRefSetFlags cuTexRefSetFlags;
-extern DELPHI_PACKAGE TcuTexRefGetAddress cuTexRefGetAddress;
-extern DELPHI_PACKAGE TcuTexRefGetArray cuTexRefGetArray;
-extern DELPHI_PACKAGE TcuTexRefGetAddressMode cuTexRefGetAddressMode;
-extern DELPHI_PACKAGE TcuTexRefGetFilterMode cuTexRefGetFilterMode;
-extern DELPHI_PACKAGE TcuTexRefGetFormat cuTexRefGetFormat;
-extern DELPHI_PACKAGE TcuTexRefGetFlags cuTexRefGetFlags;
-extern DELPHI_PACKAGE TcuParamSetSize cuParamSetSize;
-extern DELPHI_PACKAGE TcuParamSeti cuParamSeti;
-extern DELPHI_PACKAGE TcuParamSetf cuParamSetf;
-extern DELPHI_PACKAGE TcuParamSetv cuParamSetv;
-extern DELPHI_PACKAGE TcuParamSetTexRef cuParamSetTexRef;
-extern DELPHI_PACKAGE TcuLaunch cuLaunch;
-extern DELPHI_PACKAGE TcuLaunchGrid cuLaunchGrid;
-extern DELPHI_PACKAGE TcuLaunchGridAsync cuLaunchGridAsync;
-extern DELPHI_PACKAGE TcuEventCreate cuEventCreate;
-extern DELPHI_PACKAGE TcuEventRecord cuEventRecord;
-extern DELPHI_PACKAGE TcuEventQuery cuEventQuery;
-extern DELPHI_PACKAGE TcuEventSynchronize cuEventSynchronize;
-extern DELPHI_PACKAGE TcuEventDestroy cuEventDestroy;
-extern DELPHI_PACKAGE TcuEventElapsedTime cuEventElapsedTime;
-extern DELPHI_PACKAGE TcuStreamCreate cuStreamCreate;
-extern DELPHI_PACKAGE TcuStreamQuery cuStreamQuery;
-extern DELPHI_PACKAGE TcuStreamSynchronize cuStreamSynchronize;
-extern DELPHI_PACKAGE TcuStreamDestroy cuStreamDestroy;
-extern DELPHI_PACKAGE TcuGLInit cuGLInit;
-extern DELPHI_PACKAGE TcuGLCtxCreate cuGLCtxCreate;
-extern DELPHI_PACKAGE TcuGraphicsGLRegisterBuffer cuGraphicsGLRegisterBuffer;
-extern DELPHI_PACKAGE TcuGraphicsGLRegisterImage cuGraphicsGLRegisterImage;
-extern DELPHI_PACKAGE TcuWGLGetDevice cuWGLGetDevice;
-extern DELPHI_PACKAGE TcuGraphicsUnregisterResource cuGraphicsUnregisterResource;
-extern DELPHI_PACKAGE TcuGraphicsSubResourceGetMappedArray cuGraphicsSubResourceGetMappedArray;
-extern DELPHI_PACKAGE TcuGraphicsResourceGetMappedPointer cuGraphicsResourceGetMappedPointer;
-extern DELPHI_PACKAGE TcuGraphicsResourceSetMapFlags cuGraphicsResourceSetMapFlags;
-extern DELPHI_PACKAGE TcuGraphicsMapResources cuGraphicsMapResources;
-extern DELPHI_PACKAGE TcuGraphicsUnmapResources cuGraphicsUnmapResources;
-extern DELPHI_PACKAGE TcuGLRegisterBufferObject cuGLRegisterBufferObject;
-extern DELPHI_PACKAGE TcuGLMapBufferObject cuGLMapBufferObject;
-extern DELPHI_PACKAGE TcuGLUnmapBufferObject cuGLUnmapBufferObject;
-extern DELPHI_PACKAGE TcuGLUnregisterBufferObject cuGLUnregisterBufferObject;
-extern DELPHI_PACKAGE TcuGLSetBufferObjectMapFlags cuGLSetBufferObjectMapFlags;
-extern DELPHI_PACKAGE TcuGLMapBufferObjectAsync cuGLMapBufferObjectAsync;
-extern DELPHI_PACKAGE TcuGLUnmapBufferObjectAsync cuGLUnmapBufferObjectAsync;
-extern DELPHI_PACKAGE bool __fastcall InitCUDA(void);
-extern DELPHI_PACKAGE void __fastcall CloseCUDA(void);
-extern DELPHI_PACKAGE bool __fastcall InitCUDAFromLibrary(const System::WideString LibName);
-extern DELPHI_PACKAGE bool __fastcall IsCUDAInitialized(void);
-extern DELPHI_PACKAGE System::UnicodeString __fastcall Get_CUDA_API_Error_String(TCUresult AError);
-}	/* namespace Import */
-}	/* namespace Cuda */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_CUDA_IMPORT)
-using namespace Cuda::Import;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_CUDA)
-using namespace Cuda;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// CUDA_ImportHPP

include/Win32/CUDA.ParallelPrimitives.hpp

@@ -1,79 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'CUDA.ParallelPrimitives.pas' rev: 36.00 (Windows)
-
-#ifndef CUDA_ParallelPrimitivesHPP
-#define CUDA_ParallelPrimitivesHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Cuda
-{
-namespace Parallelprimitives
-{
-//-- forward type declarations -----------------------------------------------
-struct TCUDPPConfiguration;
-//-- type declarations -------------------------------------------------------
-enum DECLSPEC_DENUM TCUDPPResult : unsigned char { CUDPP_SUCCESS, CUDPP_ERROR_INVALID_HANDLE, CUDPP_ERROR_ILLEGAL_CONFIGURATION, CUDPP_ERROR_UNKNOWN };
-
-enum DECLSPEC_DENUM TCUDPPOption : unsigned char { CUDPP_OPTION_FORWARD, CUDPP_OPTION_BACKWARD, CUDPP_OPTION_EXCLUSIVE, CUDPP_OPTION_INCLUSIVE, CUDPP_OPTION_CTA_LOCAL, CUDPP_OPTION_KEYS_ONLY, CUDPP_OPTION_KEY_VALUE_PAIRS };
-
-enum DECLSPEC_DENUM TCUDPPDatatype : unsigned char { CUDPP_CHAR, CUDPP_UCHAR, CUDPP_INT, CUDPP_UINT, CUDPP_FLOAT };
-
-enum DECLSPEC_DENUM TCUDPPOperator : unsigned char { CUDPP_ADD, CUDPP_MULTIPLY, CUDPP_MIN, CUDPP_MAX };
-
-enum DECLSPEC_DENUM TCUDPPAlgorithm : unsigned char { CUDPP_SCAN, CUDPP_SEGMENTED_SCAN, CUDPP_COMPACT, CUDPP_REDUCE, CUDPP_SORT_RADIX, CUDPP_SPMVMULT, CUDPP_RAND_MD5, CUDPP_ALGORITHM_INVALID };
-
-struct DECLSPEC_DRECORD TCUDPPConfiguration
-{
-public:
-	TCUDPPAlgorithm algorithm;
-	TCUDPPOperator op;
-	TCUDPPDatatype datatype;
-	TCUDPPOption options;
-};
-
-
-typedef System::NativeUInt TCUDPPHandle;
-
-//-- var, const, procedure ---------------------------------------------------
-#define CUDPPDLL L"cudpp32.dll"
-static _DELPHI_CONST unsigned CUDPP_INVALID_HANDLE = unsigned(0xc0dabad1);
-extern "C" TCUDPPResult __stdcall cudppPlan(TCUDPPHandle &planHandle, TCUDPPConfiguration config, System::NativeUInt n, System::NativeUInt rows, System::NativeUInt rowPitch);
-extern "C" TCUDPPResult __stdcall cudppDestroyPlan(TCUDPPHandle plan);
-extern "C" TCUDPPResult __stdcall cudppScan(TCUDPPHandle planHandle, void *d_out, System::NativeUInt &d_in, System::NativeUInt &numElements);
-extern "C" TCUDPPResult __stdcall cudppMultiScan(TCUDPPHandle planHandle, void *d_out, void *d_in, System::NativeUInt numElements, System::NativeUInt numRows);
-extern "C" TCUDPPResult __stdcall cudppSegmentedScan(TCUDPPHandle planHandle, void *d_out, void *d_idata, const System::PCardinal d_iflags, System::NativeUInt numElements);
-extern "C" TCUDPPResult __stdcall cudppCompact(TCUDPPHandle planHandle, void *d_out, System::NativeUInt &d_numValidElements, void *d_in, const System::PCardinal d_isValid, System::NativeUInt numElements);
-extern "C" TCUDPPResult __stdcall cudppSort(TCUDPPHandle planHandle, void *d_keys, void *d_values, int keybits, System::NativeUInt numElements);
-extern "C" TCUDPPResult __stdcall cudppSparseMatrix(TCUDPPHandle &sparseMatrixHandle, TCUDPPConfiguration config, System::NativeUInt n, System::NativeUInt rows, void *A, const System::PCardinal h_rowIndices, const System::PCardinal h_indices);
-extern "C" TCUDPPResult __stdcall cudppDestroySparseMatrix(TCUDPPHandle sparseMatrixHandle);
-extern "C" TCUDPPResult __stdcall cudppSparseMatrixVectorMultiply(TCUDPPHandle sparseMatrixHandle, void *d_y, void *d_x);
-extern "C" TCUDPPResult __stdcall cudppRand(TCUDPPHandle planHandle, void *d_out, System::NativeUInt numElements);
-extern "C" TCUDPPResult __stdcall cudppRandSeed(const TCUDPPHandle planHandle, unsigned seed);
-}	/* namespace Parallelprimitives */
-}	/* namespace Cuda */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_CUDA_PARALLELPRIMITIVES)
-using namespace Cuda::Parallelprimitives;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_CUDA)
-using namespace Cuda;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// CUDA_ParallelPrimitivesHPP

include/Win32/CUDA.Parser.hpp

@@ -1,136 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'CUDA.Parser.pas' rev: 36.00 (Windows)
-
-#ifndef CUDA_ParserHPP
-#define CUDA_ParserHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <System.Classes.hpp>
-#include <System.SysUtils.hpp>
-#include <CUDA.Runtime.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Cuda
-{
-namespace Parser
-{
-//-- forward type declarations -----------------------------------------------
-struct TCUDATexRefInfo;
-struct TCUDAFuncArgInfo;
-struct TCUDAFuncInfo;
-struct TCUDAConstantInfo;
-class DELPHICLASS TCUDAModuleInfo;
-//-- type declarations -------------------------------------------------------
-enum DECLSPEC_DENUM TCUDAType : unsigned char { customType, char1, uchar1, char2, uchar2, char3, uchar3, char4, uchar4, short1, ushort1, short2, ushort2, short3, ushort3, short4, ushort4, int1, uint1, int2, uint2, int3, uint3, int4, uint4, long1, ulong1, long2, ulong2, long3, ulong3, long4, ulong4, float1, float2, float3, float4, longlong1, ulonglong1, longlong2, ulonglong2, longlong3, ulonglong3, longlong4, ulonglong4, double1, double2, double3, double4, int8, int16, int32, uint8, uint16, uint32 };
-
-struct DECLSPEC_DRECORD TCUDATexRefInfo
-{
-public:
-	System::UnicodeString Name;
-	TCUDAType DataType;
-	System::Byte Dim;
-	Cuda::Runtime::TcudaTextureReadMode ReadMode;
-};
-
-
-struct DECLSPEC_DRECORD TCUDAFuncArgInfo
-{
-public:
-	System::UnicodeString Name;
-	TCUDAType DataType;
-	System::UnicodeString CustomType;
-	bool Ref;
-};
-
-
-struct DECLSPEC_DRECORD TCUDAFuncInfo
-{
-	
-private:
-	typedef System::DynamicArray<TCUDAFuncArgInfo> _TCUDAFuncInfo__1;
-	
-	
-public:
-	System::UnicodeString Name;
-	System::UnicodeString KernelName;
-	_TCUDAFuncInfo__1 Args;
-};
-
-
-struct DECLSPEC_DRECORD TCUDAConstantInfo
-{
-public:
-	System::UnicodeString Name;
-	TCUDAType DataType;
-	System::UnicodeString CustomType;
-	bool Ref;
-	bool DefValue;
-};
-
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TCUDAModuleInfo : public System::TObject
-{
-	typedef System::TObject inherited;
-	
-	
-private:
-	typedef System::DynamicArray<TCUDATexRefInfo> _TCUDAModuleInfo__1;
-	
-	typedef System::DynamicArray<TCUDAFuncInfo> _TCUDAModuleInfo__2;
-	
-	typedef System::DynamicArray<TCUDAConstantInfo> _TCUDAModuleInfo__3;
-	
-	
-private:
-	System::Classes::TStrings* ping;
-	System::Classes::TStrings* pong;
-	void __fastcall Reset();
-	void __fastcall BreakStrings(System::Classes::TStrings* inlist, System::Classes::TStrings* outlist);
-	void __fastcall RemoveComents(System::Classes::TStrings* inlist, System::Classes::TStrings* outlist);
-	void __fastcall RemoveSpaces(System::Classes::TStrings* inlist, System::Classes::TStrings* outlist);
-	void __fastcall ReplaceUnsigned(System::Classes::TStrings* inlist, System::Classes::TStrings* outlist);
-	void __fastcall FindTexRef(System::Classes::TStrings* inlist);
-	void __fastcall FindConst(System::Classes::TStrings* inlist);
-	void __fastcall FindFunc(System::Classes::TStrings* inlist);
-	void __fastcall FindFuncKernelName(System::Classes::TStrings* inlist);
-	
-public:
-	System::Classes::TComponent* Owner;
-	_TCUDAModuleInfo__1 TexRef;
-	_TCUDAModuleInfo__2 Func;
-	_TCUDAModuleInfo__3 Constant;
-	__fastcall TCUDAModuleInfo();
-	__fastcall virtual ~TCUDAModuleInfo();
-	void __fastcall ParseModule(System::Classes::TStrings* ASource, System::Classes::TStrings* AProduct);
-};
-
-#pragma pack(pop)
-
-//-- var, const, procedure ---------------------------------------------------
-}	/* namespace Parser */
-}	/* namespace Cuda */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_CUDA_PARSER)
-using namespace Cuda::Parser;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_CUDA)
-using namespace Cuda;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// CUDA_ParserHPP

include/Win32/CUDA.Runtime.hpp

@@ -1,375 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'CUDA.Runtime.pas' rev: 36.00 (Windows)
-
-#ifndef CUDA_RuntimeHPP
-#define CUDA_RuntimeHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <Winapi.Windows.hpp>
-#include <CUDA.Import.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Cuda
-{
-namespace Runtime
-{
-//-- forward type declarations -----------------------------------------------
-struct TCudaChannelFormatDesc;
-struct DECLSPEC_DRECORD TcudaArray
-{
-};
-
-
-struct TcudaPitchedPtr;
-struct TcudaExtent;
-struct TcudaPos;
-struct TcudaMemcpy3DParms;
-struct TCudaDeviceProp;
-struct TTextureReference;
-//-- type declarations -------------------------------------------------------
-typedef System::StaticArray<System::UnicodeString, 10> Cuda_Runtime__1;
-
-enum DECLSPEC_DENUM TcudaError : unsigned char { cudaSuccess, cudaErrorMissingConfiguration, cudaErrorMemoryAllocation, cudaErrorInitializationError, cudaErrorLaunchFailure, cudaErrorPriorLaunchFailure, cudaErrorLaunchTimeout, cudaErrorLaunchOutOfResources, cudaErrorInvalidDeviceFunction, cudaErrorInvalidConfiguration, cudaErrorInvalidDevice, cudaErrorInvalidValue, cudaErrorInvalidPitchValue, cudaErrorInvalidSymbol, cudaErrorMapBufferObjectFailed, cudaErrorUnmapBufferObjectFailed, cudaErrorInvalidHostPointer, cudaErrorInvalidDevicePointer, cudaErrorInvalidTexture, cudaErrorInvalidTextureBinding, cudaErrorInvalidChannelDescriptor, cudaErrorInvalidMemcpyDirection, cudaErrorAddressOfConstant, cudaErrorTextureFetchFailed, cudaErrorTextureNotBound, 
-	cudaErrorSynchronizationError, cudaErrorInvalidFilterSetting, cudaErrorInvalidNormSetting, cudaErrorMixedDeviceExecution, cudaErrorCudartUnloading, cudaErrorUnknown, cudaErrorNotYetImplemented, cudaErrorMemoryValueTooLarge, cudaErrorInvalidResourceHandle, cudaErrorNotReady, cudaErrorStartupFailure, cudaErrorApiFailureBase };
-
-enum DECLSPEC_DENUM TCudaChannelFormatKind : unsigned char { cudaChannelFormatKindSigned, cudaChannelFormatKindUnsigned, cudaChannelFormatKindFloat };
-
-enum DECLSPEC_DENUM TCudaGLMapFlags : unsigned char { cudaGLMapFlagsNone, cudaGLMapFlagsReadOnly, cudaGLMapFlagsWriteDiscard };
-
-typedef TCudaChannelFormatDesc *PcudaChannelFormatDesc;
-
-struct DECLSPEC_DRECORD TCudaChannelFormatDesc
-{
-public:
-	int x;
-	int y;
-	int z;
-	int w;
-	TCudaChannelFormatKind f;
-};
-
-
-enum DECLSPEC_DENUM TcudaMemcpyKind : unsigned char { cudaMemcpyHostToHost, cudaMemcpyHostToDevice, cudaMemcpyDeviceToHost, cudaMemcpyDeviceToDevice };
-
-struct DECLSPEC_DRECORD TcudaPitchedPtr
-{
-public:
-	void *ptr;
-	System::NativeUInt pitch;
-	System::NativeUInt xsize;
-	System::NativeUInt ysize;
-};
-
-
-struct DECLSPEC_DRECORD TcudaExtent
-{
-public:
-	System::NativeUInt width;
-	System::NativeUInt height;
-	System::NativeUInt depth;
-};
-
-
-struct DECLSPEC_DRECORD TcudaPos
-{
-public:
-	System::NativeUInt x;
-	System::NativeUInt y;
-	System::NativeUInt z;
-};
-
-
-struct DECLSPEC_DRECORD TcudaMemcpy3DParms
-{
-public:
-	void *srcArray;
-	TcudaPos srcPos;
-	TcudaPitchedPtr srcPtr;
-	void *dstArray;
-	TcudaPos dstPos;
-	TcudaPitchedPtr dstPtr;
-	TcudaExtent extent;
-	TcudaMemcpyKind kind;
-};
-
-
-typedef TCudaDeviceProp *PCudaDeviceProp;
-
-struct DECLSPEC_DRECORD TCudaDeviceProp
-{
-public:
-	System::StaticArray<char, 256> name;
-	System::NativeUInt totalGlobalMem;
-	System::NativeUInt sharedMemPerBlock;
-	int regsPerBlock;
-	int warpSize;
-	System::NativeUInt memPitch;
-	int maxThreadsPerBlock;
-	System::StaticArray<int, 3> maxThreadsDim;
-	System::StaticArray<int, 3> maxGridSize;
-	int clockRate;
-	System::NativeUInt totalConstMem;
-	int major;
-	int minor;
-	System::NativeUInt textureAlignment;
-	int deviceOverlap;
-	int multiProcessorCount;
-	int kernelExecTimeoutEnabled;
-	int egrated;
-	int canMapHostMemory;
-	int computeMode;
-	int maxTexture1D;
-	System::StaticArray<int, 2> maxTexture2D;
-	System::StaticArray<int, 3> maxTexture3D;
-	System::StaticArray<int, 3> maxTexture2DArray;
-	System::NativeUInt surfaceAlignment;
-	int concurrentKernels;
-	int ECCEnabled;
-	int pciBusID;
-	int pciDeviceID;
-	int tccDriver;
-	System::StaticArray<int, 21> __cudaReserved;
-};
-
-
-enum DECLSPEC_DENUM TcudaTextureAddressMode : unsigned char { cudaAddressModeWrap, cudaAddressModeClamp, cudaAddressModeMirror };
-
-enum DECLSPEC_DENUM TcudaTextureFilterMode : unsigned char { cudaFilterModePoint, cudaFilterModeLinear };
-
-enum DECLSPEC_DENUM TcudaTextureReadMode : unsigned char { cudaReadModeElementType, cudaReadModeNormalizedFloat };
-
-typedef TTextureReference *PTextureReference;
-
-struct DECLSPEC_DRECORD TTextureReference
-{
-public:
-	int normalized;
-	TcudaTextureFilterMode filterMode;
-	System::StaticArray<TcudaTextureAddressMode, 3> addressMode;
-	TCudaChannelFormatDesc channelDesc;
-	System::StaticArray<int, 16> __cudaReserved;
-};
-
-
-typedef TcudaArray *PcudaArray;
-
-typedef TcudaError cudaError_t;
-
-typedef int cudaStream_t;
-
-typedef int cudaEvent_t;
-
-//-- var, const, procedure ---------------------------------------------------
-extern DELPHI_PACKAGE Cuda_Runtime__1 CUDARTDLLNAMES;
-extern DELPHI_PACKAGE float CUDART_INF_F;
-extern DELPHI_PACKAGE float CUDART_NAN_F;
-extern DELPHI_PACKAGE float CUDART_MIN_DENORM_F;
-extern DELPHI_PACKAGE float CUDART_MAX_NORMAL_F;
-extern DELPHI_PACKAGE float CUDART_NEG_ZERO_F;
-#define CUDART_ZERO_F  (0.000000E+00)
-#define CUDART_ONE_F  (1.000000E+00)
-static const System::Extended CUDART_SQRT_HALF_F = 7.071068E-01;
-static const System::Extended CUDART_SQRT_TWO_F = 1.414214E+00;
-static const System::Extended CUDART_THIRD_F = 3.333333E-01;
-static const System::Extended CUDART_PIO4_F = 7.853982E-01;
-static const System::Extended CUDART_PIO2_F = 1.570796E+00;
-static const System::Extended CUDART_3PIO4_F = 2.356194E+00;
-static const System::Extended CUDART_2_OVER_PI_F = 6.366198E-01;
-static const System::Extended CUDART_PI_F = 3.141593E+00;
-static const System::Extended CUDART_L2E_F = 1.442695E+00;
-static const System::Extended CUDART_L2T_F = 3.321928E+00;
-static const System::Extended CUDART_LG2_F = 3.010300E-01;
-static const System::Extended CUDART_LGE_F = 4.342945E-01;
-static const System::Extended CUDART_LN2_F = 6.931472E-01;
-static const System::Extended CUDART_LNT_F = 2.302585E+00;
-static const System::Extended CUDART_LNPI_F = 1.144730E+00;
-static const System::Extended CUDART_TWO_TO_M126_F = 1.175494E-38;
-static const System::Extended CUDART_TWO_TO_126_F = 8.507059E+37;
-static const System::Extended CUDART_NORM_HUGE_F = 3.402823E+38;
-#define CUDART_TWO_TO_23_F  (8.388608E+06)
-#define CUDART_TWO_TO_24_F  (1.677722E+07)
-#define CUDART_TWO_TO_31_F  (2.147484E+09)
-#define CUDART_TWO_TO_32_F  (4.294967E+09)
-static _DELPHI_CONST System::Int8 CUDART_REMQUO_BITS_F = System::Int8(0x3);
-static _DELPHI_CONST System::Int8 CUDART_REMQUO_MASK_F = System::Int8(0x3);
-#define CUDART_TRIG_PLOSS_F  (4.803900E+04)
-extern DELPHI_PACKAGE double CUDART_INF;
-extern DELPHI_PACKAGE double CUDART_NAN;
-extern DELPHI_PACKAGE double CUDART_NEG_ZERO;
-extern DELPHI_PACKAGE double CUDART_MIN_DENORM;
-#define CUDART_ZERO  (0.000000E+00)
-#define CUDART_ONE  (1.000000E+00)
-static const System::Extended CUDART_SQRT_TWO = 1.414214E+00;
-static const System::Extended CUDART_SQRT_HALF = 7.071068E-01;
-static const System::Extended CUDART_THIRD = 3.333333E-01;
-static const System::Extended CUDART_TWOTHIRD = 6.666667E-01;
-static const System::Extended CUDART_PIO4 = 7.853982E-01;
-static const System::Extended CUDART_PIO4_HI = 7.853982E-01;
-static const System::Extended CUDART_PIO4_LO = 3.061617E-17;
-static const System::Extended CUDART_PIO2 = 1.570796E+00;
-static const System::Extended CUDART_PIO2_HI = 1.570796E+00;
-static const System::Extended CUDART_PIO2_LO = 6.123234E-17;
-static const System::Extended CUDART_3PIO4 = 2.356194E+00;
-static const System::Extended CUDART_2_OVER_PI = 6.366198E-01;
-static const System::Extended CUDART_PI = 3.141593E+00;
-static const System::Extended CUDART_PI_HI = 3.141593E+00;
-static const System::Extended CUDART_PI_LO = 1.224647E-16;
-static const System::Extended CUDART_SQRT_2PI_HI = 2.506628E+00;
-static const System::Extended CUDART_SQRT_2PI_LO = -1.832858E-16;
-static const System::Extended CUDART_SQRT_PIO2_HI = 1.253314E+00;
-static const System::Extended CUDART_SQRT_PIO2_LO = -9.164290E-17;
-static const System::Extended CUDART_L2E = 1.442695E+00;
-static const System::Extended CUDART_L2E_HI = 1.442695E+00;
-static const System::Extended CUDART_L2E_LO = 2.035527E-17;
-static const System::Extended CUDART_L2T = 3.321928E+00;
-static const System::Extended CUDART_LG2 = 3.010300E-01;
-static const System::Extended CUDART_LG2_HI = 3.010300E-01;
-static const System::Extended CUDART_LG2_LO = -2.803728E-18;
-static const System::Extended CUDART_LGE = 4.342945E-01;
-static const System::Extended CUDART_LGE_HI = 4.342945E-01;
-static const System::Extended CUDART_LGE_LO = 1.098320E-17;
-static const System::Extended CUDART_LN2 = 6.931472E-01;
-static const System::Extended CUDART_LN2_HI = 6.931472E-01;
-static const System::Extended CUDART_LN2_LO = 2.319047E-17;
-static const System::Extended CUDART_LNT = 2.302585E+00;
-static const System::Extended CUDART_LNT_HI = 2.302585E+00;
-static const System::Extended CUDART_LNT_LO = -2.170756E-16;
-static const System::Extended CUDART_LNPI = 1.144730E+00;
-static const System::Extended CUDART_LN2_X_1024 = 7.097827E+02;
-static const System::Extended CUDART_LN2_X_1025 = 7.104759E+02;
-static const System::Extended CUDART_LN2_X_1075 = 7.451332E+02;
-static const System::Extended CUDART_LG2_X_1024 = 3.082547E+02;
-static const System::Extended CUDART_LG2_X_1075 = 3.236072E+02;
-#define CUDART_TWO_TO_23  (8.388608E+06)
-static const System::Extended CUDART_TWO_TO_52 = 4.503600E+15;
-static const System::Extended CUDART_TWO_TO_54 = 1.801440E+16;
-static const System::Extended CUDART_TWO_TO_M54 = 5.551115E-17;
-static const System::Extended CUDART_TWO_TO_M1022 = 2.225074E-308;
-#define CUDART_TRIG_PLOSS  (2.147484E+09)
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaBindTexture)(System::NativeUInt &offset, const PTextureReference texref, void * &devPtr, TCudaChannelFormatDesc &desc, System::NativeUInt size);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaBindTexture2D)(System::NativeUInt &offset, const PTextureReference texref, const void * devPtr, TCudaChannelFormatDesc &desc, System::NativeUInt width, System::NativeUInt height, System::NativeUInt pitch);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaBindTextureToArray)(const PTextureReference texref, const PcudaArray cudaArray);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaUnbindTexture)(const PTextureReference texref);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaGetTextureAlignmentOffset)(System::NativeUInt offset, const PTextureReference texref);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaGetTextureReference)(const PTextureReference texref, const char * symbol);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaGetChannelDesc)(TCudaChannelFormatDesc &desc, const void * array_);
-extern DELPHI_PACKAGE TCudaChannelFormatDesc __stdcall (*cudaCreateChannelDesc)(int x, int y, int z, int w, TCudaChannelFormatKind f);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaMalloc3D)(TcudaPitchedPtr &pitchedDevPtr, TcudaExtent extent);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaMalloc3DArray)(PcudaArray &arrayPtr, const TCudaChannelFormatDesc &desc, TcudaExtent extent, unsigned flags);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaMemset3D)(TcudaPitchedPtr pitchedDevPtr, int value, TcudaExtent extent);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaMemcpy3D)(const TcudaMemcpy3DParms &p);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaMemcpy3DAsync)(const TcudaMemcpy3DParms &p, cudaStream_t stream);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaMalloc)(void *devPtr, System::NativeUInt size);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaMallocHost)(void * &ptr, System::NativeUInt size);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaMallocPitch)(void *devPtr, System::NativeUInt &pitch, System::NativeUInt width, System::NativeUInt height);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaMallocArray)(void * &aarray, TCudaChannelFormatDesc &desc, System::NativeUInt width, System::NativeUInt height);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaFree)(void * devPtr);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaFreeHost)(void * ptr);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaFreeArray)(const void * aarray);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaHostAlloc)(void * &pHost, System::NativeUInt bytes, unsigned flags);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaHostGetDevicePointer)(void * &pDevice, void * pHost, unsigned flags);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaHostGetFlags)(unsigned &pFlags, void * pHost);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaMemGetInfo)(System::NativeUInt &free, System::NativeUInt &total);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaMemcpy)(void * dst, void * src, System::NativeUInt count, TcudaMemcpyKind kind);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaMemcpyToArray)(PcudaArray &dst, System::NativeUInt wOffset, System::NativeUInt hOffset, void *src, System::NativeUInt count, TcudaMemcpyKind kind);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaMemcpyFromArray)(void *dst, const PcudaArray src, System::NativeUInt wOffset, System::NativeUInt hOffset, System::NativeUInt count, TcudaMemcpyKind kind);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaMemcpyArrayToArray)(PcudaArray dst, System::NativeUInt wOffsetDst, System::NativeUInt hOffsetDst, const PcudaArray src, System::NativeUInt wOffsetSrc, System::NativeUInt hOffsetSrc, System::NativeUInt count, const TcudaMemcpyKind kind/* = (TcudaMemcpyKind)(0x3)*/);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaMemcpy2D)(void *dst, System::NativeUInt dpitch, void *src, System::NativeUInt spitch, System::NativeUInt width, System::NativeUInt height, TcudaMemcpyKind kind);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaMemcpy2DToArray)(PcudaArray dst, System::NativeUInt wOffset, System::NativeUInt hOffset, void *src, System::NativeUInt spitch, System::NativeUInt width, System::NativeUInt height, TcudaMemcpyKind kind);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaMemcpy2DFromArray)(void *dst, System::NativeUInt dpitch, PcudaArray src, System::NativeUInt wOffset, System::NativeUInt hOffset, System::NativeUInt width, System::NativeUInt height, TcudaMemcpyKind kind);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaMemcpy2DArrayToArray)(PcudaArray dst, System::NativeUInt wOffsetDst, System::NativeUInt hOffsetDst, PcudaArray src, System::NativeUInt wOffsetSrc, System::NativeUInt hOffsetSrc, System::NativeUInt width, System::NativeUInt height, const TcudaMemcpyKind kind/* = (TcudaMemcpyKind)(0x3)*/);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaMemcpyToSymbol)(char * symbol, void *src, System::NativeUInt count, const System::NativeUInt offset/* = (unsigned)(0x0)*/, const TcudaMemcpyKind kind/* = (TcudaMemcpyKind)(0x1)*/);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaMemcpyFromSymbol)(void *dst, char * symbol, System::NativeUInt count, const System::NativeUInt offset/* = (unsigned)(0x0)*/, const TcudaMemcpyKind kind/* = (TcudaMemcpyKind)(0x2)*/);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaMemcpyAsync)(void *dst, const void *src, System::NativeUInt count, TcudaMemcpyKind kind, cudaStream_t stream);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaMemcpyToArrayAsync)(PcudaArray dst, System::NativeUInt wOffset, System::NativeUInt hOffset, const void *src, System::NativeUInt count, TcudaMemcpyKind kind, cudaStream_t stream);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaMemcpyFromArrayAsync)(void *dst, const PcudaArray src, System::NativeUInt wOffset, System::NativeUInt hOffset, System::NativeUInt count, TcudaMemcpyKind kind, cudaStream_t stream);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaMemcpy2DAsync)(void *dst, System::NativeUInt dpitch, const void *src, System::NativeUInt spitch, System::NativeUInt width, System::NativeUInt height, TcudaMemcpyKind kind, cudaStream_t stream);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaMemcpy2DToArrayAsync)(PcudaArray dst, System::NativeUInt wOffset, System::NativeUInt hOffset, const void *src, System::NativeUInt spitch, System::NativeUInt width, System::NativeUInt height, TcudaMemcpyKind kind, cudaStream_t stream);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaMemcpy2DFromArrayAsync)(void *dst, System::NativeUInt dpitch, const PcudaArray src, System::NativeUInt wOffset, System::NativeUInt hOffset, System::NativeUInt width, System::NativeUInt height, TcudaMemcpyKind kind, cudaStream_t stream);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaMemcpyToSymbolAsync)(const char * symbol, const void *src, System::NativeUInt count, System::NativeUInt offset, TcudaMemcpyKind kind, cudaStream_t stream);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaMemcpyFromSymbolAsync)(void *dst, const char * symbol, System::NativeUInt count, System::NativeUInt offset, TcudaMemcpyKind kind, cudaStream_t stream);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaMemset)(void *devPtr, int value, System::NativeUInt count);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaMemset2D)(void *devPtr, System::NativeUInt pitch, int value, System::NativeUInt width, System::NativeUInt height);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaGetSymbolAddress)(void * &devPtr, const char * symbol);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaGetSymbolSize)(System::NativeUInt &size, const char * symbol);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaGetDeviceCount)(int &count);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaGetDeviceProperties)(TCudaDeviceProp &prop, int device);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaChooseDevice)(int &device, const PCudaDeviceProp prop);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaSetDevice)(int device);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaGetDevice)(int &device);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaSetDeviceFlags)(int flags);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaSetValidDevices)(System::PInteger device_arr, int len);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaConfigureCall)(const Cuda::Import::TDim3 &gridDim, const Cuda::Import::TDim3 &blockDim, System::NativeUInt sharedMem, cudaStream_t stream);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaSetupArgument)(const void * arg, System::NativeUInt size, System::NativeUInt offset);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaFuncSetCacheConfig)(const char * func, Cuda::Import::TcudaFuncCache cacheConfig);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaLaunch)(const char * entry);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaFuncGetAttributes)(Cuda::Import::TcudaFuncAttributes &attr, const char * func);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaGetLastError)(void);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaGLSetGLDevice)(int device);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaGLRegisterBufferObject)(unsigned bufObj);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaGraphicsGLRegisterImage)(const Cuda::Import::PCUgraphicsResource resource, unsigned image, unsigned target, unsigned flags);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaGraphicsGLRegisterBuffer)(const Cuda::Import::PCUgraphicsResource resource, unsigned buffer, unsigned flags);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaGLMapBufferObject)(void * devPtr, unsigned bufObj);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaGLUnmapBufferObject)(unsigned bufObj);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaGLUnregisterBufferObject)(unsigned bufObj);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaGLSetBufferObjectMapFlags)(unsigned bufObj, TCudaGLMapFlags flags);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaGLMapBufferObjectAsync)(void * &devPtr, unsigned bufObj, cudaStream_t stream);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaGLUnmapBufferObjectAsync)(unsigned bufObj, cudaStream_t stream);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaGraphicsUnregisterResource)(Cuda::Import::PCUgraphicsResource resource);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaGraphicsResourceSetMapFlags)(Cuda::Import::PCUgraphicsResource resource, unsigned flags);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaGraphicsMapResources)(int count, const Cuda::Import::PCUgraphicsResource resources, cudaStream_t stream);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaGraphicsUnmapResources)(int count, const Cuda::Import::PCUgraphicsResource resources, cudaStream_t stream);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaGraphicsResourceGetMappedPointer)(Cuda::Import::TCUdeviceptr &pDevPtr, unsigned &pSize, Cuda::Import::PCUgraphicsResource resource);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaGraphicsSubResourceGetMappedArray)(Cuda::Import::PCUarray &pArray, Cuda::Import::PCUgraphicsResource resource, unsigned arrayIndex, unsigned mipLevel);
-extern DELPHI_PACKAGE char * __stdcall (*cudaGetErrorString)(cudaError_t error);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaDriverGetVersion)(/* out */ int &driverVersion);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaRuntimeGetVersion)(/* out */ int &runtimeVersion);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaSetDoubleForDevice)(double &d);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaSetDoubleForHost)(double &d);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaStreamCreate)(cudaStream_t &pStream);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaStreamDestroy)(cudaStream_t stream);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaStreamSynchronize)(cudaStream_t stream);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaStreamQuery)(cudaStream_t stream);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaEventCreate)(cudaEvent_t &event);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaEventCreateWithFlags)(cudaEvent_t &event, int flags);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaEventRecord)(cudaEvent_t event, cudaStream_t stream);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaEventQuery)(cudaEvent_t event);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaEventSynchronize)(cudaEvent_t event);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaEventDestroy)(cudaEvent_t event);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaEventElapsedTime)(float &ms, cudaEvent_t start, cudaEvent_t ending);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaWGLGetDevice)(int &device, Cuda::Import::HGPUNV hGpu);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaThreadExit)(void);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaThreadSynchronize)(void);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaThreadSetLimit)(Cuda::Import::TcudaLimit limit, System::NativeUInt value);
-extern DELPHI_PACKAGE TcudaError __stdcall (*cudaThreadGetLimit)(System::NativeUInt &value, Cuda::Import::TcudaLimit limit);
-extern DELPHI_PACKAGE System::UnicodeString __fastcall cudaGetLastErrorString(void);
-extern DELPHI_PACKAGE bool __fastcall InitCUDART(void);
-extern DELPHI_PACKAGE void __fastcall CloseCUDART(void);
-extern DELPHI_PACKAGE bool __fastcall InitCUDARTFromLibrary(const System::WideString LibName);
-extern DELPHI_PACKAGE bool __fastcall IsCUDARTInitialized(void);
-}	/* namespace Runtime */
-}	/* namespace Cuda */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_CUDA_RUNTIME)
-using namespace Cuda::Runtime;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_CUDA)
-using namespace Cuda;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// CUDA_RuntimeHPP

include/Win32/CUDA.Utility.hpp

@@ -1,78 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'CUDA.Utility.pas' rev: 36.00 (Windows)
-
-#ifndef CUDA_UtilityHPP
-#define CUDA_UtilityHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <Winapi.Windows.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Cuda
-{
-namespace Utility
-{
-//-- forward type declarations -----------------------------------------------
-//-- type declarations -------------------------------------------------------
-//-- var, const, procedure ---------------------------------------------------
-#define CUTILDLL L"cutil32.dll"
-extern DELPHI_PACKAGE char * __stdcall (*cutFindFilePath)(const char * filename, const char * executablePath);
-extern DELPHI_PACKAGE bool __stdcall (*cutLoadPGMf)(const char * filename, System::PSingle &data, int &w, int &h);
-extern DELPHI_PACKAGE bool __stdcall (*cutSavePGMf)(const char * filename, System::PSingle data, int w, int h);
-extern DELPHI_PACKAGE bool __stdcall (*cutLoadPGMub)(const char * filename, Winapi::Windows::PByte &data, int &w, int &h);
-extern DELPHI_PACKAGE bool __stdcall (*cutLoadPPMub)(const char * filename, Winapi::Windows::PByte &data, int &w, int &h);
-extern DELPHI_PACKAGE bool __stdcall (*cutLoadPPM4ub)(const char * filename, Winapi::Windows::PByte &data, int &w, int &h);
-extern DELPHI_PACKAGE bool __stdcall (*cutLoadPGMi)(const char * filename, System::PInteger &data, int &w, int &h);
-extern DELPHI_PACKAGE bool __stdcall (*cutLoadPGMs)(const char * filename, PWORD &data, int &w, int &h);
-extern DELPHI_PACKAGE bool __stdcall (*cutSavePGMub)(const char * filename, Winapi::Windows::PByte data, int w, int h);
-extern DELPHI_PACKAGE bool __stdcall (*cutSavePPMub)(const char * filename, Winapi::Windows::PByte data, int w, int h);
-extern DELPHI_PACKAGE bool __stdcall (*cutSavePPM4ub)(const char * filename, Winapi::Windows::PByte data, int w, int h);
-extern DELPHI_PACKAGE bool __stdcall (*cutSavePGMi)(const char * filename, System::PInteger data, int w, int h);
-extern DELPHI_PACKAGE bool __stdcall (*cutSavePGMs)(const char * filename, PWORD data, int w, int h);
-extern DELPHI_PACKAGE bool __stdcall (*cutComparef)(const Winapi::Windows::PSingle reference, const Winapi::Windows::PSingle data, const unsigned len);
-extern DELPHI_PACKAGE bool __stdcall (*cutComparei)(const System::PInteger reference, const System::PInteger data, const unsigned len);
-extern DELPHI_PACKAGE bool __stdcall (*cutCompareuit)(const System::PInteger reference, const System::PInteger data, const unsigned len, const float epsilon, const float threshold);
-extern DELPHI_PACKAGE bool __stdcall (*cutCompareub)(const Winapi::Windows::PByte reference, const Winapi::Windows::PByte data, const unsigned len);
-extern DELPHI_PACKAGE bool __stdcall (*cutCompareubt)(const Winapi::Windows::PByte reference, const Winapi::Windows::PByte data, const unsigned len, const float epsilon, const float threshold);
-extern DELPHI_PACKAGE bool __stdcall (*cutCompareube)(const Winapi::Windows::PByte reference, const Winapi::Windows::PByte data, const unsigned len, const float epsilon);
-extern DELPHI_PACKAGE bool __stdcall (*cutComparefe)(const Winapi::Windows::PSingle reference, const Winapi::Windows::PSingle data, const unsigned len, const float epsilon);
-extern DELPHI_PACKAGE bool __stdcall (*cutComparefet)(const Winapi::Windows::PSingle reference, const Winapi::Windows::PSingle data, const unsigned len, const float epsilon, const float threshold);
-extern DELPHI_PACKAGE bool __stdcall (*cutCompareL2fe)(const Winapi::Windows::PSingle reference, const Winapi::Windows::PSingle data, const unsigned len, const float epsilon);
-extern DELPHI_PACKAGE bool __stdcall (*cutCreateTimer)(unsigned &name);
-extern DELPHI_PACKAGE bool __stdcall (*cutStartTimer)(const unsigned name);
-extern DELPHI_PACKAGE bool __stdcall (*cutStopTimer)(const unsigned name);
-extern DELPHI_PACKAGE bool __stdcall (*cutResetTimer)(const unsigned name);
-extern DELPHI_PACKAGE bool __stdcall (*cutDeleteTimer)(const unsigned name);
-extern DELPHI_PACKAGE float __stdcall (*cutGetTimerValue)(const unsigned name);
-extern DELPHI_PACKAGE float __stdcall (*cutGetAverageTimerValue)(const unsigned name);
-extern DELPHI_PACKAGE void __stdcall (*cutFree)(void * ptr);
-extern DELPHI_PACKAGE bool __fastcall InitCUTIL(void);
-extern DELPHI_PACKAGE void __fastcall CloseCUTIL(void);
-extern DELPHI_PACKAGE bool __fastcall InitCUTILFromLibrary(const System::WideString LibName);
-extern DELPHI_PACKAGE bool __fastcall IsCUTILInitialized(void);
-}	/* namespace Utility */
-}	/* namespace Cuda */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_CUDA_UTILITY)
-using namespace Cuda::Utility;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_CUDA)
-using namespace Cuda;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// CUDA_UtilityHPP

include/Win32/Cg.GL.hpp

@@ -1,136 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'Cg.GL.pas' rev: 36.00 (Windows)
-
-#ifndef Cg_GLHPP
-#define Cg_GLHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <Winapi.Windows.hpp>
-#include <Cg.Import.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Cg
-{
-namespace Gl
-{
-//-- forward type declarations -----------------------------------------------
-//-- type declarations -------------------------------------------------------
-typedef unsigned TCGGLenum;
-
-typedef TCGGLenum CGGLenum;
-
-//-- var, const, procedure ---------------------------------------------------
-#define CgGLlibrary L"cgGL.dll"
-static _DELPHI_CONST System::Int8 CG_GL_MATRIX_IDENTITY = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 CG_GL_MATRIX_TRANSPOSE = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 CG_GL_MATRIX_INVERSE = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 CG_GL_MATRIX_INVERSE_TRANSPOSE = System::Int8(0x3);
-static _DELPHI_CONST System::Int8 CG_GL_MODELVIEW_MATRIX = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 CG_GL_PROJECTION_MATRIX = System::Int8(0x5);
-static _DELPHI_CONST System::Int8 CG_GL_TEXTURE_MATRIX = System::Int8(0x6);
-static _DELPHI_CONST System::Int8 CG_GL_MODELVIEW_PROJECTION_MATRIX = System::Int8(0x7);
-static _DELPHI_CONST System::Int8 CG_GL_VERTEX = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 CG_GL_FRAGMENT = System::Int8(0x9);
-extern "C" Cg::Import::TCGbool __cdecl cgGLIsProfileSupported(Cg::Import::TCGprofile profile);
-extern "C" void __cdecl cgGLEnableProfile(Cg::Import::TCGprofile profile);
-extern "C" void __cdecl cgGLDisableProfile(Cg::Import::TCGprofile profile);
-extern "C" Cg::Import::TCGprofile __cdecl cgGLGetLatestProfile(TCGGLenum profile_type);
-extern "C" void __cdecl cgGLSetOptimalOptions(Cg::Import::TCGprofile profile);
-extern "C" void __cdecl cgGLLoadProgram(Cg::Import::PCGprogram _program);
-extern "C" Cg::Import::TCGbool __cdecl cgGLIsProgramLoaded(Cg::Import::PCGprogram _program);
-extern "C" void __cdecl cgGLBindProgram(Cg::Import::PCGprogram _program);
-extern "C" void __cdecl cgGLUnbindProgram(Cg::Import::TCGprofile profile);
-extern "C" unsigned __cdecl cgGLGetProgramID(Cg::Import::PCGprogram _program);
-extern "C" void __cdecl cgGLSetParameter1f(Cg::Import::PCGparameter param, float x);
-extern "C" void __cdecl cgGLSetParameter2f(Cg::Import::PCGparameter param, float x, float y);
-extern "C" void __cdecl cgGLSetParameter3f(Cg::Import::PCGparameter param, float x, float y, float z);
-extern "C" void __cdecl cgGLSetParameter4f(Cg::Import::PCGparameter param, float x, float y, float z, float w);
-extern "C" void __cdecl cgGLSetParameter1fv(Cg::Import::PCGparameter param, const Winapi::Windows::PSingle v);
-extern "C" void __cdecl cgGLSetParameter2fv(Cg::Import::PCGparameter param, const Winapi::Windows::PSingle v);
-extern "C" void __cdecl cgGLSetParameter3fv(Cg::Import::PCGparameter param, const Winapi::Windows::PSingle v);
-extern "C" void __cdecl cgGLSetParameter4fv(Cg::Import::PCGparameter param, const Winapi::Windows::PSingle v);
-extern "C" void __cdecl cgGLSetParameter1d(Cg::Import::PCGparameter param, double x);
-extern "C" void __cdecl cgGLSetParameter2d(Cg::Import::PCGparameter param, double x, double y);
-extern "C" void __cdecl cgGLSetParameter3d(Cg::Import::PCGparameter param, double x, double y, double z);
-extern "C" void __cdecl cgGLSetParameter4d(Cg::Import::PCGparameter param, double x, double y, double z, double w);
-extern "C" void __cdecl cgGLSetParameter1dv(Cg::Import::PCGparameter param, const System::PDouble v);
-extern "C" void __cdecl cgGLSetParameter2dv(Cg::Import::PCGparameter param, const System::PDouble v);
-extern "C" void __cdecl cgGLSetParameter3dv(Cg::Import::PCGparameter param, const System::PDouble v);
-extern "C" void __cdecl cgGLSetParameter4dv(Cg::Import::PCGparameter param, const System::PDouble v);
-extern "C" void __cdecl cgGLGetParameter1f(Cg::Import::PCGparameter param, Winapi::Windows::PSingle v);
-extern "C" void __cdecl cgGLGetParameter2f(Cg::Import::PCGparameter param, Winapi::Windows::PSingle v);
-extern "C" void __cdecl cgGLGetParameter3f(Cg::Import::PCGparameter param, Winapi::Windows::PSingle v);
-extern "C" void __cdecl cgGLGetParameter4f(Cg::Import::PCGparameter param, Winapi::Windows::PSingle v);
-extern "C" void __cdecl cgGLGetParameter1d(Cg::Import::PCGparameter param, System::PDouble v);
-extern "C" void __cdecl cgGLGetParameter2d(Cg::Import::PCGparameter param, System::PDouble v);
-extern "C" void __cdecl cgGLGetParameter3d(Cg::Import::PCGparameter param, System::PDouble v);
-extern "C" void __cdecl cgGLGetParameter4d(Cg::Import::PCGparameter param, System::PDouble v);
-extern "C" void __cdecl cgGLSetParameterArray1f(Cg::Import::PCGparameter param, System::LongInt offset, System::LongInt nelements, const Winapi::Windows::PSingle v);
-extern "C" void __cdecl cgGLSetParameterArray2f(Cg::Import::PCGparameter param, System::LongInt offset, System::LongInt nelements, const Winapi::Windows::PSingle v);
-extern "C" void __cdecl cgGLSetParameterArray3f(Cg::Import::PCGparameter param, System::LongInt offset, System::LongInt nelements, const Winapi::Windows::PSingle v);
-extern "C" void __cdecl cgGLSetParameterArray4f(Cg::Import::PCGparameter param, System::LongInt offset, System::LongInt nelements, const Winapi::Windows::PSingle v);
-extern "C" void __cdecl cgGLSetParameterArray1d(Cg::Import::PCGparameter param, System::LongInt offset, System::LongInt nelements, const System::PDouble v);
-extern "C" void __cdecl cgGLSetParameterArray2d(Cg::Import::PCGparameter param, System::LongInt offset, System::LongInt nelements, const System::PDouble v);
-extern "C" void __cdecl cgGLSetParameterArray3d(Cg::Import::PCGparameter param, System::LongInt offset, System::LongInt nelements, const System::PDouble v);
-extern "C" void __cdecl cgGLSetParameterArray4d(Cg::Import::PCGparameter param, System::LongInt offset, System::LongInt nelements, const System::PDouble v);
-extern "C" void __cdecl cgGLGetParameterArray1f(Cg::Import::PCGparameter param, System::LongInt offset, System::LongInt nelements, Winapi::Windows::PSingle v);
-extern "C" void __cdecl cgGLGetParameterArray2f(Cg::Import::PCGparameter param, System::LongInt offset, System::LongInt nelements, Winapi::Windows::PSingle v);
-extern "C" void __cdecl cgGLGetParameterArray3f(Cg::Import::PCGparameter param, System::LongInt offset, System::LongInt nelements, Winapi::Windows::PSingle v);
-extern "C" void __cdecl cgGLGetParameterArray4f(Cg::Import::PCGparameter param, System::LongInt offset, System::LongInt nelements, Winapi::Windows::PSingle v);
-extern "C" void __cdecl cgGLGetParameterArray1d(Cg::Import::PCGparameter param, System::LongInt offset, System::LongInt nelements, System::PDouble v);
-extern "C" void __cdecl cgGLGetParameterArray2d(Cg::Import::PCGparameter param, System::LongInt offset, System::LongInt nelements, System::PDouble v);
-extern "C" void __cdecl cgGLGetParameterArray3d(Cg::Import::PCGparameter param, System::LongInt offset, System::LongInt nelements, System::PDouble v);
-extern "C" void __cdecl cgGLGetParameterArray4d(Cg::Import::PCGparameter param, System::LongInt offset, System::LongInt nelements, System::PDouble v);
-extern "C" void __cdecl cgGLSetParameterPointer(Cg::Import::PCGparameter param, int fsize, unsigned _type, int stride, const void * _pointer);
-extern "C" void __cdecl cgGLEnableClientState(Cg::Import::PCGparameter param);
-extern "C" void __cdecl cgGLDisableClientState(Cg::Import::PCGparameter param);
-extern "C" void __cdecl cgGLSetMatrixParameterdr(Cg::Import::PCGparameter param, const System::PDouble matrix);
-extern "C" void __cdecl cgGLSetMatrixParameterfr(Cg::Import::PCGparameter param, const Winapi::Windows::PSingle matrix);
-extern "C" void __cdecl cgGLSetMatrixParameterdc(Cg::Import::PCGparameter param, const System::PDouble matrix);
-extern "C" void __cdecl cgGLSetMatrixParameterfc(Cg::Import::PCGparameter param, const Winapi::Windows::PSingle matrix);
-extern "C" void __cdecl cgGLGetMatrixParameterdr(Cg::Import::PCGparameter param, System::PDouble matrix);
-extern "C" void __cdecl cgGLGetMatrixParameterfr(Cg::Import::PCGparameter param, Winapi::Windows::PSingle matrix);
-extern "C" void __cdecl cgGLGetMatrixParameterdc(Cg::Import::PCGparameter param, System::PDouble matrix);
-extern "C" void __cdecl cgGLGetMatrixParameterfc(Cg::Import::PCGparameter param, Winapi::Windows::PSingle matrix);
-extern "C" void __cdecl cgGLSetStateMatrixParameter(Cg::Import::PCGparameter param, TCGGLenum matrix, TCGGLenum transform);
-extern "C" void __cdecl cgGLSetMatrixParameterArrayfc(Cg::Import::PCGparameter param, System::LongInt offset, System::LongInt nelements, const Winapi::Windows::PSingle matrices);
-extern "C" void __cdecl cgGLSetMatrixParameterArrayfr(Cg::Import::PCGparameter param, System::LongInt offset, System::LongInt nelements, const Winapi::Windows::PSingle matrices);
-extern "C" void __cdecl cgGLSetMatrixParameterArraydc(Cg::Import::PCGparameter param, System::LongInt offset, System::LongInt nelements, const System::PDouble matrices);
-extern "C" void __cdecl cgGLSetMatrixParameterArraydr(Cg::Import::PCGparameter param, System::LongInt offset, System::LongInt nelements, const System::PDouble matrices);
-extern "C" void __cdecl cgGLGetMatrixParameterArrayfc(Cg::Import::PCGparameter param, System::LongInt offset, System::LongInt nelements, Winapi::Windows::PSingle matrices);
-extern "C" void __cdecl cgGLGetMatrixParameterArrayfr(Cg::Import::PCGparameter param, System::LongInt offset, System::LongInt nelements, Winapi::Windows::PSingle matrices);
-extern "C" void __cdecl cgGLGetMatrixParameterArraydc(Cg::Import::PCGparameter param, System::LongInt offset, System::LongInt nelements, System::PDouble matrices);
-extern "C" void __cdecl cgGLGetMatrixParameterArraydr(Cg::Import::PCGparameter param, System::LongInt offset, System::LongInt nelements, System::PDouble matrices);
-extern "C" void __cdecl cgGLSetTextureParameter(Cg::Import::PCGparameter param, unsigned texobj);
-extern "C" unsigned __cdecl cgGLGetTextureParameter(Cg::Import::PCGparameter param);
-extern "C" void __cdecl cgGLEnableTextureParameter(Cg::Import::PCGparameter param);
-extern "C" void __cdecl cgGLDisableTextureParameter(Cg::Import::PCGparameter param);
-extern "C" unsigned __cdecl cgGLGetTextureEnum(Cg::Import::PCGparameter param);
-extern "C" void __cdecl cgGLSetManageTextureParameters(Cg::Import::PCGcontext ctx, Cg::Import::TCGbool flag);
-extern "C" Cg::Import::TCGbool __cdecl cgGLGetManageTextureParameters(Cg::Import::PCGcontext ctx);
-}	/* namespace Gl */
-}	/* namespace Cg */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_CG_GL)
-using namespace Cg::Gl;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_CG)
-using namespace Cg;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// Cg_GLHPP

include/Win32/Cg.Import.hpp

@@ -1,259 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'Cg.Import.pas' rev: 36.00 (Windows)
-
-#ifndef Cg_ImportHPP
-#define Cg_ImportHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <Winapi.Windows.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Cg
-{
-namespace Import
-{
-//-- forward type declarations -----------------------------------------------
-struct DECLSPEC_DRECORD _CGcontext
-{
-};
-
-
-struct DECLSPEC_DRECORD _CGprogram
-{
-};
-
-
-struct DECLSPEC_DRECORD _CGparameter
-{
-};
-
-
-//-- type declarations -------------------------------------------------------
-typedef char * PCharCG;
-
-typedef char * *PPCharCG;
-
-typedef System::AnsiString StringCG;
-
-typedef int TCGbool;
-
-typedef TCGbool CGbool;
-
-typedef _CGcontext *PCGcontext;
-
-typedef PCGcontext CGcontext;
-
-typedef _CGprogram *PCGprogram;
-
-typedef PCGprogram CGprogram;
-
-typedef _CGparameter *PCGparameter;
-
-typedef PCGparameter CGparameter;
-
-enum DECLSPEC_DENUM TCGtype : unsigned int { CG_UNKNOWN_TYPE, CG_STRUCT, CG_ARRAY, CG_TYPE_START_ENUM = 1024, CG_HALF, CG_HALF2, CG_HALF3, CG_HALF4, CG_HALF1x1, CG_HALF1x2, CG_HALF1x3, CG_HALF1x4, CG_HALF2x1, CG_HALF2x2, CG_HALF2x3, CG_HALF2x4, CG_HALF3x1, CG_HALF3x2, CG_HALF3x3, CG_HALF3x4, CG_HALF4x1, CG_HALF4x2, CG_HALF4x3, CG_HALF4x4, CG_FLOAT, CG_FLOAT2, CG_FLOAT3, CG_FLOAT4, CG_FLOAT1x1, CG_FLOAT1x2, CG_FLOAT1x3, CG_FLOAT1x4, CG_FLOAT2x1, CG_FLOAT2x2, CG_FLOAT2x3, CG_FLOAT2x4, CG_FLOAT3x1, CG_FLOAT3x2, CG_FLOAT3x3, CG_FLOAT3x4, CG_FLOAT4x1, CG_FLOAT4x2, CG_FLOAT4x3, CG_FLOAT4x4, CG_SAMPLER1D, CG_SAMPLER2D, CG_SAMPLER3D, CG_SAMPLERRECT, CG_SAMPLERCUBE, CG_FIXED, CG_FIXED2, CG_FIXED3, CG_FIXED4, CG_FIXED1x1, CG_FIXED1x2, CG_FIXED1x3, CG_FIXED1x4, 
-	CG_FIXED2x1, CG_FIXED2x2, CG_FIXED2x3, CG_FIXED2x4, CG_FIXED3x1, CG_FIXED3x2, CG_FIXED3x3, CG_FIXED3x4, CG_FIXED4x1, CG_FIXED4x2, CG_FIXED4x3, CG_FIXED4x4, CG_HALF1, CG_FLOAT1, CG_FIXED1, CG_INT, CG_INT1, CG_INT2, CG_INT3, CG_INT4, CG_INT1x1, CG_INT1x2, CG_INT1x3, CG_INT1x4, CG_INT2x1, CG_INT2x2, CG_INT2x3, CG_INT2x4, CG_INT3x1, CG_INT3x2, CG_INT3x3, CG_INT3x4, CG_INT4x1, CG_INT4x2, CG_INT4x3, CG_INT4x4, CG_BOOL, CG_BOOL1, CG_BOOL2, CG_BOOL3, CG_BOOL4, CG_BOOL1x1, CG_BOOL1x2, CG_BOOL1x3, CG_BOOL1x4, CG_BOOL2x1, CG_BOOL2x2, CG_BOOL2x3, CG_BOOL2x4, CG_BOOL3x1, CG_BOOL3x2, CG_BOOL3x3, CG_BOOL3x4, CG_BOOL4x1, CG_BOOL4x2, CG_BOOL4x3, CG_BOOL4x4 };
-
-typedef TCGtype CGtype;
-
-enum DECLSPEC_DENUM TCGresource : unsigned int { CG_TEXUNIT0 = 2048, CG_TEXUNIT1, CG_TEXUNIT2, CG_TEXUNIT3, CG_TEXUNIT4, CG_TEXUNIT5, CG_TEXUNIT6, CG_TEXUNIT7, CG_TEXUNIT8, CG_TEXUNIT9, CG_TEXUNIT10, CG_TEXUNIT11, CG_TEXUNIT12, CG_TEXUNIT13, CG_TEXUNIT14, CG_TEXUNIT15, CG_ATTR0 = 2113, CG_ATTR1, CG_ATTR2, CG_ATTR3, CG_ATTR4, CG_ATTR5, CG_ATTR6, CG_ATTR7, CG_ATTR8, CG_ATTR9, CG_ATTR10, CG_ATTR11, CG_ATTR12, CG_ATTR13, CG_ATTR14, CG_ATTR15, CG_C = 2178, CG_TEX0, CG_TEX1, CG_TEX2, CG_TEX3 = 2192, CG_TEX4, CG_TEX5, CG_TEX6, CG_TEX7, CG_HPOS = 2243, CG_COL0 = 2245, CG_COL1, CG_COL2, CG_COL3, CG_PSIZ = 2309, CG_WPOS = 2373, CG_POSITION0 = 2437, CG_POSITION1, CG_POSITION2, CG_POSITION3, CG_POSITION4, CG_POSITION5, CG_POSITION6, CG_POSITION7, CG_POSITION8, 
-	CG_POSITION9, CG_POSITION10, CG_POSITION11, CG_POSITION12, CG_POSITION13, CG_POSITION14, CG_POSITION15, CG_DIFFUSE0 = 2501, CG_TANGENT0 = 2565, CG_TANGENT1, CG_TANGENT2, CG_TANGENT3, CG_TANGENT4, CG_TANGENT5, CG_TANGENT6, CG_TANGENT7, CG_TANGENT8, CG_TANGENT9, CG_TANGENT10, CG_TANGENT11, CG_TANGENT12, CG_TANGENT13, CG_TANGENT14, CG_TANGENT15, CG_SPECULAR0 = 2629, CG_BLENDINDICES0 = 2693, CG_BLENDINDICES1, CG_BLENDINDICES2, CG_BLENDINDICES3, CG_BLENDINDICES4, CG_BLENDINDICES5, CG_BLENDINDICES6, CG_BLENDINDICES7, CG_BLENDINDICES8, CG_BLENDINDICES9, CG_BLENDINDICES10, CG_BLENDINDICES11, CG_BLENDINDICES12, CG_BLENDINDICES13, CG_BLENDINDICES14, CG_BLENDINDICES15, CG_COLOR0 = 2757, CG_COLOR1, CG_COLOR2, CG_COLOR3, CG_COLOR4, CG_COLOR5, CG_COLOR6, CG_COLOR7, 
-	CG_COLOR8, CG_COLOR9, CG_COLOR10, CG_COLOR11, CG_COLOR12, CG_COLOR13, CG_COLOR14, CG_COLOR15, CG_PSIZE0 = 2821, CG_PSIZE1, CG_PSIZE2, CG_PSIZE3, CG_PSIZE4, CG_PSIZE5, CG_PSIZE6, CG_PSIZE7, CG_PSIZE8, CG_PSIZE9, CG_PSIZE10, CG_PSIZE11, CG_PSIZE12, CG_PSIZE13, CG_PSIZE14, CG_PSIZE15, CG_BINORMAL0 = 2885, CG_BINORMAL1, CG_BINORMAL2, CG_BINORMAL3, CG_BINORMAL4, CG_BINORMAL5, CG_BINORMAL6, CG_BINORMAL7, CG_BINORMAL8, CG_BINORMAL9, CG_BINORMAL10, CG_BINORMAL11, CG_BINORMAL12, CG_BINORMAL13, CG_BINORMAL14, CG_BINORMAL15, CG_FOG0 = 2917, CG_FOG1, CG_FOG2, CG_FOG3, CG_FOG4, CG_FOG5, CG_FOG6, CG_FOG7, CG_FOG8, CG_FOG9, CG_FOG10, CG_FOG11, CG_FOG12, CG_FOG13, CG_FOG14, CG_FOG15, CG_DEPTH0, CG_DEPTH1, CG_DEPTH2, CG_DEPTH3, CG_DEPTH4, CG_DEPTH5, CG_DEPTH6, CG_DEPTH7, 
-	CG_DEPTH8, CG_DEPTH9 = 29542, CG_DEPTH10 = 2943, CG_DEPTH11, CG_DEPTH12, CG_DEPTH13, CG_DEPTH14, CG_DEPTH15, CG_SAMPLE0, CG_SAMPLE1, CG_SAMPLE2, CG_SAMPLE3, CG_SAMPLE4, CG_SAMPLE5, CG_SAMPLE6, CG_SAMPLE7, CG_SAMPLE8, CG_SAMPLE9, CG_SAMPLE10, CG_SAMPLE11, CG_SAMPLE12, CG_SAMPLE13, CG_SAMPLE14, CG_SAMPLE15, CG_BLENDWEIGHT0 = 3028, CG_BLENDWEIGHT1, CG_BLENDWEIGHT2, CG_BLENDWEIGHT3, CG_BLENDWEIGHT4, CG_BLENDWEIGHT5, CG_BLENDWEIGHT6, CG_BLENDWEIGHT7, CG_BLENDWEIGHT8, CG_BLENDWEIGHT9, CG_BLENDWEIGHT10, CG_BLENDWEIGHT11, CG_BLENDWEIGHT12, CG_BLENDWEIGHT13, CG_BLENDWEIGHT14, CG_BLENDWEIGHT15, CG_NORMAL0 = 3092, CG_NORMAL1, CG_NORMAL2, CG_NORMAL3, CG_NORMAL4, CG_NORMAL5, CG_NORMAL6, CG_NORMAL7, CG_NORMAL8, CG_NORMAL9, CG_NORMAL10, CG_NORMAL11, CG_NORMAL12, 
-	CG_NORMAL13, CG_NORMAL14, CG_NORMAL15, CG_FOGCOORD = 3156, CG_TEXCOORD0 = 3220, CG_TEXCOORD1, CG_TEXCOORD2, CG_TEXCOORD3, CG_TEXCOORD4, CG_TEXCOORD5, CG_TEXCOORD6, CG_TEXCOORD7, CG_TEXCOORD8, CG_TEXCOORD9, CG_TEXCOORD10, CG_TEXCOORD11, CG_TEXCOORD12, CG_TEXCOORD13, CG_TEXCOORD14, CG_TEXCOORD15, CG_COMBINER_CONST0 = 3284, CG_COMBINER_CONST1, CG_COMBINER_STAGE_CONST0, CG_COMBINER_STAGE_CONST1, CG_OFFSET_TEXTURE_MATRIX, CG_OFFSET_TEXTURE_SCALE, CG_OFFSET_TEXTURE_BIAS, CG_CONST_EYE, CG_TESSFACTOR = 3255, CG_UNDEFINED };
-
-typedef TCGresource CGresource;
-
-enum DECLSPEC_DENUM TCGprofile : unsigned int { CG_PROFILE_START = 6144, CG_PROFILE_UNKNOWN, CG_PROFILE_VP20, CG_PROFILE_FP20, CG_PROFILE_VP30, CG_PROFILE_FP30, CG_PROFILE_ARBVP1, CG_PROFILE_ARBFP1 = 7000, CG_PROFILE_VP40, CG_PROFILE_FP40 = 6151, CG_PROFILE_VS_1_1 = 6153, CG_PROFILE_VS_2_0, CG_PROFILE_VS_2_X, CG_PROFILE_PS_1_1 = 6159, CG_PROFILE_PS_1_2, CG_PROFILE_PS_1_3, CG_PROFILE_PS_2_0, CG_PROFILE_PS_2_X, CG_PROFILE_MAX = 7100 };
-
-typedef TCGprofile CGprofile;
-
-typedef unsigned *PCGerror;
-
-typedef unsigned TCGerror;
-
-typedef TCGerror CGerror;
-
-enum DECLSPEC_DENUM TCGenum : unsigned int { CG_UNKNOWN = 4096, CG_IN, CG_OUT, CG_INOUT, CG_MIXED, CG_VARYING, CG_UNIFORM, CG_CONSTANT, CG_PROGRAM_SOURCE, CG_PROGRAM_ENTRY, CG_COMPILED_PROGRAM, CG_PROGRAM_PROFILE, CG_GLOBAL, CG_PROGRAM, CG_DEFAULT, CG_ERROR, CG_SOURCE, CG_OBJECT, CG_COMPILE_MANUAL, CG_COMPILE_IMMEDIATE, CG_COMPILE_LAZY, CG_CURRENT, CG_LITERAL, CG_VERSION };
-
-typedef TCGenum CGenum;
-
-typedef void __cdecl (*TCGerrorCallbackFunc)(void);
-
-typedef TCGerrorCallbackFunc CGerrorCallbackFunc;
-
-//-- var, const, procedure ---------------------------------------------------
-#define CgLibrary L"cg.dll"
-static _DELPHI_CONST System::Int8 CG_VERSION_1_2 = System::Int8(0x1);
-static _DELPHI_CONST System::Word CG_VERSION_NUM = System::Word(0x4b0);
-static _DELPHI_CONST int CG_FALSE = int(0);
-static _DELPHI_CONST int CG_TRUE = int(1);
-static _DELPHI_CONST System::Int8 CG_NO_ERROR = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 CG_COMPILER_ERROR = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 CG_INVALID_PARAMETER_ERROR = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 CG_INVALID_PROFILE_ERROR = System::Int8(0x3);
-static _DELPHI_CONST System::Int8 CG_PROGRAM_LOAD_ERROR = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 CG_PROGRAM_BIND_ERROR = System::Int8(0x5);
-static _DELPHI_CONST System::Int8 CG_PROGRAM_NOT_LOADED_ERROR = System::Int8(0x6);
-static _DELPHI_CONST System::Int8 CG_UNSUPPORTED_GL_EXTENSION_ERROR = System::Int8(0x7);
-static _DELPHI_CONST System::Int8 CG_INVALID_VALUE_TYPE_ERROR = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 CG_NOT_MATRIX_PARAM_ERROR = System::Int8(0x9);
-static _DELPHI_CONST System::Int8 CG_INVALID_ENUMERANT_ERROR = System::Int8(0xa);
-static _DELPHI_CONST System::Int8 CG_NOT_4x4_MATRIX_ERROR = System::Int8(0xb);
-static _DELPHI_CONST System::Int8 CG_FILE_READ_ERROR = System::Int8(0xc);
-static _DELPHI_CONST System::Int8 CG_FILE_WRITE_ERROR = System::Int8(0xd);
-static _DELPHI_CONST System::Int8 CG_NVPARSE_ERROR = System::Int8(0xe);
-static _DELPHI_CONST System::Int8 CG_MEMORY_ALLOC_ERROR = System::Int8(0xf);
-static _DELPHI_CONST System::Int8 CG_INVALID_CONTEXT_HANDLE_ERROR = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 CG_INVALID_PROGRAM_HANDLE_ERROR = System::Int8(0x11);
-static _DELPHI_CONST System::Int8 CG_INVALID_PARAM_HANDLE_ERROR = System::Int8(0x12);
-static _DELPHI_CONST System::Int8 CG_UNKNOWN_PROFILE_ERROR = System::Int8(0x13);
-static _DELPHI_CONST System::Int8 CG_VAR_ARG_ERROR = System::Int8(0x14);
-static _DELPHI_CONST System::Int8 CG_INVALID_DIMENSION_ERROR = System::Int8(0x15);
-static _DELPHI_CONST System::Int8 CG_ARRAY_PARAM_ERROR = System::Int8(0x16);
-static _DELPHI_CONST System::Int8 CG_OUT_OF_ARRAY_BOUNDS_ERROR = System::Int8(0x17);
-static _DELPHI_CONST System::Int8 CG_CONFLICTING_TYPES_ERROR = System::Int8(0x18);
-static _DELPHI_CONST System::Int8 CG_CONFLICTING_PARAMETER_TYPES_ERROR = System::Int8(0x19);
-static _DELPHI_CONST System::Int8 CG_PARAMETER_IS_NOT_SHARED_ERROR = System::Int8(0x1a);
-static _DELPHI_CONST System::Int8 CG_INVALID_PARAMETER_VARIABILITY_ERROR = System::Int8(0x1b);
-static _DELPHI_CONST System::Int8 CG_CANNOT_DESTROY_PARAMETER_ERROR = System::Int8(0x1c);
-static _DELPHI_CONST System::Int8 CG_NOT_ROOT_PARAMETER_ERROR = System::Int8(0x1d);
-static _DELPHI_CONST System::Int8 CG_PARAMETERS_DO_NOT_MATCH_ERROR = System::Int8(0x1e);
-static _DELPHI_CONST System::Int8 CG_IS_NOT_PROGRAM_PARAMETER_ERROR = System::Int8(0x1f);
-static _DELPHI_CONST System::Int8 CG_INVALID_PARAMETER_TYPE_ERROR = System::Int8(0x20);
-static _DELPHI_CONST System::Int8 CG_PARAMETER_IS_NOT_RESIZABLE_ARRAY_ERROR = System::Int8(0x21);
-static _DELPHI_CONST System::Int8 CG_INVALID_SIZE_ERROR = System::Int8(0x22);
-static _DELPHI_CONST System::Int8 CG_BIND_CREATES_CYCLE_ERROR = System::Int8(0x23);
-static _DELPHI_CONST System::Int8 CG_ARRAY_TYPES_DO_NOT_MATCH_ERROR = System::Int8(0x24);
-static _DELPHI_CONST System::Int8 CG_ARRAY_DIMENSIONS_DO_NOT_MATCH_ERROR = System::Int8(0x25);
-static _DELPHI_CONST System::Int8 CG_ARRAY_HAS_WRONG_DIMENSION_ERROR = System::Int8(0x26);
-static _DELPHI_CONST System::Int8 CG_TYPE_IS_NOT_DEFINED_IN_PROGRAM_ERROR = System::Int8(0x27);
-extern "C" PCGcontext __cdecl cgCreateContext(void);
-extern "C" void __cdecl cgDestroyContext(PCGcontext ctx);
-extern "C" TCGbool __cdecl cgIsContext(PCGcontext ctx);
-extern "C" System::WideChar * __cdecl cgGetLastListing(PCGcontext ctx);
-extern "C" void __cdecl cgSetAutoCompile(PCGcontext ctx, TCGenum flag);
-extern "C" PCGprogram __cdecl cgCreateProgram(PCGcontext ctx, TCGenum program_type, const PCharCG _program, TCGprofile profile, const PCharCG entry, const PPCharCG args);
-extern "C" PCGprogram __cdecl cgCreateProgramFromFile(PCGcontext ctx, TCGenum program_type, const PCharCG program_file, TCGprofile profile, const PCharCG entry, const PPCharCG args);
-extern "C" PCGprogram __cdecl cgCopyProgram(PCGprogram _program);
-extern "C" void __cdecl cgDestroyProgram(PCGprogram _program);
-extern "C" PCGprogram __cdecl cgGetFirstProgram(PCGcontext ctx);
-extern "C" PCGprogram __cdecl cgGetNextProgram(PCGprogram current);
-extern "C" PCGcontext __cdecl cgGetProgramContext(PCGprogram prog);
-extern "C" TCGbool __cdecl cgIsProgram(PCGprogram _program);
-extern "C" void __cdecl cgCompileProgram(PCGprogram _program);
-extern "C" TCGbool __cdecl cgIsProgramCompiled(PCGprogram _program);
-extern "C" PCharCG __cdecl cgGetProgramString(PCGprogram prog, TCGenum pname);
-extern "C" TCGprofile __cdecl cgGetProgramProfile(PCGprogram prog);
-extern "C" PCGparameter __cdecl cgCreateParameter(PCGcontext ctx, TCGtype type_);
-extern "C" PCGparameter __cdecl cgCreateParameterArray(PCGcontext ctx, TCGtype type_, int length);
-extern "C" PCGparameter __cdecl cgCreateParameterMultiDimArray(PCGcontext ctx, TCGtype type_, int dim, const System::PInteger lengths);
-extern "C" void __cdecl cgDestroyParameter(PCGparameter param);
-extern "C" void __cdecl cgConnectParameter(PCGparameter from, PCGparameter to_);
-extern "C" void __cdecl cgDisconnectParameter(PCGparameter param);
-extern "C" PCGparameter __cdecl cgGetConnectedParameter(PCGparameter param);
-extern "C" int __cdecl cgGetNumConnectedToParameters(PCGparameter param);
-extern "C" PCGparameter __cdecl cgGetConnectedToParameter(PCGparameter param, int index);
-extern "C" PCGparameter __cdecl cgGetNamedParameter(PCGprogram prog, const PCharCG name);
-extern "C" PCGparameter __cdecl cgGetNamedProgramParameter(PCGprogram prog, TCGenum name_space, const PCharCG name);
-extern "C" PCGparameter __cdecl cgGetFirstParameter(PCGprogram prog, TCGenum name_space);
-extern "C" PCGparameter __cdecl cgGetNextParameter(PCGparameter current);
-extern "C" PCGparameter __cdecl cgGetFirstLeafParameter(PCGprogram prog, TCGenum name_space);
-extern "C" PCGparameter __cdecl cgGetNextLeafParameter(PCGparameter current);
-extern "C" PCGparameter __cdecl cgGetFirstStructParameter(PCGparameter param);
-extern "C" PCGparameter __cdecl cgGetNamedStructParameter(PCGparameter param, const PCharCG name);
-extern "C" PCGparameter __cdecl cgGetFirstDependentParameter(PCGparameter param);
-extern "C" PCGparameter __cdecl cgGetArrayParameter(PCGparameter aparam, int index);
-extern "C" int __cdecl cgGetArrayDimension(PCGparameter param);
-extern "C" TCGtype __cdecl cgGetArrayType(PCGparameter param);
-extern "C" int __cdecl cgGetArraySize(PCGparameter param, int dimension);
-extern "C" void __cdecl cgSetArraySize(PCGparameter param, int size);
-extern "C" void __cdecl cgSetMultiDimArraySize(PCGparameter param, const System::PInteger sizes);
-extern "C" PCGprogram __cdecl cgGetParameterProgram(PCGparameter param);
-extern "C" PCGcontext __cdecl cgGetParameterContext(PCGparameter param);
-extern "C" TCGbool __cdecl cgIsParameter(PCGparameter param);
-extern "C" PCharCG __cdecl cgGetParameterName(PCGparameter param);
-extern "C" TCGtype __cdecl cgGetParameterType(PCGparameter param);
-extern "C" TCGtype __cdecl cgGetParameterNamedType(PCGparameter param);
-extern "C" PCharCG __cdecl cgGetParameterSemantic(PCGparameter param);
-extern "C" TCGresource __cdecl cgGetParameterResource(PCGparameter param);
-extern "C" TCGresource __cdecl cgGetParameterBaseResource(PCGparameter param);
-extern "C" System::LongWord __cdecl cgGetParameterResourceIndex(PCGparameter param);
-extern "C" TCGenum __cdecl cgGetParameterVariability(PCGparameter param);
-extern "C" TCGenum __cdecl cgGetParameterDirection(PCGparameter param);
-extern "C" TCGbool __cdecl cgIsParameterReferenced(PCGparameter param);
-extern "C" System::PDouble __cdecl cgGetParameterValues(PCGparameter param, TCGenum value_type, /* out */ int &nvalues);
-extern "C" int __cdecl cgGetParameterOrdinalNumber(PCGparameter param);
-extern "C" TCGbool __cdecl cgIsParameterGlobal(PCGparameter param);
-extern "C" int __cdecl cgGetParameterIndex(PCGparameter param);
-extern "C" void __cdecl cgSetParameterVariability(PCGparameter param, TCGenum vary);
-extern "C" void __cdecl cgSetParameterSemantic(PCGparameter param, const PCharCG semantic);
-extern "C" void __cdecl cgSetParameter1f(PCGparameter param, float x);
-extern "C" void __cdecl cgSetParameter2f(PCGparameter param, float x, float y);
-extern "C" void __cdecl cgSetParameter3f(PCGparameter param, float x, float y, float z);
-extern "C" void __cdecl cgSetParameter4f(PCGparameter param, float x, float y, float z, float w);
-extern "C" void __cdecl cgSetParameter1d(PCGparameter param, double x);
-extern "C" void __cdecl cgSetParameter2d(PCGparameter param, double x, double y);
-extern "C" void __cdecl cgSetParameter3d(PCGparameter param, double x, double y, double z);
-extern "C" void __cdecl cgSetParameter4d(PCGparameter param, double x, double y, double z, double w);
-extern "C" void __cdecl cgSetParameter1fv(PCGparameter param, const Winapi::Windows::PSingle v);
-extern "C" void __cdecl cgSetParameter2fv(PCGparameter param, const Winapi::Windows::PSingle v);
-extern "C" void __cdecl cgSetParameter3fv(PCGparameter param, const Winapi::Windows::PSingle v);
-extern "C" void __cdecl cgSetParameter4fv(PCGparameter param, const Winapi::Windows::PSingle v);
-extern "C" void __cdecl cgSetParameter1dv(PCGparameter param, const System::PDouble x);
-extern "C" void __cdecl cgSetParameter2dv(PCGparameter param, const System::PDouble x);
-extern "C" void __cdecl cgSetParameter3dv(PCGparameter param, const System::PDouble x);
-extern "C" void __cdecl cgSetParameter4dv(PCGparameter param, const System::PDouble x);
-extern "C" void __cdecl cgSetMatrixParameterdr(PCGparameter param, const System::PDouble matrix);
-extern "C" void __cdecl cgSetMatrixParameterfr(PCGparameter param, const Winapi::Windows::PSingle matrix);
-extern "C" void __cdecl cgSetMatrixParameterdc(PCGparameter param, const System::PDouble matrix);
-extern "C" void __cdecl cgSetMatrixParameterfc(PCGparameter param, const Winapi::Windows::PSingle matrix);
-extern "C" PCharCG __cdecl cgGetTypeString(TCGtype _type);
-extern "C" TCGtype __cdecl cgGetType(const PCharCG type_string);
-extern "C" TCGtype __cdecl cgGetNamedUserType(CGprogram program_, const PCharCG name);
-extern "C" int __cdecl cgGetNumUserTypes(CGprogram program_);
-extern "C" TCGtype __cdecl cgGetUserType(CGprogram program_, int index);
-extern "C" int __cdecl cgGetNumParentTypes(TCGtype type_);
-extern "C" TCGtype __cdecl cgGetParentType(TCGtype type_, int index);
-extern "C" TCGbool __cdecl cgIsParentType(TCGtype parent, TCGtype child);
-extern "C" TCGbool __cdecl cgIsInterfaceType(TCGtype type_);
-extern "C" PCharCG __cdecl cgGetResourceString(TCGresource resource);
-extern "C" TCGresource __cdecl cgGetResource(const PCharCG resource_string);
-extern "C" PCharCG __cdecl cgGetEnumString(TCGenum en);
-extern "C" TCGenum __cdecl cgGetEnum(const PCharCG enum_string);
-extern "C" PCharCG __cdecl cgGetProfileString(TCGprofile profile);
-extern "C" TCGprofile __cdecl cgGetProfile(const PCharCG profile_string);
-extern "C" TCGerror __cdecl cgGetError(void);
-extern "C" PCharCG __cdecl cgGetErrorString(TCGerror error);
-extern "C" PCharCG __cdecl cgGetLastErrorString(PCGerror error);
-extern "C" void __cdecl cgSetErrorCallback(TCGerrorCallbackFunc func);
-extern "C" TCGerrorCallbackFunc __cdecl cgGetErrorCallback(void);
-extern "C" PCharCG __cdecl cgGetString(TCGenum sname);
-extern "C" PCGparameter __cdecl cgGetNextParameter_depr1_1(PCGparameter current);
-extern "C" PCGparameter __cdecl cgGetNextLeafParameter_depr1_1(PCGparameter current);
-}	/* namespace Import */
-}	/* namespace Cg */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_CG_IMPORT)
-using namespace Cg::Import;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_CG)
-using namespace Cg;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// Cg_ImportHPP

include/Win32/FMOD.Import.hpp

@@ -1,272 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'FMOD.Import.pas' rev: 36.00 (Windows)
-
-#ifndef FMOD_ImportHPP
-#define FMOD_ImportHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <Winapi.Windows.hpp>
-#include <FMOD.types.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Fmod
-{
-namespace Import
-{
-//-- forward type declarations -----------------------------------------------
-//-- type declarations -------------------------------------------------------
-//-- var, const, procedure ---------------------------------------------------
-#define FMOD_DLL L"fmod32.dll"
-extern DELPHI_PACKAGE bool __fastcall FMOD_Load(System::WideChar * LibName);
-extern DELPHI_PACKAGE void __fastcall FMOD_Unload(void);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_SetOutput(Fmod::Types::TFSoundOutputTypes OutputType);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_SetDriver(int Driver);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_SetMixer(Fmod::Types::TFSoundMixerTypes Mixer);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_SetBufferSize(int LenMs);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_SetHWND(Winapi::Windows::THandle Hwnd);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_SetMinHardwareChannels(int Min);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_SetMaxHardwareChannels(int Max);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_SetMemorySystem(void * Pool, int PoolLen, Fmod::Types::TFSoundAllocCallback UserAlloc, Fmod::Types::TFSoundReallocCallback UserRealloc, Fmod::Types::TFSoundFreeCallback UserFree);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Init(int MixRate, int MaxSoftwareChannels, unsigned Flags);
-extern DELPHI_PACKAGE void __stdcall FSOUND_Close(void);
-extern DELPHI_PACKAGE void __stdcall FSOUND_Update(void);
-extern DELPHI_PACKAGE void __stdcall FSOUND_SetSpeakerMode(unsigned SpeakerMode);
-extern DELPHI_PACKAGE void __stdcall FSOUND_SetSFXMasterVolume(int Volume);
-extern DELPHI_PACKAGE void __stdcall FSOUND_SetPanSeperation(float PanSep);
-extern DELPHI_PACKAGE Fmod::Types::TFModErrors __stdcall FSOUND_GetError(void);
-extern DELPHI_PACKAGE float __stdcall FSOUND_GetVersion(void);
-extern DELPHI_PACKAGE Fmod::Types::TFSoundOutputTypes __stdcall FSOUND_GetOutput(void);
-extern DELPHI_PACKAGE void * __stdcall FSOUND_GetOutputHandle(void);
-extern DELPHI_PACKAGE int __stdcall FSOUND_GetDriver(void);
-extern DELPHI_PACKAGE Fmod::Types::TFSoundMixerTypes __stdcall FSOUND_GetMixer(void);
-extern DELPHI_PACKAGE int __stdcall FSOUND_GetNumDrivers(void);
-extern DELPHI_PACKAGE char * __stdcall FSOUND_GetDriverName(int Id);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_GetDriverCaps(int Id, unsigned &Caps);
-extern DELPHI_PACKAGE int __stdcall FSOUND_GetOutputRate(void);
-extern DELPHI_PACKAGE int __stdcall FSOUND_GetMaxChannels(void);
-extern DELPHI_PACKAGE int __stdcall FSOUND_GetMaxSamples(void);
-extern DELPHI_PACKAGE int __stdcall FSOUND_GetSFXMasterVolume(void);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_GetNumHWChannels(int &num2d, int &num3d, int &total);
-extern DELPHI_PACKAGE int __stdcall FSOUND_GetChannelsPlaying(void);
-extern DELPHI_PACKAGE float __stdcall FSOUND_GetCPUUsage(void);
-extern DELPHI_PACKAGE void __stdcall FSOUND_GetMemoryStats(unsigned &CurrentAlloced, unsigned &MaxAlloced);
-extern DELPHI_PACKAGE Fmod::Types::PFSoundSample __stdcall FSOUND_Sample_Load(int Index, const char * NameOrData, unsigned Mode, int Offset, int Length);
-extern DELPHI_PACKAGE Fmod::Types::PFSoundSample __stdcall FSOUND_Sample_Alloc(int Index, int Length, unsigned Mode, int DefFreq, int DefVol, int DefPan, int DefPri);
-extern DELPHI_PACKAGE void __stdcall FSOUND_Sample_Free(Fmod::Types::PFSoundSample Sptr);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Sample_Upload(Fmod::Types::PFSoundSample Sptr, void * SrcData, unsigned Mode);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Sample_Lock(Fmod::Types::PFSoundSample Sptr, int Offset, int Length, void * &Ptr1, void * &Ptr2, unsigned &Len1, unsigned &Len2);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Sample_Unlock(Fmod::Types::PFSoundSample Sptr, void * Ptr1, void * Ptr2, unsigned Len1, unsigned Len2);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Sample_SetMode(Fmod::Types::PFSoundSample Sptr, unsigned Mode);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Sample_SetLoopPoints(Fmod::Types::PFSoundSample Sptr, int LoopStart, int LoopEnd);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Sample_SetDefaults(Fmod::Types::PFSoundSample Sptr, int DefFreq, int DefVol, int DefPan, int DefPri);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Sample_SetDefaultsEx(Fmod::Types::PFSoundSample Sptr, int DefFreq, int DefVol, int DefPan, int DefPri, int VarFreq, int VarVol, int VarPan);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Sample_SetMinMaxDistance(Fmod::Types::PFSoundSample Sptr, float Min, float Max);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Sample_SetMaxPlaybacks(Fmod::Types::PFSoundSample Sptr, int Max);
-extern DELPHI_PACKAGE Fmod::Types::PFSoundSample __stdcall FSOUND_Sample_Get(int SampNo);
-extern DELPHI_PACKAGE char * __stdcall FSOUND_Sample_GetName(Fmod::Types::PFSoundSample Sptr);
-extern DELPHI_PACKAGE unsigned __stdcall FSOUND_Sample_GetLength(Fmod::Types::PFSoundSample Sptr);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Sample_GetLoopPoints(Fmod::Types::PFSoundSample Sptr, int &LoopStart, int &LoopEnd);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Sample_GetDefaults(Fmod::Types::PFSoundSample Sptr, int &DefFreq, int &DefVol, int &DefPan, int &DefPri);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Sample_GetDefaultsEx(Fmod::Types::PFSoundSample Sptr, int &DefFreq, int &DefVol, int &DefPan, int &DefPri, int &VarFreq, int &VarVol, int &VarPan);
-extern DELPHI_PACKAGE unsigned __stdcall FSOUND_Sample_GetMode(Fmod::Types::PFSoundSample Sptr);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Sample_GetMinMaxDistance(Fmod::Types::PFSoundSample Sptr, float &Min, float &Max);
-extern DELPHI_PACKAGE int __stdcall FSOUND_PlaySound(int Channel, Fmod::Types::PFSoundSample Sptr);
-extern DELPHI_PACKAGE int __stdcall FSOUND_PlaySoundEx(int Channel, Fmod::Types::PFSoundSample Sptr, Fmod::Types::PFSoundDSPUnit Dsp, System::ByteBool StartPaused);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_StopSound(int Channel);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_SetFrequency(int Channel, int Freq);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_SetVolume(int Channel, int Vol);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_SetVolumeAbsolute(int Channel, int Vol);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_SetPan(int Channel, int Pan);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_SetSurround(int Channel, System::ByteBool Surround);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_SetMute(int Channel, System::ByteBool Mute);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_SetPriority(int Channel, int Priority);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_SetReserved(int Channel, System::ByteBool Reserved);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_SetPaused(int Channel, System::ByteBool Paused);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_SetLoopMode(int Channel, unsigned LoopMode);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_SetCurrentPosition(int Channel, unsigned Offset);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_3D_SetAttributes(int Channel, Fmod::Types::PFSoundVector Pos, Fmod::Types::PFSoundVector Vel);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_3D_SetMinMaxDistance(int Channel, float Min, float Max);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_IsPlaying(int Channel);
-extern DELPHI_PACKAGE int __stdcall FSOUND_GetFrequency(int Channel);
-extern DELPHI_PACKAGE int __stdcall FSOUND_GetVolume(int Channel);
-extern DELPHI_PACKAGE int __stdcall FSOUND_GetAmplitude(int Channel);
-extern DELPHI_PACKAGE int __stdcall FSOUND_GetPan(int Channel);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_GetSurround(int Channel);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_GetMute(int Channel);
-extern DELPHI_PACKAGE int __stdcall FSOUND_GetPriority(int Channel);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_GetReserved(int Channel);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_GetPaused(int Channel);
-extern DELPHI_PACKAGE unsigned __stdcall FSOUND_GetLoopMode(int Channel);
-extern DELPHI_PACKAGE unsigned __stdcall FSOUND_GetCurrentPosition(int Channel);
-extern DELPHI_PACKAGE Fmod::Types::PFSoundSample __stdcall FSOUND_GetCurrentSample(int Channel);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_GetCurrentLevels(int Channel, Winapi::Windows::PSingle l, Winapi::Windows::PSingle r);
-extern DELPHI_PACKAGE int __stdcall FSOUND_GetNumSubChannels(int Channel);
-extern DELPHI_PACKAGE int __stdcall FSOUND_GetSubChannel(int Channel, int SubChannel);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_3D_GetAttributes(int Channel, Fmod::Types::PFSoundVector Pos, Fmod::Types::PFSoundVector Vel);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_3D_GetMinMaxDistance(int Channel, float &Min, float &Max);
-extern DELPHI_PACKAGE void __stdcall FSOUND_3D_Listener_SetCurrent(int current);
-extern DELPHI_PACKAGE void __stdcall FSOUND_3D_Listener_SetAttributes(Fmod::Types::PFSoundVector Pos, Fmod::Types::PFSoundVector Vel, float fx, float fy, float fz, float tx, float ty, float tz);
-extern DELPHI_PACKAGE void __stdcall FSOUND_3D_Listener_GetAttributes(Fmod::Types::PFSoundVector Pos, Fmod::Types::PFSoundVector Vel, Winapi::Windows::PSingle fx, Winapi::Windows::PSingle fy, Winapi::Windows::PSingle fz, Winapi::Windows::PSingle tx, Winapi::Windows::PSingle ty, Winapi::Windows::PSingle tz);
-extern DELPHI_PACKAGE void __stdcall FSOUND_3D_SetDopplerFactor(float Scale);
-extern DELPHI_PACKAGE void __stdcall FSOUND_3D_SetDistanceFactor(float Scale);
-extern DELPHI_PACKAGE void __stdcall FSOUND_3D_SetRolloffFactor(float Scale);
-extern DELPHI_PACKAGE int __stdcall FSOUND_FX_Enable(int Channel, Fmod::Types::TFSoundFXModes Fx);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_FX_Disable(int Channel);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_FX_SetChorus(int FXId, float WetDryMix, float Depth, float Feedback, float Frequency, int Waveform, float Delay, int Phase);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_FX_SetCompressor(int FXId, float Gain, float Attack, float Release, float Threshold, float Ratio, float Predelay);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_FX_SetDistortion(int FXId, float Gain, float Edge, float PostEQCenterFrequency, float PostEQBandwidth, float PreLowpassCutoff);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_FX_SetEcho(int FXId, float WetDryMix, float Feedback, float LeftDelay, float RightDelay, int PanDelay);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_FX_SetFlanger(int FXId, float WetDryMix, float Depth, float Feedback, float Frequency, int Waveform, float Delay, int Phase);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_FX_SetGargle(int FXId, int RateHz, int WaveShape);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_FX_SetI3DL2Reverb(int FXId, int Room, int RoomHF, float RoomRolloffFactor, float DecayTime, float DecayHFRatio, int Reflections, float ReflectionsDelay, int Reverb, float ReverbDelay, float Diffusion, float Density, float HFReference);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_FX_SetParamEQ(int FXId, float Center, float Bandwidth, float Gain);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_FX_SetWavesReverb(int FXId, float InGain, float ReverbMix, float ReverbTime, float HighFreqRTRatio);
-extern DELPHI_PACKAGE Fmod::Types::PFSoundStream __stdcall FSOUND_Stream_Open(const char * name_or_data, unsigned Mode, int Offset, int Length);
-extern DELPHI_PACKAGE Fmod::Types::PFSoundStream __stdcall FSOUND_Stream_Create(Fmod::Types::TFSoundStreamCallback Callback, int Length, unsigned Mode, int SampleRate, int UserData);
-extern DELPHI_PACKAGE int __stdcall FSOUND_Stream_Play(int Channel, Fmod::Types::PFSoundStream Stream);
-extern DELPHI_PACKAGE int __stdcall FSOUND_Stream_PlayEx(int Channel, Fmod::Types::PFSoundStream Stream, Fmod::Types::PFSoundDSPUnit Dsp, System::ByteBool StartPaused);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Stream_Stop(Fmod::Types::PFSoundStream Stream);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Stream_Close(Fmod::Types::PFSoundStream Stream);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Stream_SetEndCallback(Fmod::Types::PFSoundStream Stream, Fmod::Types::TFSoundStreamCallback Callback, int UserData);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Stream_SetSyncCallback(Fmod::Types::PFSoundStream Stream, Fmod::Types::TFSoundStreamCallback Callback, int UserData);
-extern DELPHI_PACKAGE Fmod::Types::PFSoundSample __stdcall FSOUND_Stream_GetSample(Fmod::Types::PFSoundStream Stream);
-extern DELPHI_PACKAGE Fmod::Types::PFSoundDSPUnit __stdcall FSOUND_Stream_CreateDSP(Fmod::Types::PFSoundStream Stream, Fmod::Types::TFSoundDSPCallback Callback, int Priority, int Param);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Stream_SetBufferSize(int Ms);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Stream_SetPosition(Fmod::Types::PFSoundStream Stream, unsigned Position);
-extern DELPHI_PACKAGE unsigned __stdcall FSOUND_Stream_GetPosition(Fmod::Types::PFSoundStream Stream);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Stream_SetTime(Fmod::Types::PFSoundStream Stream, int Ms);
-extern DELPHI_PACKAGE int __stdcall FSOUND_Stream_GetTime(Fmod::Types::PFSoundStream Stream);
-extern DELPHI_PACKAGE int __stdcall FSOUND_Stream_GetLength(Fmod::Types::PFSoundStream Stream);
-extern DELPHI_PACKAGE int __stdcall FSOUND_Stream_GetLengthMs(Fmod::Types::PFSoundStream Stream);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Stream_SetMode(Fmod::Types::PFSoundStream Stream, int mode);
-extern DELPHI_PACKAGE int __stdcall FSOUND_Stream_GetMode(Fmod::Types::PFSoundStream Stream);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Stream_SetLoopPoints(Fmod::Types::PFSoundStream Stream, int LoopStartPCM, int LoopEndPCM);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Stream_SetLoopCount(Fmod::Types::PFSoundStream Stream, int Count);
-extern DELPHI_PACKAGE Fmod::Types::PFSyncPoint __stdcall FSOUND_Stream_AddSyncPoint(Fmod::Types::PFSoundStream Stream, unsigned PCMOffset, char * Name);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Stream_DeleteSyncPoint(Fmod::Types::PFSyncPoint Point);
-extern DELPHI_PACKAGE int __stdcall FSOUND_Stream_GetNumSyncPoints(Fmod::Types::PFSoundStream Stream);
-extern DELPHI_PACKAGE Fmod::Types::PFSyncPoint __stdcall FSOUND_Stream_GetSyncPoint(Fmod::Types::PFSoundStream Stream, int Index);
-extern DELPHI_PACKAGE char * __stdcall FSOUND_Stream_GetSyncPointInfo(Fmod::Types::PFSyncPoint Point, unsigned &PCMOffset);
-extern DELPHI_PACKAGE int __stdcall FSOUND_Stream_GetOpenState(Fmod::Types::PFSoundStream Stream);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Stream_SetSubStream(Fmod::Types::PFSoundStream Stream, int Index);
-extern DELPHI_PACKAGE int __stdcall FSOUND_Stream_GetNumSubStreams(Fmod::Types::PFSoundStream Stream);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Stream_SetSubStreamSentence(Fmod::Types::PFSoundStream Stream, unsigned &SentenceList, int NumItems);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Stream_GetNumTagFields(Fmod::Types::PFSoundStream Stream, int &Num);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Stream_GetTagField(Fmod::Types::PFSoundStream Stream, int Num, Fmod::Types::TFSoundTagFieldType &TagType, char * &Name, void * &Value, int &Length);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Stream_FindTagField(Fmod::Types::PFSoundStream Stream, Fmod::Types::TFSoundTagFieldType TagType, char * Name, void * &Value, int &Length);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Stream_Net_SetProxy(char * Proxy);
-extern DELPHI_PACKAGE char * __stdcall FSOUND_Stream_Net_GetLastServerStatus(void);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Stream_Net_SetBufferProperties(int BufferSize, int PreBuffer_Percent, int ReBuffer_Percent);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Stream_Net_GetBufferProperties(int &Buffersize, int &PreBuffer_Percent, int &ReBuffer_Percent);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Stream_Net_SetMetadataCallback(Fmod::Types::PFSoundStream Stream, Fmod::Types::TFMetaDataCallback Callback, int UserData);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Stream_Net_GetStatus(Fmod::Types::PFSoundStream Stream, Fmod::Types::TFSoundStreamNetStatus &Status, int &BufferPercentUsed, int &BitRate, unsigned &Flags);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_CD_Play(System::Byte Drive, int Track);
-extern DELPHI_PACKAGE void __stdcall FSOUND_CD_SetPlayMode(System::Byte Drive, int Mode);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_CD_Stop(System::Byte Drive);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_CD_SetPaused(System::Byte Drive, System::ByteBool Paused);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_CD_SetVolume(System::Byte Drive, int Volume);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_CD_SetTrackTime(System::Byte Drive, int ms);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_CD_OpenTray(System::Byte Drive, System::Byte Open);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_CD_GetPaused(System::Byte Drive);
-extern DELPHI_PACKAGE int __stdcall FSOUND_CD_GetTrack(System::Byte Drive);
-extern DELPHI_PACKAGE int __stdcall FSOUND_CD_GetNumTracks(System::Byte Drive);
-extern DELPHI_PACKAGE int __stdcall FSOUND_CD_GetVolume(System::Byte Drive);
-extern DELPHI_PACKAGE int __stdcall FSOUND_CD_GetTrackLength(System::Byte Drive, int Track);
-extern DELPHI_PACKAGE int __stdcall FSOUND_CD_GetTrackTime(System::Byte Drive);
-extern DELPHI_PACKAGE Fmod::Types::PFSoundDSPUnit __stdcall FSOUND_DSP_Create(Fmod::Types::TFSoundDSPCallback Callback, int Priority, int Param);
-extern DELPHI_PACKAGE void __stdcall FSOUND_DSP_Free(Fmod::Types::PFSoundDSPUnit DSPUnit);
-extern DELPHI_PACKAGE void __stdcall FSOUND_DSP_SetPriority(Fmod::Types::PFSoundDSPUnit DSPUnit, int Priority);
-extern DELPHI_PACKAGE int __stdcall FSOUND_DSP_GetPriority(Fmod::Types::PFSoundDSPUnit DSPUnit);
-extern DELPHI_PACKAGE void __stdcall FSOUND_DSP_SetActive(Fmod::Types::PFSoundDSPUnit DSPUnit, System::ByteBool Active);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_DSP_GetActive(Fmod::Types::PFSoundDSPUnit DSPUnit);
-extern DELPHI_PACKAGE Fmod::Types::PFSoundDSPUnit __stdcall FSOUND_DSP_GetClearUnit(void);
-extern DELPHI_PACKAGE Fmod::Types::PFSoundDSPUnit __stdcall FSOUND_DSP_GetSFXUnit(void);
-extern DELPHI_PACKAGE Fmod::Types::PFSoundDSPUnit __stdcall FSOUND_DSP_GetMusicUnit(void);
-extern DELPHI_PACKAGE Fmod::Types::PFSoundDSPUnit __stdcall FSOUND_DSP_GetClipAndCopyUnit(void);
-extern DELPHI_PACKAGE Fmod::Types::PFSoundDSPUnit __stdcall FSOUND_DSP_GetFFTUnit(void);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_DSP_MixBuffers(void * DestBuffer, void * SrcBuffer, int Len, int Freq, int Vol, int Pan, unsigned Mode);
-extern DELPHI_PACKAGE void __stdcall FSOUND_DSP_ClearMixBuffer(void);
-extern DELPHI_PACKAGE int __stdcall FSOUND_DSP_GetBufferLength(void);
-extern DELPHI_PACKAGE int __stdcall FSOUND_DSP_GetBufferLengthTotal(void);
-extern DELPHI_PACKAGE Winapi::Windows::PSingle __stdcall FSOUND_DSP_GetSpectrum(void);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Reverb_SetProperties(Fmod::Types::TFSoundReverbProperties &Prop);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Reverb_GetProperties(Fmod::Types::TFSoundReverbProperties &Prop);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Reverb_SetChannelProperties(int Channel, Fmod::Types::TFSoundReverbChannelProperties &Prop);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Reverb_GetChannelProperties(int Channel, Fmod::Types::TFSoundReverbChannelProperties &Prop);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Record_SetDriver(int OutputType);
-extern DELPHI_PACKAGE int __stdcall FSOUND_Record_GetNumDrivers(void);
-extern DELPHI_PACKAGE char * __stdcall FSOUND_Record_GetDriverName(int Id);
-extern DELPHI_PACKAGE int __stdcall FSOUND_Record_GetDriver(void);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Record_StartSample(Fmod::Types::PFSoundSample Sptr, System::ByteBool Loop);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FSOUND_Record_Stop(void);
-extern DELPHI_PACKAGE int __stdcall FSOUND_Record_GetPosition(void);
-extern DELPHI_PACKAGE void __stdcall FSOUND_File_SetCallbacks(Fmod::Types::TFSoundOpenCallback OpenCallback, Fmod::Types::TFSoundCloseCallback CloseCallback, Fmod::Types::TFSoundReadCallback ReadCallback, Fmod::Types::TFSoundSeekCallback SeekCallback, Fmod::Types::TFSoundTellCallback TellCallback);
-extern DELPHI_PACKAGE Fmod::Types::PFMusicModule __stdcall FMUSIC_LoadSong(const char * Name);
-extern DELPHI_PACKAGE Fmod::Types::PFMusicModule __stdcall FMUSIC_LoadSongEx(void * Name_Or_Data, int Offset, int Length, unsigned Mode, int &SampleList, int SampleListNum);
-extern DELPHI_PACKAGE int __stdcall FMUSIC_GetOpenState(Fmod::Types::PFMusicModule Module);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FMUSIC_FreeSong(Fmod::Types::PFMusicModule Module);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FMUSIC_PlaySong(Fmod::Types::PFMusicModule Module);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FMUSIC_StopSong(Fmod::Types::PFMusicModule Module);
-extern DELPHI_PACKAGE void __stdcall FMUSIC_StopAllSongs(void);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FMUSIC_SetZxxCallback(Fmod::Types::PFMusicModule Module, Fmod::Types::TFMusicCallback Callback);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FMUSIC_SetRowCallback(Fmod::Types::PFMusicModule Module, Fmod::Types::TFMusicCallback Callback, int RowStep);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FMUSIC_SetOrderCallback(Fmod::Types::PFMusicModule Module, Fmod::Types::TFMusicCallback Callback, int OrderStep);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FMUSIC_SetInstCallback(Fmod::Types::PFMusicModule Module, Fmod::Types::TFMusicCallback Callback, int Instrument);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FMUSIC_SetSample(Fmod::Types::PFMusicModule Module, int SampNo, Fmod::Types::PFSoundSample Sptr);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FMUSIC_SetUserData(Fmod::Types::PFMusicModule Module, int userdata);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FMUSIC_OptimizeChannels(Fmod::Types::PFMusicModule Module, int MaxChannels, int MinVolume);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FMUSIC_SetReverb(System::ByteBool Reverb);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FMUSIC_SetLooping(Fmod::Types::PFMusicModule Module, System::ByteBool Looping);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FMUSIC_SetOrder(Fmod::Types::PFMusicModule Module, int Order);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FMUSIC_SetPaused(Fmod::Types::PFMusicModule Module, System::ByteBool Pause);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FMUSIC_SetMasterVolume(Fmod::Types::PFMusicModule Module, int Volume);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FMUSIC_SetMasterSpeed(Fmod::Types::PFMusicModule Module, float speed);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FMUSIC_SetPanSeperation(Fmod::Types::PFMusicModule Module, float PanSep);
-extern DELPHI_PACKAGE char * __stdcall FMUSIC_GetName(Fmod::Types::PFMusicModule Module);
-extern DELPHI_PACKAGE Fmod::Types::TFMusicTypes __stdcall FMUSIC_GetType(Fmod::Types::PFMusicModule Module);
-extern DELPHI_PACKAGE int __stdcall FMUSIC_GetNumOrders(Fmod::Types::PFMusicModule Module);
-extern DELPHI_PACKAGE int __stdcall FMUSIC_GetNumPatterns(Fmod::Types::PFMusicModule Module);
-extern DELPHI_PACKAGE int __stdcall FMUSIC_GetNumInstruments(Fmod::Types::PFMusicModule Module);
-extern DELPHI_PACKAGE int __stdcall FMUSIC_GetNumSamples(Fmod::Types::PFMusicModule Module);
-extern DELPHI_PACKAGE int __stdcall FMUSIC_GetNumChannels(Fmod::Types::PFMusicModule Module);
-extern DELPHI_PACKAGE Fmod::Types::PFSoundSample __stdcall FMUSIC_GetSample(Fmod::Types::PFMusicModule Module, int SampNo);
-extern DELPHI_PACKAGE int __stdcall FMUSIC_GetPatternLength(Fmod::Types::PFMusicModule Module, int OrderNo);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FMUSIC_IsFinished(Fmod::Types::PFMusicModule Module);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FMUSIC_IsPlaying(Fmod::Types::PFMusicModule Module);
-extern DELPHI_PACKAGE int __stdcall FMUSIC_GetMasterVolume(Fmod::Types::PFMusicModule Module);
-extern DELPHI_PACKAGE int __stdcall FMUSIC_GetGlobalVolume(Fmod::Types::PFMusicModule Module);
-extern DELPHI_PACKAGE int __stdcall FMUSIC_GetOrder(Fmod::Types::PFMusicModule Module);
-extern DELPHI_PACKAGE int __stdcall FMUSIC_GetPattern(Fmod::Types::PFMusicModule Module);
-extern DELPHI_PACKAGE int __stdcall FMUSIC_GetSpeed(Fmod::Types::PFMusicModule Module);
-extern DELPHI_PACKAGE int __stdcall FMUSIC_GetBPM(Fmod::Types::PFMusicModule Module);
-extern DELPHI_PACKAGE int __stdcall FMUSIC_GetRow(Fmod::Types::PFMusicModule Module);
-extern DELPHI_PACKAGE System::ByteBool __stdcall FMUSIC_GetPaused(Fmod::Types::PFMusicModule Module);
-extern DELPHI_PACKAGE int __stdcall FMUSIC_GetTime(Fmod::Types::PFMusicModule Module);
-extern DELPHI_PACKAGE int __stdcall FMUSIC_GetRealChannel(Fmod::Types::PFMusicModule Module, int modchannel);
-extern DELPHI_PACKAGE int __stdcall FMUSIC_GetUserData(Fmod::Types::PFMusicModule Module);
-}	/* namespace Import */
-}	/* namespace Fmod */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FMOD_IMPORT)
-using namespace Fmod::Import;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FMOD)
-using namespace Fmod;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// FMOD_ImportHPP

include/Win32/FMOD.errors.hpp

@@ -1,44 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'FMOD.errors.pas' rev: 36.00 (Windows)
-
-#ifndef FMOD_errorsHPP
-#define FMOD_errorsHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <FMOD.types.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Fmod
-{
-namespace Errors
-{
-//-- forward type declarations -----------------------------------------------
-//-- type declarations -------------------------------------------------------
-//-- var, const, procedure ---------------------------------------------------
-extern DELPHI_PACKAGE System::WideChar * __fastcall FMOD_ErrorString(Fmod::Types::TFModErrors ErrorCode);
-}	/* namespace Errors */
-}	/* namespace Fmod */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FMOD_ERRORS)
-using namespace Fmod::Errors;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FMOD)
-using namespace Fmod;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// FMOD_errorsHPP

include/Win32/FMOD.presets.hpp

@@ -1,70 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'FMOD.presets.pas' rev: 36.00 (Windows)
-
-#ifndef FMOD_presetsHPP
-#define FMOD_presetsHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <FMOD.types.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Fmod
-{
-namespace Presets
-{
-//-- forward type declarations -----------------------------------------------
-//-- type declarations -------------------------------------------------------
-//-- var, const, procedure ---------------------------------------------------
-extern DELPHI_PACKAGE Fmod::Types::TFSoundReverbProperties FSOUND_PRESET_OFF;
-extern DELPHI_PACKAGE Fmod::Types::TFSoundReverbProperties FSOUND_PRESET_GENERIC;
-extern DELPHI_PACKAGE Fmod::Types::TFSoundReverbProperties FSOUND_PRESET_PADDEDCELL;
-extern DELPHI_PACKAGE Fmod::Types::TFSoundReverbProperties FSOUND_PRESET_ROOM;
-extern DELPHI_PACKAGE Fmod::Types::TFSoundReverbProperties FSOUND_PRESET_BATHROOM;
-extern DELPHI_PACKAGE Fmod::Types::TFSoundReverbProperties FSOUND_PRESET_LIVINGROOM;
-extern DELPHI_PACKAGE Fmod::Types::TFSoundReverbProperties FSOUND_PRESET_STONEROOM;
-extern DELPHI_PACKAGE Fmod::Types::TFSoundReverbProperties FSOUND_PRESET_AUDITORIUM;
-extern DELPHI_PACKAGE Fmod::Types::TFSoundReverbProperties FSOUND_PRESET_CONCERTHALL;
-extern DELPHI_PACKAGE Fmod::Types::TFSoundReverbProperties FSOUND_PRESET_CAVE;
-extern DELPHI_PACKAGE Fmod::Types::TFSoundReverbProperties FSOUND_PRESET_ARENA;
-extern DELPHI_PACKAGE Fmod::Types::TFSoundReverbProperties FSOUND_PRESET_HANGAR;
-extern DELPHI_PACKAGE Fmod::Types::TFSoundReverbProperties FSOUND_PRESET_CARPETTEDHALLWAY;
-extern DELPHI_PACKAGE Fmod::Types::TFSoundReverbProperties FSOUND_PRESET_HALLWAY;
-extern DELPHI_PACKAGE Fmod::Types::TFSoundReverbProperties FSOUND_PRESET_STONECORRIDOR;
-extern DELPHI_PACKAGE Fmod::Types::TFSoundReverbProperties FSOUND_PRESET_ALLEY;
-extern DELPHI_PACKAGE Fmod::Types::TFSoundReverbProperties FSOUND_PRESET_FOREST;
-extern DELPHI_PACKAGE Fmod::Types::TFSoundReverbProperties FSOUND_PRESET_CITY;
-extern DELPHI_PACKAGE Fmod::Types::TFSoundReverbProperties FSOUND_PRESET_MOUNTAINS;
-extern DELPHI_PACKAGE Fmod::Types::TFSoundReverbProperties FSOUND_PRESET_QUARRY;
-extern DELPHI_PACKAGE Fmod::Types::TFSoundReverbProperties FSOUND_PRESET_PLAIN;
-extern DELPHI_PACKAGE Fmod::Types::TFSoundReverbProperties FSOUND_PRESET_PARKINGLOT;
-extern DELPHI_PACKAGE Fmod::Types::TFSoundReverbProperties FSOUND_PRESET_SEWERPIPE;
-extern DELPHI_PACKAGE Fmod::Types::TFSoundReverbProperties FSOUND_PRESET_UNDERWATER;
-extern DELPHI_PACKAGE Fmod::Types::TFSoundReverbProperties FSOUND_PRESET_DRUGGED;
-extern DELPHI_PACKAGE Fmod::Types::TFSoundReverbProperties FSOUND_PRESET_DIZZY;
-extern DELPHI_PACKAGE Fmod::Types::TFSoundReverbProperties FSOUND_PRESET_PSYCHOTIC;
-}	/* namespace Presets */
-}	/* namespace Fmod */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FMOD_PRESETS)
-using namespace Fmod::Presets;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FMOD)
-using namespace Fmod;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// FMOD_presetsHPP

include/Win32/FMOD.types.hpp

@@ -1,264 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'FMOD.types.pas' rev: 36.00 (Windows)
-
-#ifndef FMOD_typesHPP
-#define FMOD_typesHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <Winapi.Windows.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Fmod
-{
-namespace Types
-{
-//-- forward type declarations -----------------------------------------------
-struct TFSoundVector;
-struct TFSoundReverbProperties;
-struct TFSoundReverbChannelProperties;
-struct TFSoundTOCTag;
-//-- type declarations -------------------------------------------------------
-typedef void * PFSoundSample;
-
-typedef void * PFSoundStream;
-
-typedef void * PFSoundDSPUnit;
-
-typedef void * PFMusicModule;
-
-typedef void * PFSyncPoint;
-
-typedef TFSoundVector *PFSoundVector;
-
-struct DECLSPEC_DRECORD TFSoundVector
-{
-public:
-	float x;
-	float y;
-	float z;
-};
-
-
-typedef System::ByteBool __stdcall (*TFSoundStreamCallback)(PFSoundStream Stream, void * Buff, int Length, int Param);
-
-typedef void * __stdcall (*TFSoundDSPCallback)(void * OriginalBuffer, void * NewBuffer, int Length, int Param);
-
-typedef void __stdcall (*TFMusicCallback)(PFMusicModule Module, System::Byte Param);
-
-typedef unsigned __stdcall (*TFSoundOpenCallback)(System::WideChar * Name);
-
-typedef void __stdcall (*TFSoundCloseCallback)(unsigned Handle);
-
-typedef unsigned __stdcall (*TFSoundReadCallback)(void * Buffer, unsigned Size, unsigned Handle);
-
-typedef void __stdcall (*TFSoundSeekCallback)(unsigned Handle, unsigned Pos, System::Byte Mode);
-
-typedef unsigned __stdcall (*TFSoundTellCallback)(unsigned Handle);
-
-typedef void * __stdcall (*TFSoundAllocCallback)(unsigned Size);
-
-typedef void * __stdcall (*TFSoundReallocCallback)(void * Ptr, unsigned Size);
-
-typedef void __stdcall (*TFSoundFreeCallback)(void * Ptr);
-
-typedef System::ByteBool __stdcall (*TFMetaDataCallback)(System::WideChar * Name, System::WideChar * Value, int userdata);
-
-enum DECLSPEC_DENUM TFModErrors : unsigned int { FMOD_ERR_NONE, FMOD_ERR_BUSY, FMOD_ERR_UNINITIALIZED, FMOD_ERR_INIT, FMOD_ERR_ALLOCATED, FMOD_ERR_PLAY, FMOD_ERR_OUTPUT_FORMAT, FMOD_ERR_COOPERATIVELEVEL, FMOD_ERR_CREATEBUFFER, FMOD_ERR_FILE_NOTFOUND, FMOD_ERR_FILE_FORMAT, FMOD_ERR_FILE_BAD, FMOD_ERR_MEMORY, FMOD_ERR_VERSION, FMOD_ERR_INVALID_PARAM, FMOD_ERR_NO_EAX, FMOD_ERR_CHANNEL_ALLOC, FMOD_ERR_RECORD, FMOD_ERR_MEDIAPLAYER, FMOD_ERR_CDDEVICE };
-
-enum DECLSPEC_DENUM TFSoundOutputTypes : unsigned int { FSOUND_OUTPUT_NOSOUND, FSOUND_OUTPUT_WINMM, FSOUND_OUTPUT_DSOUND, FSOUND_OUTPUT_A3D, FSOUND_OUTPUT_OSS, FSOUND_OUTPUT_ESD, FSOUND_OUTPUT_ALSA, FSOUND_OUTPUT_ASIO, FSOUND_OUTPUT_XBOX, FSOUND_OUTPUT_PS2, FSOUND_OUTPUT_MAC, FSOUND_OUTPUT_GC, FSOUND_OUTPUT_PSP, FSOUND_OUTPUT_NOSOUND_NONREALTIME };
-
-enum DECLSPEC_DENUM TFSoundMixerTypes : unsigned int { FSOUND_MIXER_AUTODETECT, FSOUND_MIXER_BLENDMODE, FSOUND_MIXER_MMXP5, FSOUND_MIXER_MMXP6, FSOUND_MIXER_QUALITY_AUTODETECT, FSOUND_MIXER_QUALITY_FPU, FSOUND_MIXER_QUALITY_MMXP5, FSOUND_MIXER_QUALITY_MMXP6, FSOUND_MIXER_MONO, FSOUND_MIXER_QUALITY_MONO, FSOUND_MIXER_MAX };
-
-enum DECLSPEC_DENUM TFMusicTypes : unsigned int { FMUSIC_TYPE_NONE, FMUSIC_TYPE_MOD, FMUSIC_TYPE_S3M, FMUSIC_TYPE_XM, FMUSIC_TYPE_IT, FMUSIC_TYPE_MIDI, FMUSIC_TYPE_FSB };
-
-struct DECLSPEC_DRECORD TFSoundReverbProperties
-{
-public:
-	unsigned Environment;
-	float EnvSize;
-	float EnvDiffusion;
-	int Room;
-	int RoomHF;
-	int RoomLF;
-	float DecayTime;
-	float DecayHFRatio;
-	float DecayLFRatio;
-	int Reflections;
-	float ReflectionsDelay;
-	System::StaticArray<float, 3> ReflectionsPan;
-	int Reverb;
-	float ReverbDelay;
-	System::StaticArray<float, 3> ReverbPan;
-	float EchoTime;
-	float EchoDepth;
-	float ModulationTime;
-	float ModulationDepth;
-	float AirAbsorptionHF;
-	float HFReference;
-	float LFReference;
-	float RoomRolloffFactor;
-	float Diffusion;
-	float Density;
-	unsigned Flags;
-};
-
-
-struct DECLSPEC_DRECORD TFSoundReverbChannelProperties
-{
-public:
-	int Direct;
-	int DirectHF;
-	int Room;
-	int RoomHF;
-	int Obstruction;
-	float ObstructionLFRatio;
-	int Occlusion;
-	float OcclusionLFRatio;
-	float OcclusionRoomRatio;
-	float OcclusionDirectRatio;
-	int Exclusion;
-	float ExclusionLFRatio;
-	int OutsideVolumeHF;
-	float DopplerFactor;
-	float RolloffFactor;
-	float RoomRolloffFactor;
-	float AirAbsorptionFactor;
-	int Flags;
-};
-
-
-enum DECLSPEC_DENUM TFSoundFXModes : unsigned int { FSOUND_FX_CHORUS, FSOUND_FX_COMPRESSOR, FSOUND_FX_DISTORTION, FSOUND_FX_ECHO, FSOUND_FX_FLANGER, FSOUND_FX_GARGLE, FSOUND_FX_I3DL2REVERB, FSOUND_FX_PARAMEQ, FSOUND_FX_WAVES_REVERB, FSOUND_FX_MAX };
-
-enum DECLSPEC_DENUM TFSoundSpeakerModes : unsigned int { FSOUND_SPEAKERMODE_DOLBYDIGITAL, FSOUND_SPEAKERMODE_HEADPHONES, FSOUND_SPEAKERMODE_MONO, FSOUND_SPEAKERMODE_QUAD, FSOUND_SPEAKERMODE_STEREO, FSOUND_SPEAKERMODE_SURROUND, FSOUND_SPEAKERMODE_DTS };
-
-typedef TFSoundSpeakerModes FSOUND_SPEAKERMODES;
-
-enum DECLSPEC_DENUM TFSoundStreamNetStatus : unsigned int { FSOUND_STREAM_NET_NOTCONNECTED, FSOUND_STREAM_NET_CONNECTING, FSOUND_STREAM_NET_BUFFERING, FSOUND_STREAM_NET_READY, FSOUND_STREAM_NET_ERROR };
-
-enum DECLSPEC_DENUM TFSoundTagFieldType : unsigned int { FSOUND_TAGFIELD_VORBISCOMMENT, FSOUND_TAGFIELD_ID3V1, FSOUND_TAGFIELD_ID3V2, FSOUND_TAGFIELD_SHOUTCAST, FSOUND_TAGFIELD_ICECAST, FSOUND_TAGFIELD_ASF };
-
-struct DECLSPEC_DRECORD TFSoundTOCTag
-{
-public:
-	System::StaticArray<char, 4> Name;
-	int NumTracks;
-	System::StaticArray<int, 100> Min;
-	System::StaticArray<int, 100> Sec;
-	System::StaticArray<int, 100> Frame;
-};
-
-
-//-- var, const, procedure ---------------------------------------------------
-extern DELPHI_PACKAGE float FMOD_VERSION;
-static _DELPHI_CONST System::Int8 FSOUND_DSP_DEFAULTPRIORITY_CLEARUNIT = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 FSOUND_DSP_DEFAULTPRIORITY_SFXUNIT = System::Int8(0x64);
-static _DELPHI_CONST System::Byte FSOUND_DSP_DEFAULTPRIORITY_MUSICUNIT = System::Byte(0xc8);
-static _DELPHI_CONST System::Word FSOUND_DSP_DEFAULTPRIORITY_USER = System::Word(0x12c);
-static _DELPHI_CONST System::Word FSOUND_DSP_DEFAULTPRIORITY_FFTUNIT = System::Word(0x384);
-static _DELPHI_CONST System::Word FSOUND_DSP_DEFAULTPRIORITY_CLIPANDCOPYUNIT = System::Word(0x3e8);
-static _DELPHI_CONST System::Int8 FSOUND_CAPS_HARDWARE = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 FSOUND_CAPS_EAX2 = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 FSOUND_CAPS_EAX3 = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 FSOUND_LOOP_OFF = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 FSOUND_LOOP_NORMAL = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 FSOUND_LOOP_BIDI = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 FSOUND_8BITS = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 FSOUND_16BITS = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 FSOUND_MONO = System::Int8(0x20);
-static _DELPHI_CONST System::Int8 FSOUND_STEREO = System::Int8(0x40);
-static _DELPHI_CONST System::Byte FSOUND_UNSIGNED = System::Byte(0x80);
-static _DELPHI_CONST System::Word FSOUND_SIGNED = System::Word(0x100);
-static _DELPHI_CONST System::Word FSOUND_DELTA = System::Word(0x200);
-static _DELPHI_CONST System::Word FSOUND_IT214 = System::Word(0x400);
-static _DELPHI_CONST System::Word FSOUND_IT215 = System::Word(0x800);
-static _DELPHI_CONST System::Word FSOUND_HW3D = System::Word(0x1000);
-static _DELPHI_CONST System::Word FSOUND_2D = System::Word(0x2000);
-static _DELPHI_CONST System::Word FSOUND_STREAMABLE = System::Word(0x4000);
-static _DELPHI_CONST System::Word FSOUND_LOADMEMORY = System::Word(0x8000);
-static _DELPHI_CONST int FSOUND_LOADRAW = int(0x10000);
-static _DELPHI_CONST int FSOUND_MPEGACCURATE = int(0x20000);
-static _DELPHI_CONST int FSOUND_FORCEMONO = int(0x40000);
-static _DELPHI_CONST int FSOUND_HW2D = int(0x80000);
-static _DELPHI_CONST int FSOUND_ENABLEFX = int(0x100000);
-static _DELPHI_CONST int FSOUND_MPEGHALFRATE = int(0x200000);
-static _DELPHI_CONST int FSOUND_XADPCM = int(0x400000);
-static _DELPHI_CONST int FSOUND_VAG = int(0x800000);
-static _DELPHI_CONST int FSOUND_NONBLOCKING = int(0x1000000);
-static _DELPHI_CONST int FSOUND_GCADPCM = int(0x2000000);
-static _DELPHI_CONST int FSOUND_MULTICHANNEL = int(0x4000000);
-static _DELPHI_CONST int FSOUND_USECORE0 = int(0x8000000);
-static _DELPHI_CONST int FSOUND_USECORE1 = int(0x10000000);
-static _DELPHI_CONST int FSOUND_LOADMEMORYIOP = int(0x20000000);
-static _DELPHI_CONST System::Word FSOUND_NORMAL = System::Word(0x130);
-static _DELPHI_CONST System::Int8 FSOUND_CD_PLAYCONTINUOUS = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 FSOUND_CD_PLAYONCE = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 FSOUND_CD_PLAYLOOPED = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 FSOUND_CD_PLAYRANDOM = System::Int8(0x3);
-static _DELPHI_CONST System::Int8 FSOUND_FREE = System::Int8(-1);
-static _DELPHI_CONST System::Int8 FSOUND_UNMANAGED = System::Int8(-2);
-static _DELPHI_CONST System::Int8 FSOUND_ALL = System::Int8(-3);
-static _DELPHI_CONST System::Int8 FSOUND_STEREOPAN = System::Int8(-1);
-static _DELPHI_CONST short FSOUND_SYSTEMCHANNEL = short(-1000);
-static _DELPHI_CONST short FSOUND_SYSTEMSAMPLE = short(-1000);
-static _DELPHI_CONST System::Int8 FSOUND_REVERBFLAGS_DECAYTIMESCALE = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 FSOUND_REVERBFLAGS_REFLECTIONSSCALE = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 FSOUND_REVERBFLAGS_REFLECTIONSDELAYSCALE = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 FSOUND_REVERBFLAGS_REVERBSCALE = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 FSOUND_REVERBFLAGS_REVERBDELAYSCALE = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 FSOUND_REVERBFLAGS_DECAYHFLIMIT = System::Int8(0x20);
-static _DELPHI_CONST System::Int8 FSOUND_REVERBFLAGS_ECHOTIMESCALE = System::Int8(0x40);
-static _DELPHI_CONST System::Byte FSOUND_REVERBFLAGS_MODULATIONTIMESCALE = System::Byte(0x80);
-static _DELPHI_CONST System::Word FSOUND_REVERB_FLAGS_CORE0 = System::Word(0x100);
-static _DELPHI_CONST System::Word FSOUND_REVERB_FLAGS_CORE1 = System::Word(0x200);
-static _DELPHI_CONST System::Word FSOUND_REVERBFLAGS_DEFAULT = System::Word(0x33f);
-static _DELPHI_CONST System::Int8 FSOUND_REVERB_CHANNELFLAGS_DIRECTHFAUTO = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 FSOUND_REVERB_CHANNELFLAGS_ROOMAUTO = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 FSOUND_REVERB_CHANNELFLAGS_ROOMHFAUTO = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 FSOUND_REVERB_CHANNELFLAGS_DEFAULT = System::Int8(0x7);
-static _DELPHI_CONST System::Int8 FSOUND_INIT_USEDEFAULTMIDISYNTH = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 FSOUND_INIT_GLOBALFOCUS = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 FSOUND_INIT_ENABLESYSTEMCHANNELFX = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 FSOUND_INIT_ACCURATEVULEVELS = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 FSOUND_INIT_PS2_DISABLECORE0REVERB = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 FSOUND_INIT_PS2_DISABLECORE1REVERB = System::Int8(0x20);
-static _DELPHI_CONST System::Int8 FSOUND_INIT_PS2_SWAPDMACORES = System::Int8(0x40);
-static _DELPHI_CONST System::Byte FSOUND_INIT_DONTLATENCYADJUST = System::Byte(0x80);
-static _DELPHI_CONST System::Word FSOUND_INIT_GC_INITLIBS = System::Word(0x100);
-static _DELPHI_CONST System::Word FSOUND_INIT_STREAM_FROM_MAIN_THREAD = System::Word(0x200);
-static _DELPHI_CONST System::Word FSOUND_INIT_PS2_USEVOLUMERAMPING = System::Word(0x400);
-static _DELPHI_CONST System::Word FSOUND_INIT_DSOUND_DEFERRED = System::Word(0x800);
-static _DELPHI_CONST System::Word FSOUND_INIT_DSOUND_HRTF_LIGHT = System::Word(0x1000);
-static _DELPHI_CONST System::Word FSOUND_INIT_DSOUND_HRTF_FULL = System::Word(0x2000);
-static _DELPHI_CONST System::Word FSOUND_INIT_XBOX_REMOVEHEADROOM = System::Word(0x4000);
-static _DELPHI_CONST System::Word FSOUND_INIT_PSP_SILENCEONUNDERRUN = System::Word(0x8000);
-static _DELPHI_CONST System::Int8 FSOUND_PROTOCOL_SHOUTCAST = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 FSOUND_PROTOCOL_ICECAST = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 FSOUND_PROTOCOL_HTTP = System::Int8(0x4);
-static _DELPHI_CONST int FSOUND_FORMAT_MPEG = int(0x10000);
-static _DELPHI_CONST int FSOUND_FORMAT_OGGVORBIS = int(0x20000);
-}	/* namespace Types */
-}	/* namespace Fmod */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FMOD_TYPES)
-using namespace Fmod::Types;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FMOD)
-using namespace Fmod;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// FMOD_typesHPP

include/Win32/FRColorEditor.hpp

@@ -1,115 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'FRColorEditor.pas' rev: 36.00 (Windows)
-
-#ifndef FRColorEditorHPP
-#define FRColorEditorHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <Winapi.Windows.hpp>
-#include <System.Classes.hpp>
-#include <System.SysUtils.hpp>
-#include <System.Types.hpp>
-#include <Vcl.Forms.hpp>
-#include <Vcl.StdCtrls.hpp>
-#include <Vcl.ComCtrls.hpp>
-#include <Vcl.ExtCtrls.hpp>
-#include <Vcl.Dialogs.hpp>
-#include <Vcl.Controls.hpp>
-#include <Vcl.Graphics.hpp>
-#include <Stage.VectorGeometry.hpp>
-#include <GLS.Color.hpp>
-#include <GLS.Texture.hpp>
-#include <Stage.VectorTypes.hpp>
-#include <System.UITypes.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Frcoloreditor
-{
-//-- forward type declarations -----------------------------------------------
-class DELPHICLASS TRColorEditor;
-//-- type declarations -------------------------------------------------------
-class PASCALIMPLEMENTATION TRColorEditor : public Vcl::Forms::TFrame
-{
-	typedef Vcl::Forms::TFrame inherited;
-	
-	
-private:
-	enum DECLSPEC_DENUM _TRColorEditor__1 : unsigned char { None, Red, Green, Blue, Alpha };
-	
-	
-__published:
-	Vcl::Stdctrls::TLabel* Label1;
-	Vcl::Stdctrls::TLabel* Label2;
-	Vcl::Stdctrls::TLabel* Label3;
-	Vcl::Stdctrls::TLabel* Label4;
-	Vcl::Extctrls::TPanel* PAPreview;
-	Vcl::Dialogs::TColorDialog* ColorDialog;
-	Vcl::Extctrls::TPanel* Panel1;
-	Vcl::Extctrls::TPaintBox* ColorEditorPaintBox;
-	Vcl::Stdctrls::TEdit* RedEdit;
-	Vcl::Stdctrls::TEdit* GreenEdit;
-	Vcl::Stdctrls::TEdit* BlueEdit;
-	Vcl::Stdctrls::TEdit* AlphaEdit;
-	void __fastcall TBEChange(System::TObject* Sender);
-	void __fastcall PAPreviewDblClick(System::TObject* Sender);
-	void __fastcall ColorEditorPaintBoxPaint(System::TObject* Sender);
-	void __fastcall FrameResize(System::TObject* Sender);
-	void __fastcall ColorEditorPaintBoxMouseDown(System::TObject* Sender, System::Uitypes::TMouseButton Button, System::Classes::TShiftState Shift, int X, int Y);
-	void __fastcall ColorEditorPaintBoxMouseMove(System::TObject* Sender, System::Classes::TShiftState Shift, int X, int Y);
-	void __fastcall ColorEditorPaintBoxMouseUp(System::TObject* Sender, System::Uitypes::TMouseButton Button, System::Classes::TShiftState Shift, int X, int Y);
-	void __fastcall RedEditChange(System::TObject* Sender);
-	void __fastcall GreenEditChange(System::TObject* Sender);
-	void __fastcall BlueEditChange(System::TObject* Sender);
-	void __fastcall AlphaEditChange(System::TObject* Sender);
-	
-private:
-	System::Classes::TNotifyEvent FOnChange;
-	bool updating;
-	Vcl::Graphics::TBitmap* WorkBitmap;
-	int RedValue;
-	int GreenValue;
-	int BlueValue;
-	int AlphaVAlue;
-	_TRColorEditor__1 DraggingValue;
-	HIDESBASE void __fastcall SetColor(const Stage::Vectorgeometry::THomogeneousFltVector &val);
-	Stage::Vectorgeometry::THomogeneousFltVector __fastcall GetColor();
-	void __fastcall DrawContents();
-	void __fastcall DragColorSliderToPosition(int XPos);
-	void __fastcall ContentsChanged();
-	
-public:
-	__fastcall virtual TRColorEditor(System::Classes::TComponent* AOwner);
-	__fastcall virtual ~TRColorEditor();
-	__property Stage::Vectorgeometry::THomogeneousFltVector Color = {read=GetColor, write=SetColor};
-	
-__published:
-	__property System::Classes::TNotifyEvent OnChange = {read=FOnChange, write=FOnChange};
-public:
-	/* TWinControl.CreateParented */ inline __fastcall TRColorEditor(HWND ParentWindow) : Vcl::Forms::TFrame(ParentWindow) { }
-	
-};
-
-
-//-- var, const, procedure ---------------------------------------------------
-}	/* namespace Frcoloreditor */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FRCOLOREDITOR)
-using namespace Frcoloreditor;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// FRColorEditorHPP

include/Win32/FRFaceEditor.hpp

@@ -1,89 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'FRFaceEditor.pas' rev: 36.00 (Windows)
-
-#ifndef FRFaceEditorHPP
-#define FRFaceEditorHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <Winapi.Windows.hpp>
-#include <System.Classes.hpp>
-#include <System.SysUtils.hpp>
-#include <System.ImageList.hpp>
-#include <Vcl.Forms.hpp>
-#include <Vcl.ComCtrls.hpp>
-#include <Vcl.StdCtrls.hpp>
-#include <Vcl.ImgList.hpp>
-#include <Vcl.Controls.hpp>
-#include <Vcl.Graphics.hpp>
-#include <FRTrackBarEdit.hpp>
-#include <FRColorEditor.hpp>
-#include <GLS.Texture.hpp>
-#include <GLS.Material.hpp>
-#include <GLS.State.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Frfaceeditor
-{
-//-- forward type declarations -----------------------------------------------
-class DELPHICLASS TRFaceEditor;
-//-- type declarations -------------------------------------------------------
-class PASCALIMPLEMENTATION TRFaceEditor : public Vcl::Forms::TFrame
-{
-	typedef Vcl::Forms::TFrame inherited;
-	
-__published:
-	Vcl::Comctrls::TPageControl* PageControl;
-	Vcl::Comctrls::TTabSheet* TSAmbient;
-	Vcl::Comctrls::TTabSheet* TSDiffuse;
-	Vcl::Comctrls::TTabSheet* TSEmission;
-	Vcl::Comctrls::TTabSheet* TSSpecular;
-	Frcoloreditor::TRColorEditor* CEAmbiant;
-	Vcl::Stdctrls::TLabel* Label1;
-	Frtrackbaredit::TRTrackBarEdit* TBEShininess;
-	Vcl::Controls::TImageList* ImageList;
-	Frcoloreditor::TRColorEditor* CEDiffuse;
-	Frcoloreditor::TRColorEditor* CEEmission;
-	Frcoloreditor::TRColorEditor* CESpecular;
-	void __fastcall TBEShininessTrackBarChange(System::TObject* Sender);
-	
-private:
-	System::Classes::TNotifyEvent FOnChange;
-	bool Updating;
-	Gls::Material::TGLFaceProperties* FFaceProperties;
-	void __fastcall SetGLFaceProperties(Gls::Material::TGLFaceProperties* const val);
-	void __fastcall OnColorChange(System::TObject* Sender);
-	
-public:
-	__fastcall virtual TRFaceEditor(System::Classes::TComponent* AOwner);
-	__fastcall virtual ~TRFaceEditor();
-	__property System::Classes::TNotifyEvent OnChange = {read=FOnChange, write=FOnChange};
-	__property Gls::Material::TGLFaceProperties* FaceProperties = {read=FFaceProperties, write=SetGLFaceProperties};
-public:
-	/* TWinControl.CreateParented */ inline __fastcall TRFaceEditor(HWND ParentWindow) : Vcl::Forms::TFrame(ParentWindow) { }
-	
-};
-
-
-//-- var, const, procedure ---------------------------------------------------
-}	/* namespace Frfaceeditor */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FRFACEEDITOR)
-using namespace Frfaceeditor;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// FRFaceEditorHPP

include/Win32/FRMaterialPreview.hpp

@@ -1,101 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'FRMaterialPreview.pas' rev: 36.00 (Windows)
-
-#ifndef FRMaterialPreviewHPP
-#define FRMaterialPreviewHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <System.Types.hpp>
-#include <System.Classes.hpp>
-#include <Vcl.Graphics.hpp>
-#include <Vcl.Forms.hpp>
-#include <Vcl.StdCtrls.hpp>
-#include <Vcl.ComCtrls.hpp>
-#include <Vcl.Controls.hpp>
-#include <GLS.Scene.hpp>
-#include <Stage.VectorTypes.hpp>
-#include <GLS.Objects.hpp>
-#include <GLS.Texture.hpp>
-#include <GLS.HUDObjects.hpp>
-#include <GLS.SceneViewer.hpp>
-#include <GLS.GeomObjects.hpp>
-#include <GLS.Color.hpp>
-#include <GLS.Coordinates.hpp>
-#include <GLS.BaseClasses.hpp>
-#include <GLS.Material.hpp>
-#include <System.UITypes.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Frmaterialpreview
-{
-//-- forward type declarations -----------------------------------------------
-class DELPHICLASS TRMaterialPreview;
-//-- type declarations -------------------------------------------------------
-class PASCALIMPLEMENTATION TRMaterialPreview : public Vcl::Forms::TFrame
-{
-	typedef Vcl::Forms::TFrame inherited;
-	
-__published:
-	Gls::Scene::TGLScene* GLScene;
-	Gls::Sceneviewer::TGLSceneViewer* GLSceneViewer;
-	Vcl::Stdctrls::TComboBox* CBObject;
-	Gls::Scene::TGLCamera* Camera;
-	Gls::Objects::TGLCube* Cube;
-	Gls::Objects::TGLSphere* Sphere;
-	Gls::Scene::TGLLightSource* LightSource;
-	Vcl::Stdctrls::TComboBox* CBBackground;
-	Gls::Hudobjects::TGLHUDSprite* BackGroundSprite;
-	Gls::Geomobjects::TGLTeapot* Teapot;
-	Gls::Objects::TGLDummyCube* World;
-	Gls::Objects::TGLDummyCube* Light;
-	Gls::Objects::TGLSphere* FireSphere;
-	Gls::Material::TGLMaterialLibrary* GLMaterialLibrary;
-	void __fastcall CBObjectChange(System::TObject* Sender);
-	void __fastcall CBBackgroundChange(System::TObject* Sender);
-	void __fastcall SceneViewerMouseMove(System::TObject* Sender, System::Classes::TShiftState Shift, int X, int Y);
-	void __fastcall SceneViewerMouseDown(System::TObject* Sender, System::Uitypes::TMouseButton Button, System::Classes::TShiftState Shift, int X, int Y);
-	void __fastcall SceneViewerMouseWheel(System::TObject* Sender, System::Classes::TShiftState Shift, int WheelDelta, const System::Types::TPoint &MousePos, bool &Handled);
-	
-private:
-	Gls::Material::TGLAbstractLibMaterial* FLibMaterial;
-	Gls::Material::TGLMaterial* __fastcall GetMaterial();
-	void __fastcall SetMaterial(Gls::Material::TGLMaterial* const Value);
-	Gls::Material::TGLAbstractLibMaterial* __fastcall GetLibMaterial();
-	void __fastcall SetLibMaterial(Gls::Material::TGLAbstractLibMaterial* const Value);
-	
-public:
-	__fastcall virtual TRMaterialPreview(System::Classes::TComponent* AOwner);
-	__property Gls::Material::TGLMaterial* Material = {read=GetMaterial, write=SetMaterial};
-	__property Gls::Material::TGLAbstractLibMaterial* LibMaterial = {read=GetLibMaterial, write=SetLibMaterial};
-public:
-	/* TScrollingWinControl.Destroy */ inline __fastcall virtual ~TRMaterialPreview() { }
-	
-public:
-	/* TWinControl.CreateParented */ inline __fastcall TRMaterialPreview(HWND ParentWindow) : Vcl::Forms::TFrame(ParentWindow) { }
-	
-};
-
-
-//-- var, const, procedure ---------------------------------------------------
-}	/* namespace Frmaterialpreview */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FRMATERIALPREVIEW)
-using namespace Frmaterialpreview;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// FRMaterialPreviewHPP

include/Win32/FRTextureEdit.hpp

@@ -1,100 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'FRTextureEdit.pas' rev: 36.00 (Windows)
-
-#ifndef FRTextureEditHPP
-#define FRTextureEditHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <System.Classes.hpp>
-#include <System.SysUtils.hpp>
-#include <System.TypInfo.hpp>
-#include <Vcl.Forms.hpp>
-#include <Vcl.StdCtrls.hpp>
-#include <Vcl.Buttons.hpp>
-#include <Vcl.Controls.hpp>
-#include <GLS.Graphics.hpp>
-#include <Stage.TextureFormat.hpp>
-#include <GLS.Texture.hpp>
-#include <GLS.State.hpp>
-#include <GLS.TextureImageEditors.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Frtextureedit
-{
-//-- forward type declarations -----------------------------------------------
-class DELPHICLASS TRTextureEdit;
-//-- type declarations -------------------------------------------------------
-class PASCALIMPLEMENTATION TRTextureEdit : public Vcl::Forms::TFrame
-{
-	typedef Vcl::Forms::TFrame inherited;
-	
-__published:
-	Vcl::Stdctrls::TLabel* Label2;
-	Vcl::Buttons::TSpeedButton* SBEditImage;
-	Vcl::Stdctrls::TComboBox* CBMagFilter;
-	Vcl::Stdctrls::TLabel* Label3;
-	Vcl::Stdctrls::TLabel* Label4;
-	Vcl::Stdctrls::TComboBox* CBMinFilter;
-	Vcl::Stdctrls::TComboBox* CBTextureMode;
-	Vcl::Stdctrls::TLabel* Label1;
-	Vcl::Stdctrls::TLabel* Label5;
-	Vcl::Stdctrls::TComboBox* CBTextureWrap;
-	Vcl::Stdctrls::TCheckBox* CBDisabled;
-	Vcl::Stdctrls::TComboBox* CBImageClass;
-	Vcl::Stdctrls::TComboBox* CBImageAlpha;
-	Vcl::Stdctrls::TLabel* Label6;
-	Vcl::Stdctrls::TComboBox* CBFilteringQuality;
-	Vcl::Stdctrls::TLabel* Label7;
-	void __fastcall CBMagFilterChange(System::TObject* Sender);
-	void __fastcall CBMinFilterChange(System::TObject* Sender);
-	void __fastcall CBTextureModeChange(System::TObject* Sender);
-	void __fastcall CBTextureWrapChange(System::TObject* Sender);
-	void __fastcall CBDisabledClick(System::TObject* Sender);
-	void __fastcall SBEditImageClick(System::TObject* Sender);
-	void __fastcall CBImageClassChange(System::TObject* Sender);
-	void __fastcall CBImageAlphaChange(System::TObject* Sender);
-	void __fastcall CBFilteringQualityChange(System::TObject* Sender);
-	
-private:
-	Gls::Texture::TGLTexture* FTexture;
-	System::Classes::TNotifyEvent FOnChange;
-	bool Changeing;
-	
-protected:
-	void __fastcall SetTexture(Gls::Texture::TGLTexture* const val);
-	virtual void __fastcall DoOnChange();
-	
-public:
-	__fastcall virtual TRTextureEdit(System::Classes::TComponent* AOwner);
-	__fastcall virtual ~TRTextureEdit();
-	__property Gls::Texture::TGLTexture* Texture = {read=FTexture, write=SetTexture};
-	__property System::Classes::TNotifyEvent OnChange = {read=FOnChange, write=FOnChange};
-public:
-	/* TWinControl.CreateParented */ inline __fastcall TRTextureEdit(HWND ParentWindow) : Vcl::Forms::TFrame(ParentWindow) { }
-	
-};
-
-
-//-- var, const, procedure ---------------------------------------------------
-}	/* namespace Frtextureedit */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FRTEXTUREEDIT)
-using namespace Frtextureedit;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// FRTextureEditHPP

include/Win32/FRTrackBarEdit.hpp

@@ -1,77 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'FRTrackBarEdit.pas' rev: 36.00 (Windows)
-
-#ifndef FRTrackBarEditHPP
-#define FRTrackBarEditHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <System.Classes.hpp>
-#include <System.SysUtils.hpp>
-#include <Vcl.Forms.hpp>
-#include <Vcl.StdCtrls.hpp>
-#include <Vcl.ComCtrls.hpp>
-#include <Vcl.Controls.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Frtrackbaredit
-{
-//-- forward type declarations -----------------------------------------------
-class DELPHICLASS TRTrackBarEdit;
-//-- type declarations -------------------------------------------------------
-class PASCALIMPLEMENTATION TRTrackBarEdit : public Vcl::Forms::TFrame
-{
-	typedef Vcl::Forms::TFrame inherited;
-	
-__published:
-	Vcl::Comctrls::TTrackBar* TrackBar;
-	Vcl::Stdctrls::TEdit* Edit;
-	void __fastcall TrackBarChange(System::TObject* Sender);
-	void __fastcall EditChange(System::TObject* Sender);
-	
-private:
-	void __fastcall SetValue(const int val);
-	int __fastcall GetValue();
-	void __fastcall SetValueMin(const int val);
-	int __fastcall GetValueMin();
-	void __fastcall SetValueMax(const int val);
-	int __fastcall GetValueMax();
-	
-public:
-	__property int Value = {read=GetValue, write=SetValue, nodefault};
-	__property int ValueMin = {read=GetValueMin, write=SetValueMin, nodefault};
-	__property int ValueMax = {read=GetValueMax, write=SetValueMax, nodefault};
-public:
-	/* TCustomFrame.Create */ inline __fastcall virtual TRTrackBarEdit(System::Classes::TComponent* AOwner) : Vcl::Forms::TFrame(AOwner) { }
-	
-public:
-	/* TScrollingWinControl.Destroy */ inline __fastcall virtual ~TRTrackBarEdit() { }
-	
-public:
-	/* TWinControl.CreateParented */ inline __fastcall TRTrackBarEdit(HWND ParentWindow) : Vcl::Forms::TFrame(ParentWindow) { }
-	
-};
-
-
-//-- var, const, procedure ---------------------------------------------------
-}	/* namespace Frtrackbaredit */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FRTRACKBAREDIT)
-using namespace Frtrackbaredit;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// FRTrackBarEditHPP

include/Win32/FmCUDAEditor.hpp

@@ -1,103 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'FmCUDAEditor.pas' rev: 36.00 (Windows)
-
-#ifndef FmCUDAEditorHPP
-#define FmCUDAEditorHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <Winapi.Windows.hpp>
-#include <Winapi.Messages.hpp>
-#include <System.SysUtils.hpp>
-#include <System.Variants.hpp>
-#include <System.Classes.hpp>
-#include <System.Win.Registry.hpp>
-#include <System.ImageList.hpp>
-#include <Vcl.Graphics.hpp>
-#include <Vcl.Controls.hpp>
-#include <Vcl.Forms.hpp>
-#include <Vcl.Dialogs.hpp>
-#include <Vcl.ImgList.hpp>
-#include <Vcl.StdCtrls.hpp>
-#include <Vcl.ComCtrls.hpp>
-#include <Vcl.ToolWin.hpp>
-#include <DesignIntf.hpp>
-#include <VCLEditors.hpp>
-#include <Stage.Strings.hpp>
-#include <GLS.CUDA.APIComps.hpp>
-#include <GLS.CUDA.FFTPlan.hpp>
-#include <GLS.CUDA.Graphics.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Fmcudaeditor
-{
-//-- forward type declarations -----------------------------------------------
-class DELPHICLASS TGLCUDAEditorForm;
-//-- type declarations -------------------------------------------------------
-class PASCALIMPLEMENTATION TGLCUDAEditorForm : public Vcl::Forms::TForm
-{
-	typedef Vcl::Forms::TForm inherited;
-	
-__published:
-	Vcl::Comctrls::TToolBar* ToolBar1;
-	Vcl::Comctrls::TToolButton* AddModuleButton;
-	Vcl::Comctrls::TToolButton* DeleteButton;
-	Vcl::Stdctrls::TListBox* ListBox1;
-	Vcl::Controls::TImageList* ImageList1;
-	Vcl::Comctrls::TToolButton* AddMemDataButton;
-	Vcl::Comctrls::TToolButton* AddFFTPlanButton;
-	Vcl::Comctrls::TToolButton* AddGeometryResButton;
-	Vcl::Comctrls::TToolButton* AddImageResButton;
-	void __fastcall AddItemButtonClick(System::TObject* Sender);
-	void __fastcall DeleteButtonClick(System::TObject* Sender);
-	void __fastcall FormCreate(System::TObject* Sender);
-	void __fastcall ListBox1Click(System::TObject* Sender);
-	void __fastcall FormDestroy(System::TObject* Sender);
-	
-private:
-	System::Classes::TList* FClassList;
-	Gls::Cuda::Apicomps::TGLCUDA* FCUDA;
-	Designintf::_di_IDesigner FCurrentDesigner;
-	
-protected:
-	virtual void __fastcall Notification(System::Classes::TComponent* AComponent, System::Classes::TOperation Operation);
-	void __fastcall OnCUDAComponentNameChanged(System::TObject* Sender);
-	
-public:
-	void __fastcall SetCUDAEditorClient(Gls::Cuda::Apicomps::TGLCUDA* Client, Designintf::_di_IDesigner Designer);
-public:
-	/* TCustomForm.Create */ inline __fastcall virtual TGLCUDAEditorForm(System::Classes::TComponent* AOwner) : Vcl::Forms::TForm(AOwner) { }
-	/* TCustomForm.CreateNew */ inline __fastcall virtual TGLCUDAEditorForm(System::Classes::TComponent* AOwner, int Dummy) : Vcl::Forms::TForm(AOwner, Dummy) { }
-	/* TCustomForm.CreateScaledNew */ inline __fastcall virtual TGLCUDAEditorForm(System::Classes::TComponent* AOwner, int ADPI, int Dummy) : Vcl::Forms::TForm(AOwner, ADPI, Dummy) { }
-	/* TCustomForm.Destroy */ inline __fastcall virtual ~TGLCUDAEditorForm() { }
-	
-public:
-	/* TWinControl.CreateParented */ inline __fastcall TGLCUDAEditorForm(HWND ParentWindow) : Vcl::Forms::TForm(ParentWindow) { }
-	
-};
-
-
-//-- var, const, procedure ---------------------------------------------------
-extern DELPHI_PACKAGE TGLCUDAEditorForm* __fastcall GLCUDAEditorForm(void);
-extern DELPHI_PACKAGE void __fastcall ReleaseGLCUDAEditorForm(void);
-}	/* namespace Fmcudaeditor */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FMCUDAEDITOR)
-using namespace Fmcudaeditor;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// FmCUDAEditorHPP

include/Win32/FmGuiLayoutEditor.hpp

@@ -1,140 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'FmGuiLayoutEditor.pas' rev: 36.00 (Windows)
-
-#ifndef FmGuiLayoutEditorHPP
-#define FmGuiLayoutEditorHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <Winapi.Windows.hpp>
-#include <Winapi.ShellAPI.hpp>
-#include <System.SysUtils.hpp>
-#include <System.Variants.hpp>
-#include <System.Classes.hpp>
-#include <Vcl.Graphics.hpp>
-#include <Vcl.Controls.hpp>
-#include <Vcl.Forms.hpp>
-#include <Vcl.Dialogs.hpp>
-#include <Vcl.Buttons.hpp>
-#include <Vcl.ExtDlgs.hpp>
-#include <Vcl.StdCtrls.hpp>
-#include <Vcl.ExtCtrls.hpp>
-#include <Vcl.Samples.Spin.hpp>
-#include <Vcl.Grids.hpp>
-#include <GLS.BaseClasses.hpp>
-#include <GLS.ImageUtils.hpp>
-#include <GLS.Gui.hpp>
-#include <Stage.Strings.hpp>
-#include <System.UITypes.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Fmguilayouteditor
-{
-//-- forward type declarations -----------------------------------------------
-class DELPHICLASS TGLLayoutEditorForm;
-//-- type declarations -------------------------------------------------------
-class PASCALIMPLEMENTATION TGLLayoutEditorForm : public Vcl::Forms::TForm
-{
-	typedef Vcl::Forms::TForm inherited;
-	
-__published:
-	Vcl::Extctrls::TPanel* Panel1;
-	Vcl::Extctrls::TPanel* Panel2;
-	Vcl::Stdctrls::TListBox* items_list;
-	Vcl::Stdctrls::TLabel* x_label;
-	Vcl::Stdctrls::TLabel* y_label;
-	Vcl::Buttons::TBitBtn* open_image_button;
-	Vcl::Buttons::TBitBtn* open_button;
-	Vcl::Buttons::TBitBtn* save_button;
-	Vcl::Dialogs::TOpenDialog* OpenDialog1;
-	Vcl::Dialogs::TSaveDialog* SaveDialog1;
-	Vcl::Buttons::TBitBtn* delete_item_button;
-	Vcl::Buttons::TBitBtn* add_button;
-	Vcl::Stdctrls::TLabel* Label1;
-	Vcl::Stdctrls::TLabel* Label2;
-	Vcl::Samples::Spin::TSpinEdit* left_edit;
-	Vcl::Samples::Spin::TSpinEdit* top_edit;
-	Vcl::Stdctrls::TLabel* Label3;
-	Vcl::Stdctrls::TLabel* Label4;
-	Vcl::Samples::Spin::TSpinEdit* height_edit;
-	Vcl::Samples::Spin::TSpinEdit* width_edit;
-	Vcl::Stdctrls::TLabel* Label5;
-	Vcl::Stdctrls::TEdit* name_edit;
-	Vcl::Grids::TStringGrid* elements_grid;
-	Vcl::Extctrls::TPanel* Panel3;
-	Vcl::Buttons::TBitBtn* BitBtn4;
-	Vcl::Buttons::TBitBtn* BitBtn5;
-	Vcl::Forms::TScrollBox* ScrollBox1;
-	Vcl::Extctrls::TImage* Image2;
-	Vcl::Extctrls::TPaintBox* PaintBox1;
-	Vcl::Extctrls::TImage* Image1;
-	Vcl::Buttons::TBitBtn* BitBtn6;
-	Vcl::Buttons::TBitBtn* BitBtn1;
-	Gls::Gui::TGLGuiLayout* GLGuiLayout1;
-	void __fastcall open_image_buttonClick(System::TObject* Sender);
-	void __fastcall open_buttonClick(System::TObject* Sender);
-	void __fastcall save_buttonClick(System::TObject* Sender);
-	void __fastcall FormCreate(System::TObject* Sender);
-	void __fastcall Image1MouseMove(System::TObject* Sender, System::Classes::TShiftState Shift, int X, int Y);
-	void __fastcall Image1MouseDown(System::TObject* Sender, System::Uitypes::TMouseButton Button, System::Classes::TShiftState Shift, int X, int Y);
-	void __fastcall Image1MouseUp(System::TObject* Sender, System::Uitypes::TMouseButton Button, System::Classes::TShiftState Shift, int X, int Y);
-	void __fastcall add_buttonClick(System::TObject* Sender);
-	void __fastcall delete_item_buttonClick(System::TObject* Sender);
-	void __fastcall items_listClick(System::TObject* Sender);
-	void __fastcall name_editExit(System::TObject* Sender);
-	void __fastcall name_editKeyPress(System::TObject* Sender, System::WideChar &Key);
-	void __fastcall elements_gridClick(System::TObject* Sender);
-	void __fastcall left_editChange(System::TObject* Sender);
-	void __fastcall top_editChange(System::TObject* Sender);
-	void __fastcall width_editChange(System::TObject* Sender);
-	void __fastcall height_editChange(System::TObject* Sender);
-	void __fastcall BitBtn4Click(System::TObject* Sender);
-	void __fastcall BitBtn6Click(System::TObject* Sender);
-	void __fastcall elements_gridDblClick(System::TObject* Sender);
-	
-private:
-	void __fastcall SyncImages();
-	void __fastcall DrawCurrentElement();
-	void __fastcall RefreshComponentBox();
-	bool __fastcall GetEnabledSpins();
-	void __fastcall SetEnabledSpins(bool Value);
-	
-public:
-	void __fastcall Execute(Gls::Gui::TGLGuiLayout* AGUILayout);
-	__property bool EnabledSpins = {read=GetEnabledSpins, write=SetEnabledSpins, nodefault};
-public:
-	/* TCustomForm.Create */ inline __fastcall virtual TGLLayoutEditorForm(System::Classes::TComponent* AOwner) : Vcl::Forms::TForm(AOwner) { }
-	/* TCustomForm.CreateNew */ inline __fastcall virtual TGLLayoutEditorForm(System::Classes::TComponent* AOwner, int Dummy) : Vcl::Forms::TForm(AOwner, Dummy) { }
-	/* TCustomForm.CreateScaledNew */ inline __fastcall virtual TGLLayoutEditorForm(System::Classes::TComponent* AOwner, int ADPI, int Dummy) : Vcl::Forms::TForm(AOwner, ADPI, Dummy) { }
-	/* TCustomForm.Destroy */ inline __fastcall virtual ~TGLLayoutEditorForm() { }
-	
-public:
-	/* TWinControl.CreateParented */ inline __fastcall TGLLayoutEditorForm(HWND ParentWindow) : Vcl::Forms::TForm(ParentWindow) { }
-	
-};
-
-
-//-- var, const, procedure ---------------------------------------------------
-extern DELPHI_PACKAGE TGLLayoutEditorForm* __fastcall GUILayoutEditorForm(void);
-extern DELPHI_PACKAGE void __fastcall ReleaseGUILayoutEditorForm(void);
-}	/* namespace Fmguilayouteditor */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FMGUILAYOUTEDITOR)
-using namespace Fmguilayouteditor;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// FmGuiLayoutEditorHPP

include/Win32/FmGuiSkinEditor.hpp

@@ -1,206 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'FmGuiSkinEditor.pas' rev: 36.00 (Windows)
-
-#ifndef FmGuiSkinEditorHPP
-#define FmGuiSkinEditorHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <Winapi.Windows.hpp>
-#include <Winapi.Messages.hpp>
-#include <System.SysUtils.hpp>
-#include <System.Classes.hpp>
-#include <Vcl.Graphics.hpp>
-#include <Vcl.Controls.hpp>
-#include <Vcl.Forms.hpp>
-#include <Vcl.Dialogs.hpp>
-#include <Vcl.StdCtrls.hpp>
-#include <Vcl.ComCtrls.hpp>
-#include <Vcl.ExtCtrls.hpp>
-#include <Vcl.Menus.hpp>
-#include <GLS.Texture.hpp>
-#include <GLS.Scene.hpp>
-#include <GLS.Objects.hpp>
-#include <GLS.Windows.hpp>
-#include <GLS.HUDObjects.hpp>
-#include <GLS.SceneViewer.hpp>
-#include <GLS.Gui.hpp>
-#include <GLS.Graphics.hpp>
-#include <Stage.Utils.hpp>
-#include <GLS.Coordinates.hpp>
-#include <GLS.BaseClasses.hpp>
-#include <GLS.Material.hpp>
-#include <System.Types.hpp>
-#include <System.UITypes.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Fmguiskineditor
-{
-//-- forward type declarations -----------------------------------------------
-class DELPHICLASS TGLSkinEditorForm;
-//-- type declarations -------------------------------------------------------
-class PASCALIMPLEMENTATION TGLSkinEditorForm : public Vcl::Forms::TForm
-{
-	typedef Vcl::Forms::TForm inherited;
-	
-__published:
-	Gls::Scene::TGLScene* GLScene1;
-	Gls::Scene::TGLCamera* GLCamera1;
-	Gls::Windows::TGLPanel* GLPanel1;
-	Gls::Hudobjects::TGLHUDSprite* HUDSprite1;
-	Gls::Scene::TGLMemoryViewer* GLMemoryViewer1;
-	Gls::Scene::TGLLightSource* GLLightSource1;
-	Vcl::Comctrls::TStatusBar* StatusBar;
-	Vcl::Extctrls::TPanel* panBottom;
-	Vcl::Extctrls::TPanel* panZoomImage;
-	Vcl::Extctrls::TImage* imgFull;
-	Vcl::Stdctrls::TScrollBar* sbarHorizontal;
-	Vcl::Stdctrls::TScrollBar* sbarVertical;
-	Vcl::Stdctrls::TButton* Button5;
-	Vcl::Stdctrls::TButton* Button6;
-	Vcl::Extctrls::TPanel* panImageProperties;
-	Vcl::Stdctrls::TLabel* Label5;
-	Vcl::Stdctrls::TLabel* Label6;
-	Vcl::Extctrls::TPanel* Panel2;
-	Vcl::Extctrls::TImage* imgPreview;
-	Vcl::Extctrls::TPanel* Panel3;
-	Vcl::Stdctrls::TLabel* Label2;
-	Vcl::Stdctrls::TLabel* Label1;
-	Vcl::Stdctrls::TButton* Button3;
-	Vcl::Stdctrls::TButton* Button4;
-	Vcl::Stdctrls::TCheckBox* CheckBox1;
-	Vcl::Stdctrls::TEdit* WidthEdit;
-	Vcl::Stdctrls::TEdit* HeightEdit;
-	Vcl::Extctrls::TPanel* panElements;
-	Vcl::Extctrls::TBevel* Bevel2;
-	Vcl::Extctrls::TBevel* Bevel1;
-	Vcl::Stdctrls::TLabel* Label3;
-	Vcl::Stdctrls::TLabel* Label4;
-	Vcl::Stdctrls::TLabel* Label11;
-	Vcl::Stdctrls::TLabel* Label12;
-	Vcl::Stdctrls::TLabel* Label13;
-	Vcl::Stdctrls::TLabel* Label9;
-	Vcl::Stdctrls::TLabel* Label10;
-	Vcl::Stdctrls::TLabel* Label14;
-	Vcl::Stdctrls::TListBox* lbElements;
-	Vcl::Stdctrls::TButton* btnAdd;
-	Vcl::Stdctrls::TButton* btnDelete;
-	Vcl::Stdctrls::TComboBox* ComboBox1;
-	Vcl::Stdctrls::TEdit* LeftEdit;
-	Vcl::Stdctrls::TEdit* TopEdit;
-	Vcl::Stdctrls::TEdit* RightEdit;
-	Vcl::Stdctrls::TEdit* BottomEdit;
-	Vcl::Stdctrls::TEdit* ScaleXEdit;
-	Vcl::Stdctrls::TEdit* ScaleYEdit;
-	Vcl::Menus::TPopupMenu* popElements;
-	Vcl::Menus::TMenuItem* mnuTopLeft;
-	Vcl::Menus::TMenuItem* mnuTop;
-	Vcl::Menus::TMenuItem* mnuTopRight;
-	Vcl::Menus::TMenuItem* mnuLeft;
-	Vcl::Menus::TMenuItem* mnuCenter;
-	Vcl::Menus::TMenuItem* mnuRight;
-	Vcl::Menus::TMenuItem* mnuBottomLeft;
-	Vcl::Menus::TMenuItem* mnuBottom;
-	Vcl::Menus::TMenuItem* mnuBottomRight;
-	Vcl::Menus::TMenuItem* N1;
-	Vcl::Menus::TMenuItem* mnuAddAll;
-	Vcl::Menus::TMenuItem* N2;
-	Vcl::Menus::TMenuItem* mnuAllTop;
-	Vcl::Menus::TMenuItem* mnuAllMiddle;
-	Vcl::Menus::TMenuItem* mnuAllBottom;
-	void __fastcall FormCreate(System::TObject* Sender);
-	void __fastcall FormDestroy(System::TObject* Sender);
-	void __fastcall Button3Click(System::TObject* Sender);
-	void __fastcall Button4Click(System::TObject* Sender);
-	void __fastcall ScrollBarScroll(System::TObject* Sender, System::Uitypes::TScrollCode ScrollCode, int &ScrollPos);
-	void __fastcall ScrollbarChange(System::TObject* Sender);
-	void __fastcall WidthEditChange(System::TObject* Sender);
-	void __fastcall HeightEditChange(System::TObject* Sender);
-	void __fastcall btnAddClick(System::TObject* Sender);
-	void __fastcall lbElementsClick(System::TObject* Sender);
-	void __fastcall ComboBox1Change(System::TObject* Sender);
-	void __fastcall btnDeleteClick(System::TObject* Sender);
-	void __fastcall imgFullMouseDown(System::TObject* Sender, System::Uitypes::TMouseButton Button, System::Classes::TShiftState Shift, int X, int Y);
-	void __fastcall imgFullMouseUp(System::TObject* Sender, System::Uitypes::TMouseButton Button, System::Classes::TShiftState Shift, int X, int Y);
-	void __fastcall imgFullMouseMove(System::TObject* Sender, System::Classes::TShiftState Shift, int X, int Y);
-	void __fastcall lbElementsKeyDown(System::TObject* Sender, System::Word &Key, System::Classes::TShiftState Shift);
-	void __fastcall CheckBox1Click(System::TObject* Sender);
-	void __fastcall ScaleXEditChange(System::TObject* Sender);
-	void __fastcall ScaleYEditChange(System::TObject* Sender);
-	void __fastcall LeftEditChange(System::TObject* Sender);
-	void __fastcall TopEditChange(System::TObject* Sender);
-	void __fastcall RightEditChange(System::TObject* Sender);
-	void __fastcall BottomEditChange(System::TObject* Sender);
-	void __fastcall EditKeyPress(System::TObject* Sender, System::WideChar &Key);
-	void __fastcall FormResize(System::TObject* Sender);
-	void __fastcall MenuItemClick(System::TObject* Sender);
-	void __fastcall mnuAddAllClick(System::TObject* Sender);
-	void __fastcall mnuAllTopClick(System::TObject* Sender);
-	void __fastcall mnuAllMiddleClick(System::TObject* Sender);
-	void __fastcall mnuAllBottomClick(System::TObject* Sender);
-	void __fastcall imgPreviewMouseDown(System::TObject* Sender, System::Uitypes::TMouseButton Button, System::Classes::TShiftState Shift, int X, int Y);
-	void __fastcall imgPreviewMouseMove(System::TObject* Sender, System::Classes::TShiftState Shift, int X, int Y);
-	
-private:
-	System::Classes::TWndMethod FOriginalWndProc;
-	Winapi::Windows::TRect FFocusRect;
-	Winapi::Windows::TRect VisibleRect;
-	Winapi::Windows::TPoint PreviewMousePoint;
-	int PreviewWidth;
-	int PreviewHeight;
-	Winapi::Windows::TPoint FullMousePoint;
-	bool MouseDown;
-	void __fastcall ImageWndProc(Winapi::Messages::TMessage &Message);
-	void __fastcall DrawImageFocusRect(const Winapi::Windows::TRect &ARect);
-	void __fastcall AlignZoomPanel();
-	void __fastcall UpdateRegionEdits();
-	void __fastcall SetEditState(Vcl::Controls::TControl* Parent, bool Enabled);
-	void __fastcall AddElement(int Index);
-	void __fastcall DrawCrossair(const Winapi::Windows::TPoint &Point);
-	
-public:
-	Gls::Gui::TGLGuiElementList* TheGuiComponent;
-	Gls::Gui::TGLGuiElement* SelectedElement;
-	Gls::Texture::TGLTexture* Tex;
-	float Zoom;
-	int Width;
-	int Height;
-	bool __fastcall Edit(Gls::Gui::TGLGuiElementList* GuiComponent);
-	void __fastcall Render();
-	void __fastcall SetMax(Vcl::Stdctrls::TScrollBar* Scrollbar, int Val);
-public:
-	/* TCustomForm.Create */ inline __fastcall virtual TGLSkinEditorForm(System::Classes::TComponent* AOwner) : Vcl::Forms::TForm(AOwner) { }
-	/* TCustomForm.CreateNew */ inline __fastcall virtual TGLSkinEditorForm(System::Classes::TComponent* AOwner, int Dummy) : Vcl::Forms::TForm(AOwner, Dummy) { }
-	/* TCustomForm.CreateScaledNew */ inline __fastcall virtual TGLSkinEditorForm(System::Classes::TComponent* AOwner, int ADPI, int Dummy) : Vcl::Forms::TForm(AOwner, ADPI, Dummy) { }
-	/* TCustomForm.Destroy */ inline __fastcall virtual ~TGLSkinEditorForm() { }
-	
-public:
-	/* TWinControl.CreateParented */ inline __fastcall TGLSkinEditorForm(HWND ParentWindow) : Vcl::Forms::TForm(ParentWindow) { }
-	
-};
-
-
-//-- var, const, procedure ---------------------------------------------------
-extern DELPHI_PACKAGE TGLSkinEditorForm* GLSkinEditorForm;
-extern DELPHI_PACKAGE bool __fastcall GUIComponentDialog(Gls::Gui::TGLGuiElementList* GuiComponent);
-}	/* namespace Fmguiskineditor */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FMGUISKINEDITOR)
-using namespace Fmguiskineditor;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// FmGuiSkinEditorHPP

include/Win32/FmInfo.hpp

@@ -1,168 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'FmInfo.pas' rev: 36.00 (Windows)
-
-#ifndef FmInfoHPP
-#define FmInfoHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <Winapi.OpenGL.hpp>
-#include <Winapi.Windows.hpp>
-#include <System.SysUtils.hpp>
-#include <System.Classes.hpp>
-#include <Vcl.Forms.hpp>
-#include <Vcl.Controls.hpp>
-#include <Vcl.Buttons.hpp>
-#include <Vcl.StdCtrls.hpp>
-#include <Vcl.ComCtrls.hpp>
-#include <Vcl.ExtCtrls.hpp>
-#include <Vcl.Graphics.hpp>
-#include <Vcl.Menus.hpp>
-#include <Vcl.Imaging.jpeg.hpp>
-#include <Stage.OpenGLTokens.hpp>
-#include <GLS.OpenGLAdapter.hpp>
-#include <GLS.Scene.hpp>
-#include <GLS.SceneViewer.hpp>
-#include <GLS.Context.hpp>
-#include <Stage.Utils.hpp>
-#include <System.UITypes.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Fminfo
-{
-//-- forward type declarations -----------------------------------------------
-class DELPHICLASS TGLInfoForm;
-//-- type declarations -------------------------------------------------------
-class PASCALIMPLEMENTATION TGLInfoForm : public Vcl::Forms::TForm
-{
-	typedef Vcl::Forms::TForm inherited;
-	
-__published:
-	Vcl::Stdctrls::TLabel* AccLabel;
-	Vcl::Stdctrls::TLabel* AccumLabel;
-	Vcl::Stdctrls::TLabel* AuxLabel;
-	Vcl::Stdctrls::TLabel* ClipLabel;
-	Vcl::Stdctrls::TLabel* ColorLabel;
-	Vcl::Stdctrls::TLabel* CopyLabel;
-	Vcl::Stdctrls::TLabel* DepthLabel;
-	Vcl::Stdctrls::TLabel* DoubleLabel;
-	Vcl::Stdctrls::TLabel* EvalLabel;
-	Vcl::Extctrls::TImage* Image;
-	Vcl::Stdctrls::TLabel* Label1;
-	Vcl::Stdctrls::TLabel* Label10;
-	Vcl::Stdctrls::TLabel* Label11;
-	Vcl::Stdctrls::TLabel* Label12;
-	Vcl::Stdctrls::TLabel* Label13;
-	Vcl::Stdctrls::TLabel* Label14;
-	Vcl::Stdctrls::TLabel* Label15;
-	Vcl::Stdctrls::TLabel* Label16;
-	Vcl::Stdctrls::TLabel* Label17;
-	Vcl::Stdctrls::TLabel* Label18;
-	Vcl::Stdctrls::TLabel* Label2;
-	Vcl::Stdctrls::TLabel* Label20;
-	Vcl::Stdctrls::TLabel* Label23;
-	Vcl::Stdctrls::TLabel* Label25;
-	Vcl::Stdctrls::TLabel* Label26;
-	Vcl::Stdctrls::TLabel* Label27;
-	Vcl::Stdctrls::TLabel* Label28;
-	Vcl::Stdctrls::TLabel* Label29;
-	Vcl::Stdctrls::TLabel* Label3;
-	Vcl::Stdctrls::TLabel* Label30;
-	Vcl::Stdctrls::TLabel* LabelCommon;
-	Vcl::Stdctrls::TLabel* LabelDepths;
-	Vcl::Stdctrls::TLabel* LabelMaxValues;
-	Vcl::Stdctrls::TLabel* Label34;
-	Vcl::Stdctrls::TLabel* Label35;
-	Vcl::Stdctrls::TLabel* Label37;
-	Vcl::Stdctrls::TLabel* Label4;
-	Vcl::Stdctrls::TLabel* Label5;
-	Vcl::Stdctrls::TLabel* Label6;
-	Vcl::Stdctrls::TLabel* Label7;
-	Vcl::Stdctrls::TLabel* Label8;
-	Vcl::Stdctrls::TLabel* Label9;
-	Vcl::Stdctrls::TLabel* LightLabel;
-	Vcl::Stdctrls::TLabel* ListLabel;
-	Vcl::Stdctrls::TMemo* MemoAbout;
-	Vcl::Stdctrls::TMemo* MemoContributors;
-	Vcl::Stdctrls::TLabel* ModelLabel;
-	Vcl::Stdctrls::TLabel* NameLabel;
-	Vcl::Stdctrls::TLabel* OverlayLabel;
-	Vcl::Comctrls::TPageControl* PageControl;
-	Vcl::Stdctrls::TLabel* PixelLabel;
-	Vcl::Stdctrls::TLabel* ProjLabel;
-	Vcl::Stdctrls::TLabel* RendererLabel;
-	Vcl::Forms::TScrollBox* ScrollBoxInfo;
-	Vcl::Comctrls::TTabSheet* TabSheetInformation;
-	Vcl::Stdctrls::TLabel* StencilLabel;
-	Vcl::Stdctrls::TLabel* StereoLabel;
-	Vcl::Stdctrls::TLabel* SubLabel;
-	Vcl::Comctrls::TTabSheet* TabSheetAbout;
-	Vcl::Comctrls::TTabSheet* TabSheetContributors;
-	Vcl::Stdctrls::TLabel* TexSizeLabel;
-	Vcl::Stdctrls::TLabel* TexStackLabel;
-	Vcl::Stdctrls::TLabel* TexUnitsLabel;
-	Vcl::Stdctrls::TLabel* UnderlayLabel;
-	Vcl::Stdctrls::TLabel* VendorLabel;
-	Vcl::Stdctrls::TLabel* VersionLabel;
-	Vcl::Comctrls::TTabSheet* TabSheetExtensions;
-	Vcl::Stdctrls::TListBox* ListBoxExtensions;
-	Vcl::Menus::TPopupMenu* PMWebLink;
-	Vcl::Menus::TMenuItem* MIRegistryLink;
-	Vcl::Menus::TMenuItem* MIDelphi3D;
-	Vcl::Comctrls::TTabSheet* TabSheetGLScene;
-	Vcl::Stdctrls::TButton* CloseButton;
-	Vcl::Stdctrls::TLabel* VersionLbl;
-	Vcl::Stdctrls::TLabel* ViewLabel;
-	Vcl::Stdctrls::TLabel* lblSfGLScene;
-	Vcl::Stdctrls::TLabel* lblGithubGLScene;
-	void __fastcall CloseButtonClick(System::TObject* Sender);
-	void __fastcall FormCreate(System::TObject* Sender);
-	void __fastcall FormKeyPress(System::TObject* Sender, System::WideChar &Key);
-	void __fastcall FormClose(System::TObject* Sender, System::Uitypes::TCloseAction &Action);
-	void __fastcall ListBoxExtensionsDblClick(System::TObject* Sender);
-	void __fastcall ListBoxExtensionsClick(System::TObject* Sender);
-	void __fastcall ListBoxExtensionsKeyPress(System::TObject* Sender, System::WideChar &Key);
-	void __fastcall FormShow(System::TObject* Sender);
-	void __fastcall MIDelphi3DClick(System::TObject* Sender);
-	void __fastcall lblSfGLSceneClick(System::TObject* Sender);
-	void __fastcall lblGithubGLSceneClick(System::TObject* Sender);
-	
-protected:
-	System::UnicodeString __fastcall GetSceneVersion();
-	
-public:
-	void __fastcall GetInfoFrom(Gls::Scene::TGLSceneBuffer* aSceneBuffer);
-public:
-	/* TCustomForm.Create */ inline __fastcall virtual TGLInfoForm(System::Classes::TComponent* AOwner) : Vcl::Forms::TForm(AOwner) { }
-	/* TCustomForm.CreateNew */ inline __fastcall virtual TGLInfoForm(System::Classes::TComponent* AOwner, int Dummy) : Vcl::Forms::TForm(AOwner, Dummy) { }
-	/* TCustomForm.CreateScaledNew */ inline __fastcall virtual TGLInfoForm(System::Classes::TComponent* AOwner, int ADPI, int Dummy) : Vcl::Forms::TForm(AOwner, ADPI, Dummy) { }
-	/* TCustomForm.Destroy */ inline __fastcall virtual ~TGLInfoForm() { }
-	
-public:
-	/* TWinControl.CreateParented */ inline __fastcall TGLInfoForm(HWND ParentWindow) : Vcl::Forms::TForm(ParentWindow) { }
-	
-};
-
-
-//-- var, const, procedure ---------------------------------------------------
-}	/* namespace Fminfo */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FMINFO)
-using namespace Fminfo;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// FmInfoHPP

include/Win32/FmLibMaterialPicker.hpp

@@ -1,116 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'FmLibMaterialPicker.pas' rev: 36.00 (Windows)
-
-#ifndef FmLibMaterialPickerHPP
-#define FmLibMaterialPickerHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <System.Classes.hpp>
-#include <System.Types.hpp>
-#include <Vcl.Forms.hpp>
-#include <Vcl.StdCtrls.hpp>
-#include <Vcl.Buttons.hpp>
-#include <Vcl.Controls.hpp>
-#include <Vcl.Graphics.hpp>
-#include <GLS.Scene.hpp>
-#include <GLS.Objects.hpp>
-#include <GLS.SceneViewer.hpp>
-#include <GLS.Material.hpp>
-#include <GLS.Color.hpp>
-#include <GLS.Coordinates.hpp>
-#include <GLS.BaseClasses.hpp>
-#include <GLS.HUDObjects.hpp>
-#include <GLS.GeomObjects.hpp>
-#include <System.UITypes.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Fmlibmaterialpicker
-{
-//-- forward type declarations -----------------------------------------------
-class DELPHICLASS TGLLibMaterialPickerForm;
-//-- type declarations -------------------------------------------------------
-class PASCALIMPLEMENTATION TGLLibMaterialPickerForm : public Vcl::Forms::TForm
-{
-	typedef Vcl::Forms::TForm inherited;
-	
-__published:
-	Vcl::Stdctrls::TListBox* ListBoxMaterials;
-	Vcl::Stdctrls::TLabel* Label1;
-	Vcl::Stdctrls::TLabel* Label2;
-	Vcl::Buttons::TBitBtn* BitBtnOk;
-	Vcl::Buttons::TBitBtn* BitBtnCancel;
-	Gls::Scene::TGLScene* GLScene1;
-	Gls::Sceneviewer::TGLSceneViewer* GLSceneViewer1;
-	Gls::Scene::TGLLightSource* LightSource1;
-	Gls::Objects::TGLDummyCube* dcLight1;
-	Gls::Objects::TGLDummyCube* dcWorld1;
-	Gls::Scene::TGLCamera* Camera1;
-	Gls::Objects::TGLCube* Cube1;
-	Gls::Objects::TGLSphere* Sphere1;
-	Gls::Objects::TGLSphere* FireSphere1;
-	Gls::Geomobjects::TGLTeapot* Teapot1;
-	Gls::Material::TGLMaterialLibrary* GLMaterialLibrary1;
-	Vcl::Stdctrls::TComboBox* ComboBoxObject1;
-	Vcl::Stdctrls::TComboBox* ComboBoxBackGround1;
-	Gls::Hudobjects::TGLHUDSprite* BackGroundSprite1;
-	Gls::Scene::TGLLightSource* LightSource2;
-	void __fastcall ListBoxMaterialsClick(System::TObject* Sender);
-	void __fastcall ListBoxMaterialsKeyPress(System::TObject* Sender, System::WideChar &Key);
-	void __fastcall ListBoxMaterialsDblClick(System::TObject* Sender);
-	void __fastcall ComboBoxObject1Change(System::TObject* Sender);
-	void __fastcall ComboBoxBackGround1Change(System::TObject* Sender);
-	void __fastcall FormCreate(System::TObject* Sender);
-	void __fastcall GLSceneViewer1MouseMove(System::TObject* Sender, System::Classes::TShiftState Shift, int X, int Y);
-	void __fastcall GLSceneViewer1MouseWheel(System::TObject* Sender, System::Classes::TShiftState Shift, int WheelDelta, const System::Types::TPoint &MousePos, bool &Handled);
-	void __fastcall GLSceneViewer1MouseDown(System::TObject* Sender, System::Uitypes::TMouseButton Button, System::Classes::TShiftState Shift, int X, int Y);
-	
-private:
-	int mx;
-	int my;
-	Gls::Material::TGLAbstractLibMaterial* FLibMaterial1;
-	Gls::Material::TGLMaterial* __fastcall GetMaterial1();
-	void __fastcall SetMaterial1(Gls::Material::TGLMaterial* const Value);
-	Gls::Material::TGLAbstractLibMaterial* __fastcall GetLibMaterial1();
-	void __fastcall SetLibMaterial1(Gls::Material::TGLAbstractLibMaterial* const Value);
-	
-public:
-	bool __fastcall Execute(Gls::Material::TGLLibMaterialName &MaterialName, Gls::Material::TGLAbstractMaterialLibrary* MaterialLibrary);
-	__property Gls::Material::TGLMaterial* Material1 = {read=GetMaterial1, write=SetMaterial1};
-	__property Gls::Material::TGLAbstractLibMaterial* LibMaterial1 = {read=GetLibMaterial1, write=SetLibMaterial1};
-public:
-	/* TCustomForm.Create */ inline __fastcall virtual TGLLibMaterialPickerForm(System::Classes::TComponent* AOwner) : Vcl::Forms::TForm(AOwner) { }
-	/* TCustomForm.CreateNew */ inline __fastcall virtual TGLLibMaterialPickerForm(System::Classes::TComponent* AOwner, int Dummy) : Vcl::Forms::TForm(AOwner, Dummy) { }
-	/* TCustomForm.CreateScaledNew */ inline __fastcall virtual TGLLibMaterialPickerForm(System::Classes::TComponent* AOwner, int ADPI, int Dummy) : Vcl::Forms::TForm(AOwner, ADPI, Dummy) { }
-	/* TCustomForm.Destroy */ inline __fastcall virtual ~TGLLibMaterialPickerForm() { }
-	
-public:
-	/* TWinControl.CreateParented */ inline __fastcall TGLLibMaterialPickerForm(HWND ParentWindow) : Vcl::Forms::TForm(ParentWindow) { }
-	
-};
-
-
-//-- var, const, procedure ---------------------------------------------------
-extern DELPHI_PACKAGE TGLLibMaterialPickerForm* __fastcall GLLibMaterialPickerForm(void);
-extern DELPHI_PACKAGE void __fastcall ReleaseLibMaterialPickerForm(void);
-}	/* namespace Fmlibmaterialpicker */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FMLIBMATERIALPICKER)
-using namespace Fmlibmaterialpicker;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// FmLibMaterialPickerHPP

include/Win32/FmMaterialEditor.hpp

@@ -1,92 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'FmMaterialEditor.pas' rev: 36.00 (Windows)
-
-#ifndef FmMaterialEditorHPP
-#define FmMaterialEditorHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <Winapi.Windows.hpp>
-#include <System.Classes.hpp>
-#include <System.TypInfo.hpp>
-#include <Vcl.Forms.hpp>
-#include <Vcl.ComCtrls.hpp>
-#include <Vcl.StdCtrls.hpp>
-#include <Vcl.Controls.hpp>
-#include <Vcl.Buttons.hpp>
-#include <GLS.SceneViewer.hpp>
-#include <GLS.State.hpp>
-#include <GLS.Material.hpp>
-#include <GLS.Texture.hpp>
-#include <FRTrackBarEdit.hpp>
-#include <FRMaterialPreview.hpp>
-#include <FRColorEditor.hpp>
-#include <FRFaceEditor.hpp>
-#include <FRTextureEdit.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Fmmaterialeditor
-{
-//-- forward type declarations -----------------------------------------------
-class DELPHICLASS TGLMaterialEditorForm;
-//-- type declarations -------------------------------------------------------
-class PASCALIMPLEMENTATION TGLMaterialEditorForm : public Vcl::Forms::TForm
-{
-	typedef Vcl::Forms::TForm inherited;
-	
-__published:
-	Vcl::Comctrls::TPageControl* PageControl1;
-	Vcl::Comctrls::TTabSheet* TSFront;
-	Vcl::Comctrls::TTabSheet* TSBack;
-	Vcl::Comctrls::TTabSheet* TSTexture;
-	Frfaceeditor::TRFaceEditor* FEFront;
-	Frfaceeditor::TRFaceEditor* FEBack;
-	Vcl::Stdctrls::TGroupBox* GroupBox1;
-	Frmaterialpreview::TRMaterialPreview* MPPreview;
-	Vcl::Buttons::TBitBtn* BBOk;
-	Vcl::Buttons::TBitBtn* BBCancel;
-	Frtextureedit::TRTextureEdit* RTextureEdit;
-	Vcl::Stdctrls::TComboBox* CBBlending;
-	Vcl::Stdctrls::TLabel* Label1;
-	Vcl::Stdctrls::TLabel* Label2;
-	Vcl::Stdctrls::TComboBox* CBPolygonMode;
-	void __fastcall OnMaterialChanged(System::TObject* Sender);
-	
-public:
-	__fastcall virtual TGLMaterialEditorForm(System::Classes::TComponent* AOwner);
-	bool __fastcall Execute(Gls::Material::TGLMaterial* AMaterial);
-public:
-	/* TCustomForm.CreateNew */ inline __fastcall virtual TGLMaterialEditorForm(System::Classes::TComponent* AOwner, int Dummy) : Vcl::Forms::TForm(AOwner, Dummy) { }
-	/* TCustomForm.CreateScaledNew */ inline __fastcall virtual TGLMaterialEditorForm(System::Classes::TComponent* AOwner, int ADPI, int Dummy) : Vcl::Forms::TForm(AOwner, ADPI, Dummy) { }
-	/* TCustomForm.Destroy */ inline __fastcall virtual ~TGLMaterialEditorForm() { }
-	
-public:
-	/* TWinControl.CreateParented */ inline __fastcall TGLMaterialEditorForm(HWND ParentWindow) : Vcl::Forms::TForm(ParentWindow) { }
-	
-};
-
-
-//-- var, const, procedure ---------------------------------------------------
-extern DELPHI_PACKAGE TGLMaterialEditorForm* __fastcall GLMaterialEditorForm(void);
-extern DELPHI_PACKAGE void __fastcall ReleaseMaterialEditorForm(void);
-}	/* namespace Fmmaterialeditor */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FMMATERIALEDITOR)
-using namespace Fmmaterialeditor;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// FmMaterialEditorHPP

include/Win32/FmSceneEditor.hpp

@@ -1,233 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'FmSceneEditor.pas' rev: 36.00 (Windows)
-
-#ifndef FmSceneEditorHPP
-#define FmSceneEditorHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <Winapi.Windows.hpp>
-#include <System.Classes.hpp>
-#include <System.SysUtils.hpp>
-#include <System.Win.Registry.hpp>
-#include <System.ImageList.hpp>
-#include <System.Actions.hpp>
-#include <Vcl.ActnList.hpp>
-#include <Vcl.Controls.hpp>
-#include <Vcl.Forms.hpp>
-#include <Vcl.ComCtrls.hpp>
-#include <Vcl.ImgList.hpp>
-#include <Vcl.Dialogs.hpp>
-#include <Vcl.Menus.hpp>
-#include <Vcl.ToolWin.hpp>
-#include <Vcl.ExtCtrls.hpp>
-#include <Vcl.StdCtrls.hpp>
-#include <Vcl.Clipbrd.hpp>
-#include <DesignIntf.hpp>
-#include <VCLEditors.hpp>
-#include <GLS.Scene.hpp>
-#include <GLS.SceneViewer.hpp>
-#include <Stage.Strings.hpp>
-#include <FmInfo.hpp>
-#include <GLS.XCollection.hpp>
-#include <Stage.Utils.hpp>
-#include <GLS.SceneRegister.hpp>
-#include <System.Types.hpp>
-#include <System.UITypes.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Fmsceneeditor
-{
-//-- forward type declarations -----------------------------------------------
-class DELPHICLASS TGLSceneEditorForm;
-//-- type declarations -------------------------------------------------------
-typedef void __fastcall (__closure *TSetSubItemsEvent)(System::TObject* Sender);
-
-class PASCALIMPLEMENTATION TGLSceneEditorForm : public Vcl::Forms::TForm
-{
-	typedef Vcl::Forms::TForm inherited;
-	
-__published:
-	Vcl::Menus::TPopupMenu* PopupMenu;
-	Vcl::Menus::TMenuItem* MIAddObject;
-	Vcl::Menus::TMenuItem* N1;
-	Vcl::Menus::TMenuItem* MIDelObject;
-	Vcl::Comctrls::TToolBar* ToolBar;
-	Vcl::Actnlist::TActionList* ActionList;
-	Vcl::Comctrls::TToolButton* TBAddObjects;
-	Vcl::Comctrls::TToolButton* TBMoveUp;
-	Vcl::Menus::TPopupMenu* pmToolBar;
-	Vcl::Comctrls::TToolButton* TBDeleteObject;
-	Vcl::Comctrls::TToolButton* TBMoveDown;
-	Vcl::Actnlist::TAction* acAddObject;
-	Vcl::Controls::TImageList* ImageList;
-	Vcl::Actnlist::TAction* acDeleteObject;
-	Vcl::Actnlist::TAction* acMoveUp;
-	Vcl::Actnlist::TAction* acMoveDown;
-	Vcl::Menus::TMenuItem* N2;
-	Vcl::Menus::TMenuItem* MIMoveUp;
-	Vcl::Menus::TMenuItem* MIMoveDown;
-	Vcl::Actnlist::TAction* acSaveScene;
-	Vcl::Actnlist::TAction* acLoadScene;
-	Vcl::Dialogs::TOpenDialog* OpenDialog;
-	Vcl::Dialogs::TSaveDialog* SaveDialog;
-	Vcl::Comctrls::TToolButton* TBLoadScene;
-	Vcl::Comctrls::TToolButton* TBSaveScene;
-	Vcl::Actnlist::TAction* acInfo;
-	Vcl::Actnlist::TAction* acCopy;
-	Vcl::Actnlist::TAction* acCut;
-	Vcl::Actnlist::TAction* acPaste;
-	Vcl::Menus::TMenuItem* MICopy;
-	Vcl::Menus::TMenuItem* MIPaste;
-	Vcl::Menus::TMenuItem* MICut;
-	Vcl::Comctrls::TToolButton* TBCut;
-	Vcl::Comctrls::TToolButton* TBCopy;
-	Vcl::Comctrls::TToolButton* TBPaste;
-	Vcl::Menus::TPopupMenu* pmBehavioursToolbar;
-	Vcl::Actnlist::TAction* acAddBehaviour;
-	Vcl::Menus::TMenuItem* MIAddBehaviour;
-	Vcl::Menus::TMenuItem* MIAddEffect;
-	Vcl::Menus::TMenuItem* MIBehaviourSeparator;
-	Vcl::Actnlist::TAction* acDeleteBehaviour;
-	Vcl::Menus::TPopupMenu* pmBehaviours;
-	Vcl::Menus::TMenuItem* Delete1;
-	Vcl::Menus::TMenuItem* MoveUp1;
-	Vcl::Menus::TMenuItem* MoveDown1;
-	Vcl::Menus::TMenuItem* N4;
-	Vcl::Menus::TPopupMenu* pmEffectsToolbar;
-	Vcl::Actnlist::TAction* acAddEffect;
-	Vcl::Comctrls::TToolButton* TBCharacterPanels;
-	Vcl::Comctrls::TToolButton* TBStayOnTop;
-	Vcl::Actnlist::TAction* acStayOnTop;
-	Vcl::Comctrls::TToolButton* TBSeparator4;
-	Vcl::Comctrls::TToolButton* TBExpand;
-	Vcl::Actnlist::TAction* acExpand;
-	Vcl::Extctrls::TPanel* PATreeAll;
-	Vcl::Extctrls::TPanel* PATree;
-	Vcl::Comctrls::TTreeView* Tree;
-	Vcl::Comctrls::TToolButton* TBInfo;
-	Vcl::Extctrls::TPanel* PABehaviours;
-	Vcl::Comctrls::TToolBar* ToolBarBehaviours;
-	Vcl::Comctrls::TToolButton* TBAddBehaviours;
-	Vcl::Comctrls::TListView* BehavioursListView;
-	Vcl::Extctrls::TPanel* PAEffects;
-	Vcl::Comctrls::TListView* EffectsListView;
-	Vcl::Comctrls::TToolBar* ToolBarEffects;
-	Vcl::Comctrls::TToolButton* TBAddEffects;
-	Vcl::Comctrls::TToolButton* TBGalleryPanel;
-	Vcl::Comctrls::TTreeView* TreeAll;
-	void __fastcall FormCreate(System::TObject* Sender);
-	void __fastcall TreeEditing(System::TObject* Sender, Vcl::Comctrls::TTreeNode* Node, bool &AllowEdit);
-	void __fastcall TreeDragOver(System::TObject* Sender, System::TObject* Source, int X, int Y, System::Uitypes::TDragState State, bool &Accept);
-	void __fastcall TreeDragDrop(System::TObject* Sender, System::TObject* Source, int X, int Y);
-	void __fastcall TreeAllChange(System::TObject* Sender, Vcl::Comctrls::TTreeNode* Node);
-	void __fastcall TreeChange(System::TObject* Sender, Vcl::Comctrls::TTreeNode* Node);
-	void __fastcall TreeMouseDown(System::TObject* Sender, System::Uitypes::TMouseButton Button, System::Classes::TShiftState Shift, int X, int Y);
-	void __fastcall TreeEnter(System::TObject* Sender);
-	void __fastcall TreeMouseMove(System::TObject* Sender, System::Classes::TShiftState Shift, int X, int Y);
-	void __fastcall acDeleteObjectExecute(System::TObject* Sender);
-	void __fastcall acMoveUpExecute(System::TObject* Sender);
-	void __fastcall acMoveDownExecute(System::TObject* Sender);
-	void __fastcall acAddObjectExecute(System::TObject* Sender);
-	void __fastcall acSaveSceneExecute(System::TObject* Sender);
-	void __fastcall acLoadSceneExecute(System::TObject* Sender);
-	void __fastcall FormDestroy(System::TObject* Sender);
-	void __fastcall acInfoExecute(System::TObject* Sender);
-	void __fastcall acCopyExecute(System::TObject* Sender);
-	void __fastcall acCutExecute(System::TObject* Sender);
-	void __fastcall acPasteExecute(System::TObject* Sender);
-	void __fastcall BehavioursListViewEnter(System::TObject* Sender);
-	void __fastcall EffectsListViewEnter(System::TObject* Sender);
-	void __fastcall acAddBehaviourExecute(System::TObject* Sender);
-	void __fastcall DeleteBaseBehaviour(Vcl::Comctrls::TListView* ListView);
-	void __fastcall pmBehavioursToolbarPopup(System::TObject* Sender);
-	void __fastcall pmEffectsToolbarPopup(System::TObject* Sender);
-	void __fastcall BehavioursListViewSelectItem(System::TObject* Sender, Vcl::Comctrls::TListItem* Item, bool Selected);
-	void __fastcall acAddEffectExecute(System::TObject* Sender);
-	void __fastcall PopupMenuPopup(System::TObject* Sender);
-	void __fastcall TBCharacterPanelsClick(System::TObject* Sender);
-	void __fastcall TreeKeyDown(System::TObject* Sender, System::Word &Key, System::Classes::TShiftState Shift);
-	void __fastcall acStayOnTopExecute(System::TObject* Sender);
-	void __fastcall FormKeyDown(System::TObject* Sender, System::Word &Key, System::Classes::TShiftState Shift);
-	void __fastcall acExpandExecute(System::TObject* Sender);
-	
-private:
-	int FSelectedItems;
-	Gls::Scene::TGLScene* FScene;
-	Vcl::Comctrls::TTreeNode* FObjectNode;
-	Vcl::Comctrls::TTreeNode* FSceneObjects;
-	Designintf::_di_IDesigner FCurrentDesigner;
-	Winapi::Windows::TPoint FLastMouseDownPos;
-	System::Classes::TComponent* FPasteOwner;
-	Designintf::_di_IDesignerSelections FPasteSelection;
-	void __fastcall ReadScene();
-	void __fastcall ResetTree();
-	Vcl::Comctrls::TTreeNode* __fastcall AddNodesAll(Vcl::Comctrls::TTreeNode* ANode, Gls::Scene::TGLBaseSceneObject* AObject);
-	Vcl::Comctrls::TTreeNode* __fastcall AddNodes(Vcl::Comctrls::TTreeNode* ANode, Gls::Scene::TGLBaseSceneObject* AObject);
-	void __fastcall AddObjectClick(System::TObject* Sender);
-	void __fastcall AddBehaviourClick(System::TObject* Sender);
-	void __fastcall AddEffectClick(System::TObject* Sender);
-	void __fastcall SetObjectsSubItems(Vcl::Menus::TMenuItem* parent);
-	void __fastcall SetXCollectionSubItems(Vcl::Menus::TMenuItem* parent, Gls::Xcollection::TXCollection* XCollection, TSetSubItemsEvent Event);
-	void __fastcall SetBehavioursSubItems(Vcl::Menus::TMenuItem* parent, Gls::Xcollection::TXCollection* XCollection);
-	void __fastcall SetEffectsSubItems(Vcl::Menus::TMenuItem* parent, Gls::Xcollection::TXCollection* XCollection);
-	void __fastcall OnBaseSceneObjectNameChanged(System::TObject* Sender);
-	bool __fastcall IsValidClipBoardNode();
-	bool __fastcall IsPastePossible();
-	void __fastcall ShowBehaviours(Gls::Scene::TGLBaseSceneObject* BaseSceneObject);
-	void __fastcall ShowEffects(Gls::Scene::TGLBaseSceneObject* BaseSceneObject);
-	void __fastcall ShowBehavioursAndEffects(Gls::Scene::TGLBaseSceneObject* BaseSceneObject);
-	void __fastcall EnableAndDisableActions();
-	bool __fastcall CanPaste(Gls::Scene::TGLBaseSceneObject* obj, Gls::Scene::TGLBaseSceneObject* destination);
-	void __fastcall CopyComponents(System::Classes::TComponent* Root, const Designintf::_di_IDesignerSelections Components);
-	void __fastcall MethodError(System::Classes::TReader* Reader, const System::UnicodeString MethodName, void * &Address, bool &Error);
-	bool __fastcall PasteComponents(System::Classes::TComponent* AOwner, System::Classes::TComponent* AParent, const Designintf::_di_IDesignerSelections Components);
-	void __fastcall ReaderSetName(System::Classes::TReader* Reader, System::Classes::TComponent* Component, System::UnicodeString &Name);
-	void __fastcall ComponentRead(System::Classes::TComponent* Component);
-	System::UnicodeString __fastcall UniqueName(System::Classes::TComponent* Component);
-	void __fastcall TreeEdited(System::TObject* Sender, Vcl::Comctrls::TTreeNode* Node, System::UnicodeString &S);
-	
-protected:
-	virtual void __fastcall Notification(System::Classes::TComponent* AComponent, System::Classes::TOperation Operation);
-	
-public:
-	void __fastcall SetScene(Gls::Scene::TGLScene* Scene, Designintf::_di_IDesigner Designer);
-public:
-	/* TCustomForm.Create */ inline __fastcall virtual TGLSceneEditorForm(System::Classes::TComponent* AOwner) : Vcl::Forms::TForm(AOwner) { }
-	/* TCustomForm.CreateNew */ inline __fastcall virtual TGLSceneEditorForm(System::Classes::TComponent* AOwner, int Dummy) : Vcl::Forms::TForm(AOwner, Dummy) { }
-	/* TCustomForm.CreateScaledNew */ inline __fastcall virtual TGLSceneEditorForm(System::Classes::TComponent* AOwner, int ADPI, int Dummy) : Vcl::Forms::TForm(AOwner, ADPI, Dummy) { }
-	/* TCustomForm.Destroy */ inline __fastcall virtual ~TGLSceneEditorForm() { }
-	
-public:
-	/* TWinControl.CreateParented */ inline __fastcall TGLSceneEditorForm(HWND ParentWindow) : Vcl::Forms::TForm(ParentWindow) { }
-	
-};
-
-
-//-- var, const, procedure ---------------------------------------------------
-static _DELPHI_CONST System::Int8 SCENE_SELECTED = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 BEHAVIOURS_SELECTED = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 EFFECTS_SELECTED = System::Int8(0x2);
-extern DELPHI_PACKAGE TGLSceneEditorForm* __fastcall GLSceneEditorForm(void);
-extern DELPHI_PACKAGE void __fastcall ReleaseGLSceneEditorForm(void);
-}	/* namespace Fmsceneeditor */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FMSCENEEDITOR)
-using namespace Fmsceneeditor;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// FmSceneEditorHPP

include/Win32/FmShaderMemo.hpp

@@ -1,136 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'FmShaderMemo.pas' rev: 36.00 (Windows)
-
-#ifndef FmShaderMemoHPP
-#define FmShaderMemoHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <Winapi.Windows.hpp>
-#include <Winapi.Messages.hpp>
-#include <System.SysUtils.hpp>
-#include <System.Variants.hpp>
-#include <System.Classes.hpp>
-#include <System.Win.Registry.hpp>
-#include <Vcl.Controls.hpp>
-#include <Vcl.Forms.hpp>
-#include <Vcl.ComCtrls.hpp>
-#include <Vcl.ImgList.hpp>
-#include <Vcl.Dialogs.hpp>
-#include <Vcl.Menus.hpp>
-#include <Vcl.ActnList.hpp>
-#include <Vcl.ToolWin.hpp>
-#include <Vcl.ExtCtrls.hpp>
-#include <Vcl.StdCtrls.hpp>
-#include <Vcl.Graphics.hpp>
-#include <GLS.Memo.hpp>
-#include <System.Types.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Fmshadermemo
-{
-//-- forward type declarations -----------------------------------------------
-class DELPHICLASS TShaderMemoForm;
-//-- type declarations -------------------------------------------------------
-class PASCALIMPLEMENTATION TShaderMemoForm : public Vcl::Forms::TForm
-{
-	typedef Vcl::Forms::TForm inherited;
-	
-__published:
-	Vcl::Controls::TImageList* ImageList;
-	Vcl::Comctrls::TToolBar* ToolBar;
-	Vcl::Comctrls::TToolButton* TBOpen;
-	Vcl::Comctrls::TToolButton* TBSave;
-	Vcl::Comctrls::TToolButton* TBStayOnTop;
-	Vcl::Comctrls::TToolButton* TBHelp;
-	Vcl::Comctrls::TToolButton* ToolButton2;
-	Vcl::Comctrls::TToolButton* TBCopy;
-	Vcl::Comctrls::TToolButton* TBPaste;
-	Vcl::Comctrls::TToolButton* TBCut;
-	Vcl::Comctrls::TToolButton* ToolButton10;
-	Vcl::Comctrls::TToolButton* TBTemplate;
-	Vcl::Comctrls::TToolButton* TBUndo;
-	Vcl::Comctrls::TToolButton* TBRedo;
-	Vcl::Comctrls::TToolButton* ToolButton4;
-	Gls::Memo::TGLSSynHiMemo* GLSLMemo;
-	Vcl::Dialogs::TOpenDialog* OpenDialog;
-	Vcl::Dialogs::TSaveDialog* SaveDialog;
-	Vcl::Menus::TPopupMenu* TemplateMenu;
-	Vcl::Menus::TMenuItem* GLSL120;
-	Vcl::Menus::TMenuItem* GLSL330;
-	Vcl::Menus::TMenuItem* GLSL400;
-	Vcl::Menus::TMenuItem* N1;
-	Vcl::Menus::TMenuItem* N2;
-	Vcl::Stdctrls::TMemo* CompilatorLog;
-	Vcl::Comctrls::TToolButton* TBIncIndent;
-	Vcl::Comctrls::TToolButton* TBDecIndent;
-	Vcl::Comctrls::TToolButton* TBComment;
-	Vcl::Comctrls::TToolButton* TBUncoment;
-	Vcl::Comctrls::TToolButton* ToolButton1;
-	Vcl::Extctrls::TPanel* Panel1;
-	Vcl::Stdctrls::TButton* CancelButton;
-	Vcl::Stdctrls::TButton* OKButton;
-	Vcl::Stdctrls::TButton* CheckButton;
-	void __fastcall FormCreate(System::TObject* Sender);
-	void __fastcall FormDestroy(System::TObject* Sender);
-	void __fastcall GLSLMemoGutterClick(System::TObject* Sender, int LineNo);
-	void __fastcall GLSLMemoGutterDraw(System::TObject* Sender, Vcl::Graphics::TCanvas* ACanvas, int LineNo, const Winapi::Windows::TRect &rct);
-	void __fastcall TBOpenClick(System::TObject* Sender);
-	void __fastcall TBSaveClick(System::TObject* Sender);
-	void __fastcall TBStayOnTopClick(System::TObject* Sender);
-	void __fastcall TBUndoClick(System::TObject* Sender);
-	void __fastcall GLSLMemoUndoChange(System::TObject* Sender, bool CanUndo, bool CanRedo);
-	void __fastcall TBRedoClick(System::TObject* Sender);
-	void __fastcall TBCopyClick(System::TObject* Sender);
-	void __fastcall TBPasteClick(System::TObject* Sender);
-	void __fastcall TBCutClick(System::TObject* Sender);
-	void __fastcall CheckButtonClick(System::TObject* Sender);
-	void __fastcall TBIncIndentClick(System::TObject* Sender);
-	void __fastcall TBDecIndentClick(System::TObject* Sender);
-	void __fastcall TBCommentClick(System::TObject* Sender);
-	void __fastcall TBUncomentClick(System::TObject* Sender);
-	void __fastcall FormShow(System::TObject* Sender);
-	
-private:
-	int FLightLineStyle;
-	System::Classes::TNotifyEvent FOnCheck;
-	void __fastcall OnTemplateClick(System::TObject* Sender);
-	
-public:
-	__property System::Classes::TNotifyEvent OnCheck = {read=FOnCheck, write=FOnCheck};
-public:
-	/* TCustomForm.Create */ inline __fastcall virtual TShaderMemoForm(System::Classes::TComponent* AOwner) : Vcl::Forms::TForm(AOwner) { }
-	/* TCustomForm.CreateNew */ inline __fastcall virtual TShaderMemoForm(System::Classes::TComponent* AOwner, int Dummy) : Vcl::Forms::TForm(AOwner, Dummy) { }
-	/* TCustomForm.CreateScaledNew */ inline __fastcall virtual TShaderMemoForm(System::Classes::TComponent* AOwner, int ADPI, int Dummy) : Vcl::Forms::TForm(AOwner, ADPI, Dummy) { }
-	/* TCustomForm.Destroy */ inline __fastcall virtual ~TShaderMemoForm() { }
-	
-public:
-	/* TWinControl.CreateParented */ inline __fastcall TShaderMemoForm(HWND ParentWindow) : Vcl::Forms::TForm(ParentWindow) { }
-	
-};
-
-
-//-- var, const, procedure ---------------------------------------------------
-extern DELPHI_PACKAGE TShaderMemoForm* __fastcall GLShaderEditorForm(void);
-extern DELPHI_PACKAGE void __fastcall ReleaseGLShaderEditor(void);
-}	/* namespace Fmshadermemo */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FMSHADERMEMO)
-using namespace Fmshadermemo;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// FmShaderMemoHPP

include/Win32/FmShaderUniformEditor.hpp

@@ -1,107 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'FmShaderUniformEditor.pas' rev: 36.00 (Windows)
-
-#ifndef FmShaderUniformEditorHPP
-#define FmShaderUniformEditorHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <System.SysUtils.hpp>
-#include <System.Variants.hpp>
-#include <System.Classes.hpp>
-#include <Vcl.Graphics.hpp>
-#include <Vcl.Controls.hpp>
-#include <Vcl.Forms.hpp>
-#include <Vcl.Dialogs.hpp>
-#include <Vcl.StdCtrls.hpp>
-#include <Vcl.ExtCtrls.hpp>
-#include <Vcl.Buttons.hpp>
-#include <Stage.Strings.hpp>
-#include <GLSL.ShaderParameter.hpp>
-#include <Stage.TextureFormat.hpp>
-#include <Stage.VectorGeometry.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Fmshaderuniformeditor
-{
-//-- forward type declarations -----------------------------------------------
-class DELPHICLASS TGLShaderUniformEditor;
-//-- type declarations -------------------------------------------------------
-class PASCALIMPLEMENTATION TGLShaderUniformEditor : public Vcl::Forms::TForm
-{
-	typedef Vcl::Forms::TForm inherited;
-	
-	
-private:
-	typedef System::DynamicArray<Glsl::Shaderparameter::_di_IShaderParameter> _TGLShaderUniformEditor__1;
-	
-	
-__published:
-	Vcl::Stdctrls::TListBox* LBUniforms;
-	Vcl::Stdctrls::TLabel* Labe1;
-	Vcl::Stdctrls::TComboBox* AutoSetBox;
-	Vcl::Stdctrls::TComboBox* SamplerBox;
-	Vcl::Extctrls::TPanel* Panel1;
-	Vcl::Extctrls::TRadioGroup* RedGroup;
-	Vcl::Extctrls::TRadioGroup* GreenGroup;
-	Vcl::Extctrls::TRadioGroup* BlueGroup;
-	Vcl::Extctrls::TRadioGroup* AlphaGroup;
-	Vcl::Stdctrls::TLabel* Label1;
-	Vcl::Stdctrls::TLabel* Label2;
-	Vcl::Stdctrls::TLabel* Label3;
-	Vcl::Stdctrls::TLabel* Label4;
-	Vcl::Stdctrls::TComboBox* TextureBox;
-	Vcl::Stdctrls::TButton* Button1;
-	void __fastcall FormDestroy(System::TObject* Sender);
-	void __fastcall LBUniformsClick(System::TObject* Sender);
-	void __fastcall ColorGroupClick(System::TObject* Sender);
-	void __fastcall AutoSetBoxChange(System::TObject* Sender);
-	void __fastcall TextureBoxChange(System::TObject* Sender);
-	void __fastcall SamplerBoxChange(System::TObject* Sender);
-	void __fastcall LBUniformsKeyPress(System::TObject* Sender, System::WideChar &Key);
-	
-private:
-	_TGLShaderUniformEditor__1 FUniformList;
-	
-public:
-	void __fastcall Clear();
-	void __fastcall AddTextureName(const System::UnicodeString S);
-	void __fastcall AddSamplerName(const System::UnicodeString S);
-	void __fastcall AddUniform(Glsl::Shaderparameter::_di_IShaderParameter AValue);
-	void __fastcall Execute();
-public:
-	/* TCustomForm.Create */ inline __fastcall virtual TGLShaderUniformEditor(System::Classes::TComponent* AOwner) : Vcl::Forms::TForm(AOwner) { }
-	/* TCustomForm.CreateNew */ inline __fastcall virtual TGLShaderUniformEditor(System::Classes::TComponent* AOwner, int Dummy) : Vcl::Forms::TForm(AOwner, Dummy) { }
-	/* TCustomForm.CreateScaledNew */ inline __fastcall virtual TGLShaderUniformEditor(System::Classes::TComponent* AOwner, int ADPI, int Dummy) : Vcl::Forms::TForm(AOwner, ADPI, Dummy) { }
-	/* TCustomForm.Destroy */ inline __fastcall virtual ~TGLShaderUniformEditor() { }
-	
-public:
-	/* TWinControl.CreateParented */ inline __fastcall TGLShaderUniformEditor(HWND ParentWindow) : Vcl::Forms::TForm(ParentWindow) { }
-	
-};
-
-
-//-- var, const, procedure ---------------------------------------------------
-extern DELPHI_PACKAGE TGLShaderUniformEditor* __fastcall GLShaderUniformEditor(void);
-extern DELPHI_PACKAGE void __fastcall ReleaseShaderUniformEditor(void);
-}	/* namespace Fmshaderuniformeditor */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FMSHADERUNIFORMEDITOR)
-using namespace Fmshaderuniformeditor;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// FmShaderUniformEditorHPP

include/Win32/FmVectorEditor.hpp

@@ -1,113 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'FmVectorEditor.pas' rev: 36.00 (Windows)
-
-#ifndef FmVectorEditorHPP
-#define FmVectorEditorHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <System.Classes.hpp>
-#include <System.SysUtils.hpp>
-#include <Vcl.Forms.hpp>
-#include <Vcl.ComCtrls.hpp>
-#include <Vcl.StdCtrls.hpp>
-#include <Vcl.ToolWin.hpp>
-#include <Vcl.ExtCtrls.hpp>
-#include <Vcl.Buttons.hpp>
-#include <Vcl.Graphics.hpp>
-#include <Vcl.Controls.hpp>
-#include <Stage.VectorGeometry.hpp>
-#include <Stage.Utils.hpp>
-#include <Stage.VectorTypes.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Fmvectoreditor
-{
-//-- forward type declarations -----------------------------------------------
-class DELPHICLASS TGLVectorEditorForm;
-//-- type declarations -------------------------------------------------------
-class PASCALIMPLEMENTATION TGLVectorEditorForm : public Vcl::Forms::TForm
-{
-	typedef Vcl::Forms::TForm inherited;
-	
-__published:
-	Vcl::Stdctrls::TEdit* EDx;
-	Vcl::Stdctrls::TLabel* Label1;
-	Vcl::Stdctrls::TLabel* Label2;
-	Vcl::Stdctrls::TLabel* Label3;
-	Vcl::Stdctrls::TEdit* EDy;
-	Vcl::Stdctrls::TEdit* EDz;
-	Vcl::Buttons::TBitBtn* BBok;
-	Vcl::Buttons::TBitBtn* BBcancel;
-	Vcl::Extctrls::TImage* IMx;
-	Vcl::Extctrls::TImage* IMy;
-	Vcl::Extctrls::TImage* IMz;
-	Vcl::Buttons::TSpeedButton* SpeedButton1;
-	Vcl::Buttons::TSpeedButton* SBmX;
-	Vcl::Buttons::TSpeedButton* SpeedButton3;
-	Vcl::Buttons::TSpeedButton* SBmY;
-	Vcl::Buttons::TSpeedButton* SpeedButton5;
-	Vcl::Buttons::TSpeedButton* SBmZ;
-	Vcl::Buttons::TSpeedButton* SpeedButton7;
-	Vcl::Buttons::TSpeedButton* SBUnit;
-	Vcl::Buttons::TSpeedButton* SpeedButton9;
-	Vcl::Extctrls::TBevel* Bevel1;
-	Vcl::Buttons::TSpeedButton* SBInvert;
-	void __fastcall TBxClick(System::TObject* Sender);
-	void __fastcall TByClick(System::TObject* Sender);
-	void __fastcall TBzClick(System::TObject* Sender);
-	void __fastcall TBnullClick(System::TObject* Sender);
-	void __fastcall EDxChange(System::TObject* Sender);
-	void __fastcall EDyChange(System::TObject* Sender);
-	void __fastcall EDzChange(System::TObject* Sender);
-	void __fastcall SBmXClick(System::TObject* Sender);
-	void __fastcall SBmYClick(System::TObject* Sender);
-	void __fastcall SBmZClick(System::TObject* Sender);
-	void __fastcall SBUnitClick(System::TObject* Sender);
-	void __fastcall SpeedButton9Click(System::TObject* Sender);
-	void __fastcall SBInvertClick(System::TObject* Sender);
-	
-private:
-	float vx;
-	float vy;
-	float vz;
-	void __fastcall TestInput(Vcl::Stdctrls::TEdit* edit, Vcl::Extctrls::TImage* imError, float &dest);
-	
-public:
-	bool __fastcall Execute(float &x, float &y, float &z);
-public:
-	/* TCustomForm.Create */ inline __fastcall virtual TGLVectorEditorForm(System::Classes::TComponent* AOwner) : Vcl::Forms::TForm(AOwner) { }
-	/* TCustomForm.CreateNew */ inline __fastcall virtual TGLVectorEditorForm(System::Classes::TComponent* AOwner, int Dummy) : Vcl::Forms::TForm(AOwner, Dummy) { }
-	/* TCustomForm.CreateScaledNew */ inline __fastcall virtual TGLVectorEditorForm(System::Classes::TComponent* AOwner, int ADPI, int Dummy) : Vcl::Forms::TForm(AOwner, ADPI, Dummy) { }
-	/* TCustomForm.Destroy */ inline __fastcall virtual ~TGLVectorEditorForm() { }
-	
-public:
-	/* TWinControl.CreateParented */ inline __fastcall TGLVectorEditorForm(HWND ParentWindow) : Vcl::Forms::TForm(ParentWindow) { }
-	
-};
-
-
-//-- var, const, procedure ---------------------------------------------------
-extern DELPHI_PACKAGE TGLVectorEditorForm* __fastcall GLVectorEditorForm(void);
-extern DELPHI_PACKAGE void __fastcall ReleaseVectorEditorForm(void);
-}	/* namespace Fmvectoreditor */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FMVECTOREDITOR)
-using namespace Fmvectoreditor;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// FmVectorEditorHPP

include/Win32/FmXCollectionEditor.hpp

@@ -1,120 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'FmXCollectionEditor.pas' rev: 36.00 (Windows)
-
-#ifndef FmXCollectionEditorHPP
-#define FmXCollectionEditorHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <System.Classes.hpp>
-#include <System.SysUtils.hpp>
-#include <System.Actions.hpp>
-#include <System.ImageList.hpp>
-#include <Vcl.Forms.hpp>
-#include <Vcl.ImgList.hpp>
-#include <Vcl.Controls.hpp>
-#include <Vcl.ActnList.hpp>
-#include <Vcl.Menus.hpp>
-#include <Vcl.ComCtrls.hpp>
-#include <Vcl.ToolWin.hpp>
-#include <Vcl.Dialogs.hpp>
-#include <DesignIntf.hpp>
-#include <Stage.Strings.hpp>
-#include <GLS.Scene.hpp>
-#include <GLS.Behaviours.hpp>
-#include <GLS.MaterialEx.hpp>
-#include <GLS.XCollection.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Fmxcollectioneditor
-{
-//-- forward type declarations -----------------------------------------------
-class DELPHICLASS TXCollectionEditorForm;
-//-- type declarations -------------------------------------------------------
-class PASCALIMPLEMENTATION TXCollectionEditorForm : public Vcl::Forms::TForm
-{
-	typedef Vcl::Forms::TForm inherited;
-	
-__published:
-	Vcl::Comctrls::TListView* ListView;
-	Vcl::Menus::TPopupMenu* PMListView;
-	Vcl::Actnlist::TActionList* ActionList;
-	Vcl::Actnlist::TAction* ACRemove;
-	Vcl::Actnlist::TAction* ACMoveUp;
-	Vcl::Actnlist::TAction* ACMoveDown;
-	Vcl::Controls::TImageList* ImageList;
-	Vcl::Menus::TMenuItem* MIAdd;
-	Vcl::Menus::TMenuItem* N1;
-	Vcl::Menus::TMenuItem* N2;
-	Vcl::Menus::TMenuItem* Moveup1;
-	Vcl::Menus::TMenuItem* Movedown1;
-	Vcl::Comctrls::TToolBar* ToolBar1;
-	Vcl::Comctrls::TToolButton* TBAdd;
-	Vcl::Comctrls::TToolButton* ToolButton2;
-	Vcl::Comctrls::TToolButton* ToolButton3;
-	Vcl::Comctrls::TToolButton* ToolButton4;
-	Vcl::Comctrls::TToolButton* ToolButton5;
-	Vcl::Comctrls::TToolButton* ToolButton6;
-	Vcl::Menus::TPopupMenu* PMToolBar;
-	void __fastcall TBAddClick(System::TObject* Sender);
-	void __fastcall ListViewChange(System::TObject* Sender, Vcl::Comctrls::TListItem* Item, Vcl::Comctrls::TItemChange Change);
-	void __fastcall ACRemoveExecute(System::TObject* Sender);
-	void __fastcall ACMoveUpExecute(System::TObject* Sender);
-	void __fastcall ACMoveDownExecute(System::TObject* Sender);
-	void __fastcall PMToolBarPopup(System::TObject* Sender);
-	void __fastcall PMListViewPopup(System::TObject* Sender);
-	void __fastcall FormCreate(System::TObject* Sender);
-	void __fastcall FormDestroy(System::TObject* Sender);
-	void __fastcall FormHide(System::TObject* Sender);
-	
-private:
-	Gls::Xcollection::TXCollection* FXCollection;
-	Designintf::_di_IDesigner FDesigner;
-	bool UpdatingListView;
-	void __fastcall PrepareListView();
-	void __fastcall PrepareXCollectionItemPopup(Vcl::Menus::TMenuItem* parent);
-	void __fastcall OnAddXCollectionItemClick(System::TObject* Sender);
-	void __fastcall OnNameChanged(System::TObject* Sender);
-	void __fastcall OnXCollectionDestroyed(System::TObject* Sender);
-	
-protected:
-	virtual void __fastcall Notification(System::Classes::TComponent* AComponent, System::Classes::TOperation Operation);
-	
-public:
-	void __fastcall SetXCollection(Gls::Xcollection::TXCollection* aXCollection, Designintf::_di_IDesigner designer);
-public:
-	/* TCustomForm.Create */ inline __fastcall virtual TXCollectionEditorForm(System::Classes::TComponent* AOwner) : Vcl::Forms::TForm(AOwner) { }
-	/* TCustomForm.CreateNew */ inline __fastcall virtual TXCollectionEditorForm(System::Classes::TComponent* AOwner, int Dummy) : Vcl::Forms::TForm(AOwner, Dummy) { }
-	/* TCustomForm.CreateScaledNew */ inline __fastcall virtual TXCollectionEditorForm(System::Classes::TComponent* AOwner, int ADPI, int Dummy) : Vcl::Forms::TForm(AOwner, ADPI, Dummy) { }
-	/* TCustomForm.Destroy */ inline __fastcall virtual ~TXCollectionEditorForm() { }
-	
-public:
-	/* TWinControl.CreateParented */ inline __fastcall TXCollectionEditorForm(HWND ParentWindow) : Vcl::Forms::TForm(ParentWindow) { }
-	
-};
-
-
-//-- var, const, procedure ---------------------------------------------------
-extern DELPHI_PACKAGE TXCollectionEditorForm* __fastcall XCollectionEditorForm(void);
-extern DELPHI_PACKAGE void __fastcall ReleaseXCollectionEditor(void);
-}	/* namespace Fmxcollectioneditor */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FMXCOLLECTIONEDITOR)
-using namespace Fmxcollectioneditor;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// FmXCollectionEditorHPP

include/Win32/Formats.B3D.hpp

@@ -1,314 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'Formats.B3D.pas' rev: 36.00 (Windows)
-
-#ifndef Formats_B3DHPP
-#define Formats_B3DHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <System.Classes.hpp>
-#include <System.SysUtils.hpp>
-#include <Stage.VectorGeometry.hpp>
-#include <Stage.VectorTypes.hpp>
-#include <GLS.VectorLists.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Formats
-{
-namespace B3d
-{
-//-- forward type declarations -----------------------------------------------
-struct TB3DChunk;
-struct TBB3DChunk;
-struct TTEXSChunk;
-struct TBRUSChunk;
-struct TVertexData;
-struct TVRTSChunk;
-struct TTRISChunk;
-struct TMESHChunk;
-struct TBONEChunk;
-struct TKEYSChunk;
-struct TANIMChunk;
-struct TNODEChunk;
-class DELPHICLASS TB3DMaterial;
-class DELPHICLASS TB3DTexture;
-class DELPHICLASS TB3DNode;
-class DELPHICLASS TFileB3D;
-//-- type declarations -------------------------------------------------------
-enum DECLSPEC_DENUM TB3DChunkType : unsigned char { bctUnknown, bctHeader, bctTexture, bctBrush, bctNode, bctVertex, bctTriangle, bctMesh, bctBone, bctKeyFrame, bctAnimation };
-
-typedef TB3DChunk *PB3DChunk;
-
-struct DECLSPEC_DRECORD TB3DChunk
-{
-public:
-	System::StaticArray<System::WideChar, 4> chunk;
-	int length;
-};
-
-
-typedef TBB3DChunk *PBB3DChunk;
-
-struct DECLSPEC_DRECORD TBB3DChunk
-{
-public:
-	int Version;
-};
-
-
-typedef TTEXSChunk *PTEXSChunk;
-
-struct DECLSPEC_DRECORD TTEXSChunk
-{
-public:
-	System::StaticArray<System::WideChar, 256> fileName;
-	int flags;
-	int blend;
-	float x_pos;
-	float y_pos;
-	float x_scale;
-	float y_scale;
-	float rotation;
-};
-
-
-typedef TBRUSChunk *PBRUSChunk;
-
-struct DECLSPEC_DRECORD TBRUSChunk
-{
-	
-private:
-	typedef System::DynamicArray<int> _TBRUSChunk__1;
-	
-	
-public:
-	int n_texs;
-	System::StaticArray<System::WideChar, 256> name;
-	float red;
-	float green;
-	float blue;
-	float alpha;
-	float shininess;
-	int blend;
-	int fx;
-	_TBRUSChunk__1 texture_id;
-};
-
-
-typedef TVertexData *PVertexData;
-
-struct DECLSPEC_DRECORD TVertexData
-{
-	
-private:
-	typedef System::DynamicArray<float> _TVertexData__1;
-	
-	
-public:
-	PVertexData next;
-	float x;
-	float y;
-	float z;
-	float nx;
-	float ny;
-	float nz;
-	float red;
-	float green;
-	float blue;
-	float alpha;
-	_TVertexData__1 tex_coords;
-};
-
-
-typedef TVRTSChunk *PVRTSChunk;
-
-struct DECLSPEC_DRECORD TVRTSChunk
-{
-public:
-	int flags;
-	int tex_coord_sets;
-	int tex_coord_set_size;
-	PVertexData vertices;
-};
-
-
-typedef TTRISChunk *PTRISChunk;
-
-struct DECLSPEC_DRECORD TTRISChunk
-{
-	
-private:
-	typedef System::DynamicArray<int> _TTRISChunk__1;
-	
-	
-public:
-	PTRISChunk next;
-	int brush_id;
-	_TTRISChunk__1 vertex_id;
-};
-
-
-typedef TMESHChunk *PMESHChunk;
-
-struct DECLSPEC_DRECORD TMESHChunk
-{
-public:
-	int brush_id;
-	TVRTSChunk vertices;
-	PTRISChunk triangles;
-};
-
-
-typedef TBONEChunk *PBONEChunk;
-
-struct DECLSPEC_DRECORD TBONEChunk
-{
-public:
-	int vertex_id;
-	float weight;
-};
-
-
-typedef TKEYSChunk *PKEYSChunk;
-
-struct DECLSPEC_DRECORD TKEYSChunk
-{
-public:
-	PKEYSChunk next;
-	int flags;
-	int frame;
-	Stage::Vectorgeometry::TAffineVector position;
-	Stage::Vectorgeometry::TAffineVector scale;
-	Stage::Vectortypes::TGLVector rotation;
-};
-
-
-typedef TANIMChunk *PANIMChunk;
-
-struct DECLSPEC_DRECORD TANIMChunk
-{
-public:
-	int flags;
-	int frames;
-	float fps;
-};
-
-
-typedef TNODEChunk *PNODEChunk;
-
-struct DECLSPEC_DRECORD TNODEChunk
-{
-public:
-	System::StaticArray<System::WideChar, 256> name;
-	Stage::Vectorgeometry::TAffineVector position;
-	Stage::Vectorgeometry::TAffineVector scale;
-	Stage::Vectortypes::TGLVector rotation;
-	PMESHChunk meshes;
-	PKEYSChunk keys;
-	PNODEChunk nodes;
-	TANIMChunk animation;
-	PNODEChunk next;
-	int level;
-};
-
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TB3DMaterial : public System::TObject
-{
-	typedef System::TObject inherited;
-	
-public:
-	TBRUSChunk MaterialData;
-	__fastcall TB3DMaterial();
-	__fastcall virtual ~TB3DMaterial();
-	System::UnicodeString __fastcall GetMaterialName();
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TB3DTexture : public System::TObject
-{
-	typedef System::TObject inherited;
-	
-public:
-	TTEXSChunk TextureData;
-	__fastcall TB3DTexture();
-	__fastcall virtual ~TB3DTexture();
-	System::UnicodeString __fastcall GetTextureName();
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TB3DNode : public System::TObject
-{
-	typedef System::TObject inherited;
-	
-public:
-	PNODEChunk NodeData;
-	__fastcall TB3DNode();
-	__fastcall virtual ~TB3DNode();
-	System::UnicodeString __fastcall GetNodeName();
-	void __fastcall DestroyNodeData(PNODEChunk Node);
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TFileB3D : public System::TObject
-{
-	typedef System::TObject inherited;
-	
-private:
-	System::Classes::TStringList* fTextures;
-	System::Classes::TStringList* fMaterials;
-	TB3DNode* fNodes;
-	void __fastcall FreeLists();
-	TB3DChunkType __fastcall GetChunkType(const TB3DChunk &aChunk);
-	int __fastcall SkipChunk(System::Classes::TStream* aStream, const TB3DChunk &aChunk);
-	int __fastcall ReadTextureChunk(System::Classes::TStream* aStream, const TB3DChunk &aChunk);
-	int __fastcall ReadMaterialChunk(System::Classes::TStream* aStream, const TB3DChunk &aChunk);
-	int __fastcall ReadNodeChunk(System::Classes::TStream* aStream, const TB3DChunk &aChunk, PNODEChunk Node, int level);
-	int __fastcall ReadMeshChunk(System::Classes::TStream* aStream, const TB3DChunk &aChunk, PMESHChunk Mesh);
-	int __fastcall ReadVerticesChunk(System::Classes::TStream* aStream, const TB3DChunk &aChunk, PVRTSChunk Vertices);
-	int __fastcall ReadTrianglesChunk(System::Classes::TStream* aStream, const TB3DChunk &aChunk, PTRISChunk Triangle);
-	
-public:
-	__fastcall virtual TFileB3D();
-	__fastcall virtual ~TFileB3D();
-	void __fastcall LoadFromStream(System::Classes::TStream* aStream);
-	void __fastcall Check();
-	__property System::Classes::TStringList* Textures = {read=fTextures};
-	__property System::Classes::TStringList* Materials = {read=fMaterials};
-	__property TB3DNode* Nodes = {read=fNodes};
-};
-
-#pragma pack(pop)
-
-//-- var, const, procedure ---------------------------------------------------
-}	/* namespace B3d */
-}	/* namespace Formats */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS_B3D)
-using namespace Formats::B3d;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS)
-using namespace Formats;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// Formats_B3DHPP

include/Win32/Formats.DDSImage.hpp

@@ -1,94 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'Formats.DDSImage.pas' rev: 36.00 (Windows)
-
-#ifndef Formats_DDSImageHPP
-#define Formats_DDSImageHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <Winapi.Windows.hpp>
-#include <System.Classes.hpp>
-#include <System.SysUtils.hpp>
-#include <Vcl.Graphics.hpp>
-#include <Stage.VectorTypes.hpp>
-#include <Stage.OpenGLTokens.hpp>
-#include <Stage.VectorGeometry.hpp>
-#include <GLS.Graphics.hpp>
-#include <GLS.Context.hpp>
-#include <GLS.FileDDS.hpp>
-#include <Stage.TextureFormat.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Formats
-{
-namespace Ddsimage
-{
-//-- forward type declarations -----------------------------------------------
-class DELPHICLASS TDDSImage;
-class DELPHICLASS EDDSException;
-//-- type declarations -------------------------------------------------------
-class PASCALIMPLEMENTATION TDDSImage : public Vcl::Graphics::TBitmap
-{
-	typedef Vcl::Graphics::TBitmap inherited;
-	
-public:
-	virtual void __fastcall LoadFromStream(System::Classes::TStream* stream);
-	virtual void __fastcall SaveToStream(System::Classes::TStream* stream);
-public:
-	/* TBitmap.Create */ inline __fastcall virtual TDDSImage()/* overload */ : Vcl::Graphics::TBitmap() { }
-	/* TBitmap.Create */ inline __fastcall TDDSImage(int AWidth, int AHeight)/* overload */ : Vcl::Graphics::TBitmap(AWidth, AHeight) { }
-	/* TBitmap.Destroy */ inline __fastcall virtual ~TDDSImage() { }
-	
-};
-
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION EDDSException : public System::Sysutils::Exception
-{
-	typedef System::Sysutils::Exception inherited;
-	
-public:
-	/* Exception.Create */ inline __fastcall EDDSException(const System::UnicodeString Msg) : System::Sysutils::Exception(Msg) { }
-	/* Exception.CreateFmt */ inline __fastcall EDDSException(const System::UnicodeString Msg, const System::TVarRec *Args, const System::NativeInt Args_High) : System::Sysutils::Exception(Msg, Args, Args_High) { }
-	/* Exception.CreateRes */ inline __fastcall EDDSException(System::NativeUInt Ident)/* overload */ : System::Sysutils::Exception(Ident) { }
-	/* Exception.CreateRes */ inline __fastcall EDDSException(System::PResStringRec ResStringRec)/* overload */ : System::Sysutils::Exception(ResStringRec) { }
-	/* Exception.CreateResFmt */ inline __fastcall EDDSException(System::NativeUInt Ident, const System::TVarRec *Args, const System::NativeInt Args_High)/* overload */ : System::Sysutils::Exception(Ident, Args, Args_High) { }
-	/* Exception.CreateResFmt */ inline __fastcall EDDSException(System::PResStringRec ResStringRec, const System::TVarRec *Args, const System::NativeInt Args_High)/* overload */ : System::Sysutils::Exception(ResStringRec, Args, Args_High) { }
-	/* Exception.CreateHelp */ inline __fastcall EDDSException(const System::UnicodeString Msg, int AHelpContext) : System::Sysutils::Exception(Msg, AHelpContext) { }
-	/* Exception.CreateFmtHelp */ inline __fastcall EDDSException(const System::UnicodeString Msg, const System::TVarRec *Args, const System::NativeInt Args_High, int AHelpContext) : System::Sysutils::Exception(Msg, Args, Args_High, AHelpContext) { }
-	/* Exception.CreateResHelp */ inline __fastcall EDDSException(System::NativeUInt Ident, int AHelpContext)/* overload */ : System::Sysutils::Exception(Ident, AHelpContext) { }
-	/* Exception.CreateResHelp */ inline __fastcall EDDSException(System::PResStringRec ResStringRec, int AHelpContext)/* overload */ : System::Sysutils::Exception(ResStringRec, AHelpContext) { }
-	/* Exception.CreateResFmtHelp */ inline __fastcall EDDSException(System::PResStringRec ResStringRec, const System::TVarRec *Args, const System::NativeInt Args_High, int AHelpContext)/* overload */ : System::Sysutils::Exception(ResStringRec, Args, Args_High, AHelpContext) { }
-	/* Exception.CreateResFmtHelp */ inline __fastcall EDDSException(System::NativeUInt Ident, const System::TVarRec *Args, const System::NativeInt Args_High, int AHelpContext)/* overload */ : System::Sysutils::Exception(Ident, Args, Args_High, AHelpContext) { }
-	/* Exception.Destroy */ inline __fastcall virtual ~EDDSException() { }
-	
-};
-
-#pragma pack(pop)
-
-//-- var, const, procedure ---------------------------------------------------
-}	/* namespace Ddsimage */
-}	/* namespace Formats */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS_DDSIMAGE)
-using namespace Formats::Ddsimage;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS)
-using namespace Formats;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// Formats_DDSImageHPP

include/Win32/Formats.DXTC.hpp

@@ -1,341 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'Formats.DXTC.pas' rev: 36.00 (Windows)
-
-#ifndef Formats_DXTCHPP
-#define Formats_DXTCHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <Winapi.OpenGL.hpp>
-#include <Winapi.OpenGLext.hpp>
-#include <System.SysUtils.hpp>
-#include <Stage.TextureFormat.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Formats
-{
-namespace Dxtc
-{
-//-- forward type declarations -----------------------------------------------
-struct TDDPIXELFORMAT;
-struct TDDSURFACEDESC2;
-struct TDDSHeader;
-struct DXTColBlock;
-struct DXT3AlphaBlock;
-struct DXT5AlphaBlock;
-struct TDDS_HEADER_DXT10;
-struct TGLImageDataFormat;
-//-- type declarations -------------------------------------------------------
-struct DECLSPEC_DRECORD TDDPIXELFORMAT
-{
-public:
-	unsigned dwSize;
-	unsigned dwFlags;
-	unsigned dwFourCC;
-	unsigned dwRGBBitCount;
-	unsigned dwRBitMask;
-	unsigned dwGBitMask;
-	unsigned dwBBitMask;
-	unsigned dwRGBAlphaBitMask;
-};
-
-
-struct DECLSPEC_DRECORD TDDSURFACEDESC2
-{
-public:
-	unsigned dwSize;
-	unsigned dwFlags;
-	unsigned dwHeight;
-	unsigned dwWidth;
-	unsigned dwPitchOrLinearSize;
-	unsigned dwDepth;
-	unsigned dwMipMapCount;
-	System::StaticArray<unsigned, 11> dwReserved1;
-	TDDPIXELFORMAT ddpf;
-	unsigned dwCaps;
-	unsigned dwCaps2;
-	unsigned dwCaps3;
-	unsigned dwCaps4;
-	unsigned dwReserved2;
-};
-
-
-struct DECLSPEC_DRECORD TDDSHeader
-{
-public:
-	unsigned Magic;
-	TDDSURFACEDESC2 SurfaceFormat;
-};
-
-
-struct DECLSPEC_DRECORD DXTColBlock
-{
-public:
-	System::Word col0;
-	System::Word col1;
-	System::StaticArray<System::Byte, 4> row;
-};
-
-
-typedef DXTColBlock *PDXTColBlock;
-
-struct DECLSPEC_DRECORD DXT3AlphaBlock
-{
-public:
-	System::StaticArray<System::Word, 4> row;
-};
-
-
-typedef DXT3AlphaBlock *PDXT3AlphaBlock;
-
-struct DECLSPEC_DRECORD DXT5AlphaBlock
-{
-public:
-	System::Byte alpha0;
-	System::Byte alpha1;
-	System::StaticArray<System::Byte, 6> row;
-};
-
-
-typedef DXT5AlphaBlock *PDXT5AlphaBlock;
-
-struct DECLSPEC_DRECORD TDDS_HEADER_DXT10
-{
-public:
-	int dxgiFormat;
-	int resourceDimension;
-	unsigned miscFlag;
-	unsigned arraySize;
-	unsigned reserved;
-};
-
-
-typedef System::StaticArray<char, 4> TFOURCC;
-
-struct DECLSPEC_DRECORD TGLImageDataFormat
-{
-public:
-	unsigned ColorFlag;
-	unsigned RBits;
-	unsigned GBits;
-	unsigned BBits;
-	unsigned ABits;
-	unsigned colorFormat;
-	Stage::Textureformat::TglInternalFormat TexFormat;
-	unsigned dType;
-};
-
-
-//-- var, const, procedure ---------------------------------------------------
-static _DELPHI_CONST System::Int8 DDSD_CAPS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 DDSD_HEIGHT = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 DDSD_WIDTH = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 DDSD_PITCH = System::Int8(0x8);
-static _DELPHI_CONST System::Word DDSD_PIXELFORMAT = System::Word(0x1000);
-static _DELPHI_CONST int DDSD_MIPMAPCOUNT = int(0x20000);
-static _DELPHI_CONST int DDSD_LINEARSIZE = int(0x80000);
-static _DELPHI_CONST int DDSD_DEPTH = int(0x800000);
-static _DELPHI_CONST System::Int8 DDPF_ALPHAPIXELS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 DDPF_A = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 DDPF_FOURCC = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 DDPF_RGB = System::Int8(0x40);
-static _DELPHI_CONST System::Int8 DDPF_RGBA = System::Int8(0x41);
-static _DELPHI_CONST int DDPF_L = int(0x20000);
-static _DELPHI_CONST int DDPF_LA = int(0x20001);
-static _DELPHI_CONST System::Int8 DDSCAPS_COMPLEX = System::Int8(0x8);
-static _DELPHI_CONST System::Word DDSCAPS_TEXTURE = System::Word(0x1000);
-static _DELPHI_CONST int DDSCAPS_MIPMAP = int(0x400000);
-static _DELPHI_CONST System::Word DDSCAPS2_CUBEMAP = System::Word(0x200);
-static _DELPHI_CONST System::Word DDSCAPS2_CUBEMAP_POSITIVEX = System::Word(0x400);
-static _DELPHI_CONST System::Word DDSCAPS2_CUBEMAP_NEGATIVEX = System::Word(0x800);
-static _DELPHI_CONST System::Word DDSCAPS2_CUBEMAP_POSITIVEY = System::Word(0x1000);
-static _DELPHI_CONST System::Word DDSCAPS2_CUBEMAP_NEGATIVEY = System::Word(0x2000);
-static _DELPHI_CONST System::Word DDSCAPS2_CUBEMAP_POSITIVEZ = System::Word(0x4000);
-static _DELPHI_CONST System::Word DDSCAPS2_CUBEMAP_NEGATIVEZ = System::Word(0x8000);
-static _DELPHI_CONST int DDSCAPS2_VOLUME = int(0x200000);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_FORCE_UINT = System::Int8(-1);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_UNKNOWN = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32G32B32A32_TYPELESS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32G32B32A32_FLOAT = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32G32B32A32_UINT = System::Int8(0x3);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32G32B32A32_SINT = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32G32B32_TYPELESS = System::Int8(0x5);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32G32B32_FLOAT = System::Int8(0x6);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32G32B32_UINT = System::Int8(0x7);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32G32B32_SINT = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16G16B16A16_TYPELESS = System::Int8(0x9);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16G16B16A16_FLOAT = System::Int8(0xa);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16G16B16A16_UNORM = System::Int8(0xb);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16G16B16A16_UINT = System::Int8(0xc);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16G16B16A16_SNORM = System::Int8(0xd);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16G16B16A16_SINT = System::Int8(0xe);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32G32_TYPELESS = System::Int8(0xf);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32G32_FLOAT = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32G32_UINT = System::Int8(0x11);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32G32_SINT = System::Int8(0x12);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32G8X24_TYPELESS = System::Int8(0x13);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_D32_FLOAT_S8X24_UINT = System::Int8(0x14);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32_FLOAT_X8X24_TYPELESS = System::Int8(0x15);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_X32_TYPELESS_G8X24_UINT = System::Int8(0x16);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R10G10B10A2_TYPELESS = System::Int8(0x17);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R10G10B10A2_UNORM = System::Int8(0x18);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R10G10B10A2_UINT = System::Int8(0x19);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R11G11B10_FLOAT = System::Int8(0x1a);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8G8B8A8_TYPELESS = System::Int8(0x1b);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8G8B8A8_UNORM = System::Int8(0x1c);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8G8B8A8_UNORM_SRGB = System::Int8(0x1d);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8G8B8A8_UINT = System::Int8(0x1e);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8G8B8A8_SNORM = System::Int8(0x1f);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8G8B8A8_SINT = System::Int8(0x20);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16G16_TYPELESS = System::Int8(0x21);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16G16_FLOAT = System::Int8(0x22);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16G16_UNORM = System::Int8(0x23);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16G16_UINT = System::Int8(0x24);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16G16_SNORM = System::Int8(0x25);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16G16_SINT = System::Int8(0x26);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32_TYPELESS = System::Int8(0x27);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_D32_FLOAT = System::Int8(0x28);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32_FLOAT = System::Int8(0x29);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32_UINT = System::Int8(0x2a);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32_SINT = System::Int8(0x2b);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R24G8_TYPELESS = System::Int8(0x2c);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_D24_UNORM_S8_UINT = System::Int8(0x2d);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R24_UNORM_X8_TYPELESS = System::Int8(0x2e);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_X24_TYPELESS_G8_UINT = System::Int8(0x2f);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8G8_TYPELESS = System::Int8(0x30);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8G8_UNORM = System::Int8(0x31);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8G8_UINT = System::Int8(0x32);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8G8_SNORM = System::Int8(0x33);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8G8_SINT = System::Int8(0x34);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16_TYPELESS = System::Int8(0x35);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16_FLOAT = System::Int8(0x36);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_D16_UNORM = System::Int8(0x37);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16_UNORM = System::Int8(0x38);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16_UINT = System::Int8(0x39);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16_SNORM = System::Int8(0x3a);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16_SINT = System::Int8(0x3b);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8_TYPELESS = System::Int8(0x3c);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8_UNORM = System::Int8(0x3d);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8_UINT = System::Int8(0x3e);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8_SNORM = System::Int8(0x3f);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8_SINT = System::Int8(0x40);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_A8_UNORM = System::Int8(0x41);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R1_UNORM = System::Int8(0x42);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R9G9B9E5_SHAREDEXP = System::Int8(0x43);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8G8_B8G8_UNORM = System::Int8(0x44);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_G8R8_G8B8_UNORM = System::Int8(0x45);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC1_TYPELESS = System::Int8(0x46);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC1_UNORM = System::Int8(0x47);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC1_UNORM_SRGB = System::Int8(0x48);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC2_TYPELESS = System::Int8(0x49);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC2_UNORM = System::Int8(0x4a);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC2_UNORM_SRGB = System::Int8(0x4b);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC3_TYPELESS = System::Int8(0x4c);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC3_UNORM = System::Int8(0x4d);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC3_UNORM_SRGB = System::Int8(0x4e);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC4_TYPELESS = System::Int8(0x4f);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC4_UNORM = System::Int8(0x50);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC4_SNORM = System::Int8(0x51);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC5_TYPELESS = System::Int8(0x52);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC5_UNORM = System::Int8(0x53);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC5_SNORM = System::Int8(0x54);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_B5G6R5_UNORM = System::Int8(0x55);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_B5G5R5A1_UNORM = System::Int8(0x56);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_B8G8R8A8_UNORM = System::Int8(0x57);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_B8G8R8X8_UNORM = System::Int8(0x58);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R10G10B10_XR_BIAS_A2_UNORM = System::Int8(0x59);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_B8G8R8A8_TYPELESS = System::Int8(0x5a);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_B8G8R8A8_UNORM_SRGB = System::Int8(0x5b);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_B8G8R8X8_TYPELESS = System::Int8(0x5c);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_B8G8R8X8_UNORM_SRGB = System::Int8(0x5d);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC6H_TYPELESS = System::Int8(0x5e);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC6H_UF16 = System::Int8(0x5f);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC6H_SF16 = System::Int8(0x60);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC7_TYPELESS = System::Int8(0x61);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC7_UNORM = System::Int8(0x62);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC7_UNORM_SRGB = System::Int8(0x63);
-static _DELPHI_CONST System::Int8 D3D11_RESOURCE_DIMENSION_UNKNOWN = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 D3D11_RESOURCE_DIMENSION_BUFFER = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 D3D11_RESOURCE_DIMENSION_TEXTURE1D = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 D3D11_RESOURCE_DIMENSION_TEXTURE2D = System::Int8(0x3);
-static _DELPHI_CONST System::Int8 D3D11_RESOURCE_DIMENSION_TEXTURE3D = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 FOURCC_UNKNOWN = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 FOURCC_R8G8B8 = System::Int8(0x14);
-static _DELPHI_CONST System::Int8 FOURCC_A8R8G8B8 = System::Int8(0x15);
-static _DELPHI_CONST System::Int8 FOURCC_X8R8G8B8 = System::Int8(0x16);
-static _DELPHI_CONST System::Int8 FOURCC_R5G6B5 = System::Int8(0x17);
-static _DELPHI_CONST System::Int8 FOURCC_X1R5G5B5 = System::Int8(0x18);
-static _DELPHI_CONST System::Int8 FOURCC_A1R5G5B5 = System::Int8(0x19);
-static _DELPHI_CONST System::Int8 FOURCC_A4R4G4B4 = System::Int8(0x1a);
-static _DELPHI_CONST System::Int8 FOURCC_R3G3B2 = System::Int8(0x1b);
-static _DELPHI_CONST System::Int8 FOURCC_A8 = System::Int8(0x1c);
-static _DELPHI_CONST System::Int8 FOURCC_A8R3G3B2 = System::Int8(0x1d);
-static _DELPHI_CONST System::Int8 FOURCC_X4R4G4B4 = System::Int8(0x1e);
-static _DELPHI_CONST System::Int8 FOURCC_A2B10G10R10 = System::Int8(0x1f);
-static _DELPHI_CONST System::Int8 FOURCC_A8B8G8R8 = System::Int8(0x20);
-static _DELPHI_CONST System::Int8 FOURCC_X8B8G8R8 = System::Int8(0x21);
-static _DELPHI_CONST System::Int8 FOURCC_G16R16 = System::Int8(0x22);
-static _DELPHI_CONST System::Int8 FOURCC_A2R10G10B10 = System::Int8(0x23);
-static _DELPHI_CONST System::Int8 FOURCC_A16B16G16R16 = System::Int8(0x24);
-static _DELPHI_CONST System::Int8 FOURCC_L8 = System::Int8(0x32);
-static _DELPHI_CONST System::Int8 FOURCC_A8L8 = System::Int8(0x33);
-static _DELPHI_CONST System::Int8 FOURCC_A4L4 = System::Int8(0x34);
-static _DELPHI_CONST int FOURCC_DXT1 = int(0x31545844);
-static _DELPHI_CONST int FOURCC_DXT2 = int(0x32545844);
-static _DELPHI_CONST int FOURCC_DXT3 = int(0x33545844);
-static _DELPHI_CONST int FOURCC_DXT4 = int(0x34545844);
-static _DELPHI_CONST int FOURCC_DXT5 = int(0x35545844);
-static _DELPHI_CONST int FOURCC_ATI1 = int(0x31495441);
-static _DELPHI_CONST int FOURCC_ATI2 = int(0x32495441);
-static _DELPHI_CONST System::Int8 FOURCC_D16_LOCKABLE = System::Int8(0x46);
-static _DELPHI_CONST System::Int8 FOURCC_D32 = System::Int8(0x47);
-static _DELPHI_CONST System::Int8 FOURCC_D24X8 = System::Int8(0x4d);
-static _DELPHI_CONST System::Int8 FOURCC_D16 = System::Int8(0x50);
-static _DELPHI_CONST System::Int8 FOURCC_D32F_LOCKABLE = System::Int8(0x52);
-static _DELPHI_CONST System::Int8 FOURCC_L16 = System::Int8(0x51);
-static _DELPHI_CONST System::Int8 FOURCC_R16F = System::Int8(0x6f);
-static _DELPHI_CONST System::Int8 FOURCC_G16R16F = System::Int8(0x70);
-static _DELPHI_CONST System::Int8 FOURCC_A16B16G16R16F = System::Int8(0x71);
-static _DELPHI_CONST System::Int8 FOURCC_R32F = System::Int8(0x72);
-static _DELPHI_CONST System::Int8 FOURCC_G32R32F = System::Int8(0x73);
-static _DELPHI_CONST System::Int8 FOURCC_A32B32G32R32F = System::Int8(0x74);
-static _DELPHI_CONST int FOURCC_DX10 = int(0x47495844);
-extern DELPHI_PACKAGE System::StaticArray<TGLImageDataFormat, 4> cImageDataFormat8bits;
-extern DELPHI_PACKAGE System::StaticArray<TGLImageDataFormat, 5> cImageDataFormat16bits;
-extern DELPHI_PACKAGE System::StaticArray<TGLImageDataFormat, 1> cImageDataFormat24bits;
-extern DELPHI_PACKAGE System::StaticArray<TGLImageDataFormat, 7> cImageDataFormat32bits;
-extern DELPHI_PACKAGE void __fastcall DecodeDXT1toBitmap32(System::Sysutils::PByteArray encData, System::Sysutils::PByteArray decData, int w, int h, bool &trans);
-extern DELPHI_PACKAGE void __fastcall DecodeDXT3toBitmap32(System::Sysutils::PByteArray encData, System::Sysutils::PByteArray decData, int w, int h);
-extern DELPHI_PACKAGE void __fastcall DecodeDXT5toBitmap32(System::Sysutils::PByteArray encData, System::Sysutils::PByteArray decData, int w, int h);
-extern DELPHI_PACKAGE void __fastcall flip_blocks_dxtc1(Winapi::Opengl::PGLubyte data, int numBlocks);
-extern DELPHI_PACKAGE void __fastcall flip_blocks_dxtc3(Winapi::Opengl::PGLubyte data, int numBlocks);
-extern DELPHI_PACKAGE void __fastcall flip_dxt5_alpha(PDXT5AlphaBlock block);
-extern DELPHI_PACKAGE void __fastcall flip_blocks_dxtc5(Winapi::Opengl::PGLubyte data, int numBlocks);
-extern DELPHI_PACKAGE bool __fastcall DDSHeaderToGLEnum(const TDDSHeader &DX9header, const TDDS_HEADER_DXT10 &DX11header, const bool useDX11, /* out */ Stage::Textureformat::TglInternalFormat &iFormat, /* out */ unsigned &colorFormat, /* out */ unsigned &dataType, /* out */ int &bpe);
-extern DELPHI_PACKAGE bool __fastcall GLEnumToDDSHeader(TDDSHeader &DX9header, TDDS_HEADER_DXT10 &DX11header, const bool useDX11, const Stage::Textureformat::TglInternalFormat iFormat, const unsigned colorFormat, const unsigned dataType, const int bpe);
-extern DELPHI_PACKAGE bool __fastcall FindDDSCompatibleDataFormat(const Stage::Textureformat::TglInternalFormat iFormat, /* out */ unsigned &colorFormat, /* out */ unsigned &dataType);
-}	/* namespace Dxtc */
-}	/* namespace Formats */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS_DXTC)
-using namespace Formats::Dxtc;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS)
-using namespace Formats;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// Formats_DXTCHPP

include/Win32/Formats.GL2.hpp

@@ -1,274 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'Formats.GL2.pas' rev: 36.00 (Windows)
-
-#ifndef Formats_GL2HPP
-#define Formats_GL2HPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <System.Classes.hpp>
-#include <System.SysUtils.hpp>
-#include <Stage.VectorGeometry.hpp>
-#include <Stage.VectorTypes.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Formats
-{
-namespace Gl2
-{
-//-- forward type declarations -----------------------------------------------
-struct TGLMHeader;
-struct TGLMSurfaceHeirachy;
-struct TGLMSurfaceHeader;
-struct TGLMTriangle;
-struct TGLMVertex;
-struct TGLMSurface;
-struct TGLMLODInfo;
-struct TGLMLODs;
-struct TGLAHeader;
-struct TGLASkeleton;
-class DELPHICLASS TFileGLM;
-class DELPHICLASS TFileGLA;
-//-- type declarations -------------------------------------------------------
-struct DECLSPEC_DRECORD TGLMHeader
-{
-public:
-	System::StaticArray<System::WideChar, 4> fileID;
-	int version;
-	System::StaticArray<System::WideChar, 64> strFile;
-	System::StaticArray<System::WideChar, 64> animName;
-	int animIndex;
-	int numBones;
-	int numLODs;
-	int ofsLODs;
-	int numSurfaces;
-	int ofsSurfHierarchy;
-	int ofsEnd;
-};
-
-
-typedef System::DynamicArray<int> TGLMSurfaceHeirachyOffsets;
-
-struct DECLSPEC_DRECORD TGLMSurfaceHeirachy
-{
-	
-private:
-	typedef System::DynamicArray<int> _TGLMSurfaceHeirachy__1;
-	
-	
-public:
-	System::StaticArray<System::WideChar, 64> name;
-	System::LongWord flags;
-	System::StaticArray<System::WideChar, 64> shader;
-	int shaderIndex;
-	int parentIndex;
-	int numChildren;
-	_TGLMSurfaceHeirachy__1 childIndices;
-};
-
-
-struct DECLSPEC_DRECORD TGLMSurfaceHeader
-{
-public:
-	int ident;
-	int thisSurfaceIndex;
-	int ofsHeader;
-	int numVerts;
-	int ofsVerts;
-	int numTriangles;
-	int ofsTriangles;
-	int numBoneReferences;
-	int ofsBoneReferences;
-	int ofsEnd;
-};
-
-
-struct DECLSPEC_DRECORD TGLMTriangle
-{
-public:
-	System::StaticArray<int, 3> indices;
-};
-
-
-struct DECLSPEC_DRECORD TGLMVertex
-{
-public:
-	Stage::Vectortypes::TVector3f normal;
-	Stage::Vectortypes::TVector3f vertex;
-	unsigned uiNumWeightsAndBoneIndices;
-	System::StaticArray<System::Byte, 4> BoneWeightings;
-};
-
-
-struct DECLSPEC_DRECORD TGLMSurface
-{
-	
-private:
-	typedef System::DynamicArray<TGLMTriangle> _TGLMSurface__1;
-	
-	typedef System::DynamicArray<TGLMVertex> _TGLMSurface__2;
-	
-	typedef System::DynamicArray<Stage::Vectortypes::TVector2f> _TGLMSurface__3;
-	
-	typedef System::DynamicArray<int> _TGLMSurface__4;
-	
-	
-public:
-	TGLMSurfaceHeader SurfaceHeader;
-	_TGLMSurface__1 Triangles;
-	_TGLMSurface__2 Vertices;
-	_TGLMSurface__3 TexCoords;
-	_TGLMSurface__4 BoneReferences;
-};
-
-
-struct DECLSPEC_DRECORD TGLMLODInfo
-{
-public:
-	int ofsEnd;
-};
-
-
-typedef System::DynamicArray<int> TGLMLODSurfaceOffsets;
-
-struct DECLSPEC_DRECORD TGLMLODs
-{
-	
-private:
-	typedef System::DynamicArray<TGLMSurface> _TGLMLODs__1;
-	
-	
-public:
-	TGLMLODInfo LODInfo;
-	TGLMLODSurfaceOffsets LODSurfaceOffsets;
-	_TGLMLODs__1 Surfaces;
-};
-
-
-struct DECLSPEC_DRECORD TGLAHeader
-{
-public:
-	System::StaticArray<System::WideChar, 4> fileID;
-	int version;
-	System::StaticArray<System::WideChar, 64> name;
-	float fScale;
-	int numFrames;
-	int ofsFrames;
-	int numBones;
-	int ofsCompBonePool;
-	int ofsSkel;
-	int ofsEnd;
-};
-
-
-typedef System::StaticArray<Stage::Vectortypes::TVector4f, 3> TGLABone;
-
-typedef System::StaticArray<System::Word, 7> TGLACompQuatBone;
-
-typedef System::DynamicArray<int> TGLASkeletonOffsets;
-
-struct DECLSPEC_DRECORD TGLASkeleton
-{
-	
-private:
-	typedef System::DynamicArray<int> _TGLASkeleton__1;
-	
-	
-public:
-	System::StaticArray<System::WideChar, 64> name;
-	System::LongWord flags;
-	int parent;
-	TGLABone BasePoseMat;
-	TGLABone BasePoseMatInv;
-	int numChildren;
-	_TGLASkeleton__1 children;
-};
-
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TFileGLM : public System::TObject
-{
-	typedef System::TObject inherited;
-	
-	
-private:
-	typedef System::DynamicArray<TGLMSurfaceHeirachy> _TFileGLM__1;
-	
-	typedef System::DynamicArray<TGLMLODs> _TFileGLM__2;
-	
-	
-public:
-	TGLMHeader ModelHeader;
-	TGLMSurfaceHeirachyOffsets SurfaceHeirachyOffsets;
-	_TFileGLM__1 SurfaceHeirachy;
-	_TFileGLM__2 LODs;
-	void __fastcall LoadFromStream(System::Classes::TStream* aStream);
-public:
-	/* TObject.Create */ inline __fastcall TFileGLM() : System::TObject() { }
-	/* TObject.Destroy */ inline __fastcall virtual ~TFileGLM() { }
-	
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TFileGLA : public System::TObject
-{
-	typedef System::TObject inherited;
-	
-	
-private:
-	typedef System::DynamicArray<TGLASkeleton> _TFileGLA__1;
-	
-	typedef System::DynamicArray<int> _TFileGLA__2;
-	
-	typedef System::DynamicArray<TGLACompQuatBone> _TFileGLA__3;
-	
-	
-public:
-	TGLAHeader AnimHeader;
-	TGLASkeletonOffsets SkeletonOffsets;
-	_TFileGLA__1 Skeleton;
-	_TFileGLA__2 BoneIndices;
-	_TFileGLA__3 CompBonePool;
-	TGLACompQuatBone __fastcall GetCompressedMatrix(int Frame, int Bone);
-	Stage::Vectortypes::TGLMatrix __fastcall GetUnCompressedMatrix(int Frame, int Bone);
-	void __fastcall LoadFromStream(System::Classes::TStream* aStream);
-public:
-	/* TObject.Create */ inline __fastcall TFileGLA() : System::TObject() { }
-	/* TObject.Destroy */ inline __fastcall virtual ~TFileGLA() { }
-	
-};
-
-#pragma pack(pop)
-
-//-- var, const, procedure ---------------------------------------------------
-extern DELPHI_PACKAGE int __fastcall G2_GetVertWeights(const TGLMVertex &vert);
-extern DELPHI_PACKAGE int __fastcall G2_GetVertBoneIndex(const TGLMVertex &vert, int iWeightNum);
-extern DELPHI_PACKAGE float __fastcall G2_GetVertBoneWeight(const TGLMVertex &vert, unsigned iWeightNum, float &fTotalWeight, const unsigned iNumWeights);
-extern DELPHI_PACKAGE void __fastcall MC_UnCompressQuat(Stage::Vectortypes::TGLMatrix &mat, const TGLACompQuatBone &comp);
-}	/* namespace Gl2 */
-}	/* namespace Formats */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS_GL2)
-using namespace Formats::Gl2;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS)
-using namespace Formats;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// Formats_GL2HPP

include/Win32/Formats.HDRImage.hpp

@@ -1,67 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'Formats.HDRImage.pas' rev: 36.00 (Windows)
-
-#ifndef Formats_HDRImageHPP
-#define Formats_HDRImageHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <Winapi.Windows.hpp>
-#include <System.Classes.hpp>
-#include <System.SysUtils.hpp>
-#include <Vcl.Graphics.hpp>
-#include <Stage.VectorTypes.hpp>
-#include <Stage.OpenGLTokens.hpp>
-#include <Stage.VectorGeometry.hpp>
-#include <Stage.TextureFormat.hpp>
-#include <GLS.FileHDR.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Formats
-{
-namespace Hdrimage
-{
-//-- forward type declarations -----------------------------------------------
-class DELPHICLASS THDRImage;
-//-- type declarations -------------------------------------------------------
-class PASCALIMPLEMENTATION THDRImage : public Vcl::Graphics::TBitmap
-{
-	typedef Vcl::Graphics::TBitmap inherited;
-	
-public:
-	virtual void __fastcall LoadFromStream(System::Classes::TStream* stream);
-	virtual void __fastcall SaveToStream(System::Classes::TStream* stream);
-public:
-	/* TBitmap.Create */ inline __fastcall virtual THDRImage()/* overload */ : Vcl::Graphics::TBitmap() { }
-	/* TBitmap.Create */ inline __fastcall THDRImage(int AWidth, int AHeight)/* overload */ : Vcl::Graphics::TBitmap(AWidth, AHeight) { }
-	/* TBitmap.Destroy */ inline __fastcall virtual ~THDRImage() { }
-	
-};
-
-
-//-- var, const, procedure ---------------------------------------------------
-}	/* namespace Hdrimage */
-}	/* namespace Formats */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS_HDRIMAGE)
-using namespace Formats::Hdrimage;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS)
-using namespace Formats;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// Formats_HDRImageHPP

include/Win32/Formats.LWO.hpp

@@ -1,808 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'Formats.LWO.pas' rev: 36.00 (Windows)
-
-#ifndef Formats_LWOHPP
-#define Formats_LWOHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <System.Classes.hpp>
-#include <System.SysUtils.hpp>
-#include <System.IOUtils.hpp>
-#include <System.Math.hpp>
-#include <Stage.VectorGeometry.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Formats
-{
-namespace Lwo
-{
-//-- forward type declarations -----------------------------------------------
-struct TLWChunkRec;
-struct TLWSubChunkRec;
-struct TLWPolsInfo;
-struct TLWPntsInfo;
-struct TLWPolyTagMap;
-struct TLWVertexMap;
-class DELPHICLASS TLWChunk;
-class DELPHICLASS TLWSubChunk;
-class DELPHICLASS TLWChunkList;
-class DELPHICLASS TLWParentChunk;
-class DELPHICLASS TLWPnts;
-class DELPHICLASS TLWPols;
-class DELPHICLASS TLWVMap;
-class DELPHICLASS TLWTags;
-class DELPHICLASS TLWSurf;
-class DELPHICLASS TLWLayr;
-class DELPHICLASS TLWPTag;
-class DELPHICLASS TLWObjectFile;
-class DELPHICLASS TLWClip;
-class DELPHICLASS TLWContentDir;
-//-- type declarations -------------------------------------------------------
-typedef System::StaticArray<char, 4> TID4;
-
-typedef TID4 *PID4;
-
-typedef System::DynamicArray<TID4> TID4DynArray;
-
-typedef System::Int8 TI1;
-
-typedef System::Int8 *PI1;
-
-typedef short TI2;
-
-typedef short *PI2;
-
-typedef System::LongInt TI4;
-
-typedef int *PI4;
-
-typedef System::Byte TU1;
-
-typedef System::Byte *PU1;
-
-typedef System::DynamicArray<System::Byte> TU1DynArray;
-
-typedef System::Word TU2;
-
-typedef System::Word *PU2;
-
-typedef System::StaticArray<System::Word, 65535> TU2Array;
-
-typedef TU2Array *PU2Array;
-
-typedef System::DynamicArray<System::Word> TU2DynArray;
-
-typedef System::LongWord TU4;
-
-typedef unsigned *PU4;
-
-typedef System::StaticArray<unsigned, 65535> TU4Array;
-
-typedef TU4Array *PU4Array;
-
-typedef System::DynamicArray<unsigned> TU4DynArray;
-
-typedef float TF4;
-
-typedef float *PF4;
-
-typedef System::StaticArray<float, 65535> TF4Array;
-
-typedef TF4Array *PF4Array;
-
-typedef System::DynamicArray<float> TF4DynArray;
-
-typedef TF4 TANG4;
-
-typedef float *PANG4;
-
-typedef System::StaticArray<float, 3> TVec12;
-
-typedef TVec12 *PVec12;
-
-typedef System::StaticArray<System::StaticArray<float, 3>, 65535> TVec12Array;
-
-typedef TVec12Array *PVec12Array;
-
-typedef System::DynamicArray<TVec12> TVec12DynArray;
-
-typedef TVec12 TColr12;
-
-typedef TVec12 *PColr12;
-
-typedef System::DynamicArray<TVec12> TColr12DynArray;
-
-typedef System::StaticArray<System::Byte, 4> TColr4;
-
-typedef TColr4 *PColr4;
-
-typedef TLWChunkRec *PLWChunkRec;
-
-struct DECLSPEC_DRECORD TLWChunkRec
-{
-public:
-	TID4 id;
-	TU4 size;
-	void *data;
-};
-
-
-typedef TLWSubChunkRec *PLWSubChunkRec;
-
-struct DECLSPEC_DRECORD TLWSubChunkRec
-{
-public:
-	TID4 id;
-	TU2 size;
-	void *data;
-};
-
-
-struct DECLSPEC_DRECORD TLWPolsInfo
-{
-public:
-	TVec12 norm;
-	TVec12DynArray vnorms;
-	TU2 surfid;
-};
-
-
-typedef System::DynamicArray<TLWPolsInfo> TLWPolsInfoDynArray;
-
-struct DECLSPEC_DRECORD TLWPntsInfo
-{
-public:
-	TU2 npols;
-	TU2DynArray pols;
-};
-
-
-typedef System::DynamicArray<TLWPntsInfo> TLWPntsInfoDynArray;
-
-typedef TU2DynArray TLWPolsDynArray;
-
-typedef TU2DynArray TLWPolyTagMapDynArray;
-
-struct DECLSPEC_DRECORD TLWPolyTagMap
-{
-public:
-	TU2 poly;
-	TU2 tag;
-};
-
-
-typedef TLWPolyTagMap *PLWPolyTagMap;
-
-struct DECLSPEC_DRECORD TLWVertexMap
-{
-public:
-	TU2 vert;
-	TF4DynArray values;
-};
-
-
-typedef System::DynamicArray<TLWVertexMap> TLWVertexMapDynArray;
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TLWChunk : public System::Classes::TPersistent
-{
-	typedef System::Classes::TPersistent inherited;
-	
-private:
-	void *FData;
-	TID4 FID;
-	TU4 FSize;
-	TLWParentChunk* FParentChunk;
-	TLWChunkList* FOwner;
-	TLWChunkList* __fastcall GetRootChunks();
-	int __fastcall GetIndex();
-	
-protected:
-	virtual void __fastcall Clear();
-	virtual void __fastcall LoadData(System::Classes::TStream* AStream, System::LongWord DataStart, System::LongWord DataSize);
-	virtual void __fastcall Loaded();
-	
-public:
-	__fastcall virtual ~TLWChunk();
-	__classmethod virtual TID4 __fastcall GetID();
-	virtual void __fastcall LoadFromStream(System::Classes::TStream* AStream);
-	__property void * data = {read=FData};
-	__property TID4 id = {read=FID};
-	__property TU4 size = {read=FSize, nodefault};
-	__property TLWParentChunk* ParentChunk = {read=FParentChunk};
-	__property TLWChunkList* RootChunks = {read=GetRootChunks};
-	__property int Index = {read=GetIndex, nodefault};
-	__property TLWChunkList* Owner = {read=FOwner};
-public:
-	/* TObject.Create */ inline __fastcall TLWChunk() : System::Classes::TPersistent() { }
-	
-};
-
-#pragma pack(pop)
-
-typedef System::TMetaClass* TLWChunkClass;
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TLWSubChunk : public TLWChunk
-{
-	typedef TLWChunk inherited;
-	
-public:
-	virtual void __fastcall LoadFromStream(System::Classes::TStream* AStream);
-public:
-	/* TLWChunk.Destroy */ inline __fastcall virtual ~TLWSubChunk() { }
-	
-public:
-	/* TObject.Create */ inline __fastcall TLWSubChunk() : TLWChunk() { }
-	
-};
-
-#pragma pack(pop)
-
-typedef void __fastcall (*TLWChunkFind)(TLWChunk* AChunk, void * Criteria, bool &Found);
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TLWChunkList : public System::Classes::TList
-{
-	typedef System::Classes::TList inherited;
-	
-public:
-	TLWChunk* operator[](int Index) { return this->Items[Index]; }
-	
-private:
-	bool FOwnsItems;
-	System::TObject* FOwner;
-	TLWChunk* __fastcall GetItem(int Index);
-	
-protected:
-	virtual void __fastcall Loaded();
-	
-public:
-	__fastcall TLWChunkList(bool AOwnsItems, System::TObject* AOwner);
-	__fastcall virtual ~TLWChunkList();
-	HIDESBASE int __fastcall Add(TLWChunk* AChunk);
-	virtual void __fastcall Clear();
-	HIDESBASE void __fastcall Delete(int Index);
-	int __fastcall FindChunk(TLWChunkFind ChunkFind, void * Criteria, int StartIndex = 0x0);
-	__property TLWChunk* Items[int Index] = {read=GetItem/*, default*/};
-	__property bool OwnsItems = {read=FOwnsItems, nodefault};
-	__property System::TObject* Owner = {read=FOwner};
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TLWParentChunk : public TLWChunk
-{
-	typedef TLWChunk inherited;
-	
-private:
-	TLWChunkList* FItems;
-	TLWChunkList* __fastcall GetItems();
-	float __fastcall GetFloatParam(TID4 Param);
-	System::Word __fastcall GetWordParam(TID4 Param);
-	TVec12 __fastcall GetVec3Param(TID4 Param);
-	System::LongWord __fastcall GetLongParam(TID4 Param);
-	System::Word __fastcall GetVXParam(TID4 Param);
-	
-protected:
-	virtual void * __fastcall GetParamAddr(TID4 Param);
-	virtual void __fastcall Clear();
-	virtual void __fastcall Loaded();
-	
-public:
-	__property TLWChunkList* Items = {read=GetItems};
-	__property void * ParamAddr[TID4 Param] = {read=GetParamAddr};
-	__property float FloatParam[TID4 Param] = {read=GetFloatParam};
-	__property System::Word WordParam[TID4 Param] = {read=GetWordParam};
-	__property System::LongWord LongParam[TID4 Param] = {read=GetLongParam};
-	__property TVec12 Vec3Param[TID4 Param] = {read=GetVec3Param};
-	__property System::Word VXParam[TID4 Param] = {read=GetVXParam};
-public:
-	/* TLWChunk.Destroy */ inline __fastcall virtual ~TLWParentChunk() { }
-	
-public:
-	/* TObject.Create */ inline __fastcall TLWParentChunk() : TLWChunk() { }
-	
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TLWPnts : public TLWParentChunk
-{
-	typedef TLWParentChunk inherited;
-	
-private:
-	TVec12DynArray FPnts;
-	TLWPntsInfoDynArray FPntsInfo;
-	System::LongWord __fastcall GetPntsCount();
-	int __fastcall AddPoly(int PntIdx, int PolyIdx);
-	
-protected:
-	virtual void __fastcall Clear();
-	virtual void __fastcall LoadData(System::Classes::TStream* AStream, System::LongWord DataStart, System::LongWord DataSize);
-	
-public:
-	__classmethod virtual TID4 __fastcall GetID();
-	bool __fastcall GetVMap(TID4 VMapID, /* out */ TLWVMap* &VMap);
-	__property System::LongWord PntsCount = {read=GetPntsCount, nodefault};
-	__property TVec12DynArray Pnts = {read=FPnts};
-	__property TLWPntsInfoDynArray PntsInfo = {read=FPntsInfo};
-public:
-	/* TLWChunk.Destroy */ inline __fastcall virtual ~TLWPnts() { }
-	
-public:
-	/* TObject.Create */ inline __fastcall TLWPnts() : TLWParentChunk() { }
-	
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TLWPols : public TLWParentChunk
-{
-	typedef TLWParentChunk inherited;
-	
-private:
-	TID4 FPolsType;
-	TLWPolsDynArray FPols;
-	TLWPolsInfoDynArray FPolsInfo;
-	int FPolsCount;
-	int __fastcall GetPolsByIndex(TU2 AIndex);
-	TU4 __fastcall GetIndiceCount();
-	TU2 __fastcall GetIndice(int AIndex);
-	int __fastcall GetPolsCount();
-	void __fastcall CalcPolsNormals();
-	void __fastcall CalcPntsNormals();
-	
-protected:
-	virtual void __fastcall Clear();
-	virtual void __fastcall LoadData(System::Classes::TStream* AStream, System::LongWord DataStart, System::LongWord DataSize);
-	virtual void __fastcall Loaded();
-	
-public:
-	__classmethod virtual TID4 __fastcall GetID();
-	int __fastcall GetPolsByPntIdx(TU2 VertIdx, TU2DynArray &VertPolys);
-	__property int PolsByIndex[TU2 AIndex] = {read=GetPolsByIndex};
-	__property TU4 IndiceCount = {read=GetIndiceCount, nodefault};
-	__property TU2 Indices[int AIndex] = {read=GetIndice};
-	__property TID4 PolsType = {read=FPolsType};
-	__property int PolsCount = {read=GetPolsCount, nodefault};
-	__property TLWPolsInfoDynArray PolsInfo = {read=FPolsInfo};
-public:
-	/* TLWChunk.Destroy */ inline __fastcall virtual ~TLWPols() { }
-	
-public:
-	/* TObject.Create */ inline __fastcall TLWPols() : TLWParentChunk() { }
-	
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TLWVMap : public TLWChunk
-{
-	typedef TLWChunk inherited;
-	
-private:
-	TU2 FDimensions;
-	System::UnicodeString FName;
-	TLWVertexMapDynArray FValues;
-	TID4 FVMapType;
-	TLWVertexMap __fastcall GetValue(TU2 AIndex);
-	int __fastcall GetValueCount();
-	
-protected:
-	virtual void __fastcall Clear();
-	virtual void __fastcall LoadData(System::Classes::TStream* AStream, System::LongWord DataStart, System::LongWord DataSize);
-	
-public:
-	__classmethod virtual TID4 __fastcall GetID();
-	__property TU2 Dimensions = {read=FDimensions, nodefault};
-	__property System::UnicodeString Name = {read=FName};
-	__property TLWVertexMap Value[TU2 AIndex] = {read=GetValue};
-	__property int ValueCount = {read=GetValueCount, nodefault};
-	__property TID4 VMapType = {read=FVMapType};
-public:
-	/* TLWChunk.Destroy */ inline __fastcall virtual ~TLWVMap() { }
-	
-public:
-	/* TObject.Create */ inline __fastcall TLWVMap() : TLWChunk() { }
-	
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TLWTags : public TLWChunk
-{
-	typedef TLWChunk inherited;
-	
-private:
-	System::Classes::TStrings* FTags;
-	System::Classes::TStrings* __fastcall GetTags();
-	
-protected:
-	virtual void __fastcall Clear();
-	virtual void __fastcall LoadData(System::Classes::TStream* AStream, System::LongWord DataStart, System::LongWord DataSize);
-	
-public:
-	__fastcall virtual ~TLWTags();
-	__classmethod virtual TID4 __fastcall GetID();
-	System::UnicodeString __fastcall TagToName(TU2 tag);
-	__property System::Classes::TStrings* Tags = {read=GetTags};
-public:
-	/* TObject.Create */ inline __fastcall TLWTags() : TLWChunk() { }
-	
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TLWSurf : public TLWParentChunk
-{
-	typedef TLWParentChunk inherited;
-	
-private:
-	System::UnicodeString FName;
-	System::UnicodeString FSource;
-	int __fastcall GetSurfId();
-	
-protected:
-	virtual void * __fastcall GetParamAddr(TID4 Param);
-	virtual void __fastcall LoadData(System::Classes::TStream* AStream, System::LongWord DataStart, System::LongWord DataSize);
-	
-public:
-	__fastcall virtual ~TLWSurf();
-	__classmethod virtual TID4 __fastcall GetID();
-	__property int surfid = {read=GetSurfId, nodefault};
-	__property System::UnicodeString Name = {read=FName};
-	__property System::UnicodeString Source = {read=FSource};
-public:
-	/* TObject.Create */ inline __fastcall TLWSurf() : TLWParentChunk() { }
-	
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TLWLayr : public TLWParentChunk
-{
-	typedef TLWParentChunk inherited;
-	
-private:
-	TU2 FFlags;
-	System::UnicodeString FName;
-	TU2 FNumber;
-	TU2 FParent;
-	TVec12 FPivot;
-	
-protected:
-	virtual void __fastcall LoadData(System::Classes::TStream* AStream, System::LongWord DataStart, System::LongWord DataSize);
-	
-public:
-	__fastcall virtual ~TLWLayr();
-	__classmethod virtual TID4 __fastcall GetID();
-	__property TU2 Flags = {read=FFlags, nodefault};
-	__property System::UnicodeString Name = {read=FName};
-	__property TU2 Number = {read=FNumber, nodefault};
-	__property TU2 Parent = {read=FParent, nodefault};
-	__property TVec12 Pivot = {read=FPivot};
-public:
-	/* TObject.Create */ inline __fastcall TLWLayr() : TLWParentChunk() { }
-	
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TLWPTag : public TLWChunk
-{
-	typedef TLWChunk inherited;
-	
-public:
-	TLWPolyTagMap operator[](int AIndex) { return this->TagMaps[AIndex]; }
-	
-private:
-	TID4 FMapType;
-	TLWPolyTagMapDynArray FTagMaps;
-	TU2DynArray FTags;
-	int __fastcall AddTag(TU2 Value);
-	TU2 __fastcall GetTag(int AIndex);
-	int __fastcall GetTagCount();
-	int __fastcall GetTagMapCount();
-	TLWPolyTagMap __fastcall GetTagMaps(int AIndex);
-	void __fastcall ValidateTagInfo();
-	
-protected:
-	virtual void __fastcall Clear();
-	virtual void __fastcall LoadData(System::Classes::TStream* AStream, System::LongWord DataStart, System::LongWord DataSize);
-	
-public:
-	__fastcall TLWPTag();
-	int __fastcall GetPolsByTag(TU2 tag, TU2DynArray &PolyIndices);
-	__classmethod virtual TID4 __fastcall GetID();
-	__property TID4 MapType = {read=FMapType};
-	__property int TagCount = {read=GetTagCount, nodefault};
-	__property int TagMapCount = {read=GetTagMapCount, nodefault};
-	__property TLWPolyTagMap TagMaps[int AIndex] = {read=GetTagMaps/*, default*/};
-	__property TU2 Tags[int AIndex] = {read=GetTag};
-public:
-	/* TLWChunk.Destroy */ inline __fastcall virtual ~TLWPTag() { }
-	
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TLWObjectFile : public System::TObject
-{
-	typedef System::TObject inherited;
-	
-private:
-	TLWChunkList* FChunks;
-	System::UnicodeString FFileName;
-	TLWChunkList* __fastcall GetChunks();
-	int __fastcall GetCount();
-	TLWSurf* __fastcall GetSurfaceByName(System::UnicodeString Index);
-	TLWSurf* __fastcall GetSurfaceByTag(TU2 Index);
-	
-public:
-	__fastcall TLWObjectFile();
-	__fastcall virtual ~TLWObjectFile();
-	System::UnicodeString __fastcall TagToName(TU2 tag);
-	void __fastcall LoadFromFile(const System::UnicodeString AFilename);
-	void __fastcall LoadFromStream(System::Classes::TStream* AStream);
-	__property int ChunkCount = {read=GetCount, nodefault};
-	__property TLWChunkList* Chunks = {read=GetChunks};
-	__property System::UnicodeString FileName = {read=FFileName};
-	__property TLWSurf* SurfaceByName[System::UnicodeString Index] = {read=GetSurfaceByName};
-	__property TLWSurf* SurfaceByTag[TU2 Index] = {read=GetSurfaceByTag};
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TLWClip : public TLWParentChunk
-{
-	typedef TLWParentChunk inherited;
-	
-private:
-	TU4 FClipIndex;
-	
-protected:
-	virtual void __fastcall LoadData(System::Classes::TStream* AStream, System::LongWord DataStart, System::LongWord DataSize);
-	
-public:
-	__classmethod virtual TID4 __fastcall GetID();
-	__property TU4 ClipIndex = {read=FClipIndex, nodefault};
-public:
-	/* TLWChunk.Destroy */ inline __fastcall virtual ~TLWClip() { }
-	
-public:
-	/* TObject.Create */ inline __fastcall TLWClip() : TLWParentChunk() { }
-	
-};
-
-#pragma pack(pop)
-
-typedef void __fastcall (__closure *TLWContentNotify)(System::TObject* Sender, System::UnicodeString &Content);
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TLWContentDir : public System::TObject
-{
-	typedef System::TObject inherited;
-	
-private:
-	System::Classes::TStrings* FSubDirs;
-	System::UnicodeString FRoot;
-	System::Classes::TStrings* __fastcall GetSubDirs();
-	void __fastcall SetRoot(const System::UnicodeString Value);
-	void __fastcall SetSubDirs(System::Classes::TStrings* const Value);
-	
-public:
-	__fastcall virtual ~TLWContentDir();
-	System::UnicodeString __fastcall FindContent(System::UnicodeString AFilename);
-	__property System::UnicodeString Root = {read=FRoot, write=SetRoot};
-	__property System::Classes::TStrings* SubDirs = {read=GetSubDirs, write=SetSubDirs};
-public:
-	/* TObject.Create */ inline __fastcall TLWContentDir() : System::TObject() { }
-	
-};
-
-#pragma pack(pop)
-
-typedef void __cdecl (*TLWOReadCallback)(TLWChunkRec Chunk, void * data);
-
-//-- var, const, procedure ---------------------------------------------------
-#define ID_NULL L"#0#0#0#0"
-extern DELPHI_PACKAGE TID4 ID_LWSC;
-extern DELPHI_PACKAGE TID4 ID_FORM;
-extern DELPHI_PACKAGE TID4 ID_LWOB;
-extern DELPHI_PACKAGE TID4 ID_LWLO;
-extern DELPHI_PACKAGE TID4 ID_LAYR;
-extern DELPHI_PACKAGE TID4 ID_PNTS;
-extern DELPHI_PACKAGE TID4 ID_SRFS;
-extern DELPHI_PACKAGE TID4 ID_POLS;
-extern DELPHI_PACKAGE TID4 ID_CRVS;
-extern DELPHI_PACKAGE TID4 ID_PCHS;
-extern DELPHI_PACKAGE TID4 ID_SURF;
-extern DELPHI_PACKAGE TID4 ID_COLR;
-extern DELPHI_PACKAGE TID4 ID_FLAG;
-extern DELPHI_PACKAGE TID4 ID_LUMI;
-extern DELPHI_PACKAGE TID4 ID_DIFF;
-extern DELPHI_PACKAGE TID4 ID_SPEC;
-extern DELPHI_PACKAGE TID4 ID_REFL;
-extern DELPHI_PACKAGE TID4 ID_TRAN;
-extern DELPHI_PACKAGE TID4 ID_VLUM;
-extern DELPHI_PACKAGE TID4 ID_VDIF;
-extern DELPHI_PACKAGE TID4 ID_VSPC;
-extern DELPHI_PACKAGE TID4 ID_VRFL;
-extern DELPHI_PACKAGE TID4 ID_VTRN;
-extern DELPHI_PACKAGE TID4 ID_GLOS;
-extern DELPHI_PACKAGE TID4 ID_SIDE;
-extern DELPHI_PACKAGE TID4 ID_RFLT;
-extern DELPHI_PACKAGE TID4 ID_RFOP;
-extern DELPHI_PACKAGE TID4 ID_RIMG;
-extern DELPHI_PACKAGE TID4 ID_RSAN;
-extern DELPHI_PACKAGE TID4 ID_RIND;
-extern DELPHI_PACKAGE TID4 ID_EDGE;
-extern DELPHI_PACKAGE TID4 ID_SMAN;
-extern DELPHI_PACKAGE TID4 ID_ALPH;
-extern DELPHI_PACKAGE TID4 ID_CTEX;
-extern DELPHI_PACKAGE TID4 ID_DTEX;
-extern DELPHI_PACKAGE TID4 ID_STEX;
-extern DELPHI_PACKAGE TID4 ID_RTEX;
-extern DELPHI_PACKAGE TID4 ID_TTEX;
-extern DELPHI_PACKAGE TID4 ID_LTEX;
-extern DELPHI_PACKAGE TID4 ID_BTEX;
-extern DELPHI_PACKAGE TID4 ID_TFLG;
-extern DELPHI_PACKAGE TID4 ID_TSIZ;
-extern DELPHI_PACKAGE TID4 ID_TCTR;
-extern DELPHI_PACKAGE TID4 ID_TFAL;
-extern DELPHI_PACKAGE TID4 ID_TVEL;
-extern DELPHI_PACKAGE TID4 ID_TREF;
-extern DELPHI_PACKAGE TID4 ID_TCLR;
-extern DELPHI_PACKAGE TID4 ID_TVAL;
-extern DELPHI_PACKAGE TID4 ID_TAMP;
-extern DELPHI_PACKAGE TID4 ID_TFP0;
-extern DELPHI_PACKAGE TID4 ID_TFP1;
-extern DELPHI_PACKAGE TID4 ID_TFP2;
-extern DELPHI_PACKAGE TID4 ID_TIP0;
-extern DELPHI_PACKAGE TID4 ID_TIP1;
-extern DELPHI_PACKAGE TID4 ID_TIP2;
-extern DELPHI_PACKAGE TID4 ID_TSP0;
-extern DELPHI_PACKAGE TID4 ID_TSP1;
-extern DELPHI_PACKAGE TID4 ID_TSP2;
-extern DELPHI_PACKAGE TID4 ID_TFRQ;
-extern DELPHI_PACKAGE TID4 ID_TIMG;
-extern DELPHI_PACKAGE TID4 ID_TALP;
-extern DELPHI_PACKAGE TID4 ID_TWRP;
-extern DELPHI_PACKAGE TID4 ID_TAAS;
-extern DELPHI_PACKAGE TID4 ID_TOPC;
-extern DELPHI_PACKAGE TID4 ID_SHDR;
-extern DELPHI_PACKAGE TID4 ID_SDAT;
-extern DELPHI_PACKAGE TID4 ID_IMSQ;
-extern DELPHI_PACKAGE TID4 ID_FLYR;
-extern DELPHI_PACKAGE TID4 ID_IMCC;
-static _DELPHI_CONST System::Int8 SURF_FLAG_LUMINOUS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 SURF_FLAG_OUTLINE = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 SURF_FLAG_SMOOTHING = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 SURF_FLAG_COLORHIGHLIGHTS = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 SURF_FLAG_COLORFILTER = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 SURF_FLAG_OPAQUEEDGE = System::Int8(0x20);
-static _DELPHI_CONST System::Int8 SURF_FLAG_TRANSPARENTEDGE = System::Int8(0x40);
-static _DELPHI_CONST System::Byte SURF_FLAG_SHARPTERMINATOR = System::Byte(0x80);
-static _DELPHI_CONST System::Word SURF_FLAG_DOUBLESIDED = System::Word(0x100);
-static _DELPHI_CONST System::Word SURF_FLAG_ADDITIVE = System::Word(0x200);
-static _DELPHI_CONST System::Word SURF_FLAG_SHADOWALPHA = System::Word(0x400);
-static _DELPHI_CONST System::Int8 CURV_CONTINUITY_FIRST = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 CURV_CONTINUITY_LAST = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 IMSQ_FLAG_LOOP = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 IMSQ_FLAG_INTERLACE = System::Int8(0x2);
-extern DELPHI_PACKAGE TID4 ID_LWO2;
-extern DELPHI_PACKAGE TID4 ID_VMAP;
-extern DELPHI_PACKAGE TID4 ID_TAGS;
-extern DELPHI_PACKAGE TID4 ID_PTAG;
-extern DELPHI_PACKAGE TID4 ID_VMAD;
-extern DELPHI_PACKAGE TID4 ID_ENVL;
-extern DELPHI_PACKAGE TID4 ID_CLIP;
-extern DELPHI_PACKAGE TID4 ID_BBOX;
-extern DELPHI_PACKAGE TID4 ID_DESC;
-extern DELPHI_PACKAGE TID4 ID_TEXT;
-extern DELPHI_PACKAGE TID4 ID_ICON;
-extern DELPHI_PACKAGE TID4 ENVL_PRE;
-extern DELPHI_PACKAGE TID4 ENVL_POST;
-extern DELPHI_PACKAGE TID4 ENVL_KEY;
-extern DELPHI_PACKAGE TID4 ENVL_SPAN;
-extern DELPHI_PACKAGE TID4 ENVL_CHAN;
-extern DELPHI_PACKAGE TID4 ENVL_NAME;
-extern DELPHI_PACKAGE TID4 ID_STIL;
-extern DELPHI_PACKAGE TID4 ID_ISEQ;
-extern DELPHI_PACKAGE TID4 ID_ANIM;
-extern DELPHI_PACKAGE TID4 ID_STCC;
-extern DELPHI_PACKAGE TID4 ID_CONT;
-extern DELPHI_PACKAGE TID4 ID_BRIT;
-extern DELPHI_PACKAGE TID4 ID_SATR;
-extern DELPHI_PACKAGE TID4 ID_HUE;
-extern DELPHI_PACKAGE TID4 ID_GAMMA;
-extern DELPHI_PACKAGE TID4 ID_NEGA;
-extern DELPHI_PACKAGE TID4 ID_IFLT;
-extern DELPHI_PACKAGE TID4 ID_PFLT;
-extern DELPHI_PACKAGE TID4 POLS_TYPE_FACE;
-extern DELPHI_PACKAGE TID4 POLS_TYPE_CURV;
-extern DELPHI_PACKAGE TID4 POLS_TYPE_PTCH;
-extern DELPHI_PACKAGE TID4 POLS_TYPE_MBAL;
-extern DELPHI_PACKAGE TID4 POLS_TYPE_BONE;
-extern DELPHI_PACKAGE TID4 VMAP_TYPE_PICK;
-extern DELPHI_PACKAGE TID4 VMAP_TYPE_WGHT;
-extern DELPHI_PACKAGE TID4 VMAP_TYPE_MNVW;
-extern DELPHI_PACKAGE TID4 VMAP_TYPE_TXUV;
-extern DELPHI_PACKAGE TID4 VMAP_TYPE_RGB;
-extern DELPHI_PACKAGE TID4 VMAP_TYPE_RGBA;
-extern DELPHI_PACKAGE TID4 VMAP_TYPE_MORF;
-extern DELPHI_PACKAGE TID4 VMAP_TYPE_SPOT;
-extern DELPHI_PACKAGE TID4 PTAG_TYPE_SURF;
-extern DELPHI_PACKAGE TID4 PTAG_TYPE_PART;
-extern DELPHI_PACKAGE TID4 PTAG_TYPE_SMGP;
-static _DELPHI_CONST System::Int8 PRE_POST_RESET = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 PRE_POST_CONSTANT = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 PRE_POST_REPEAT = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 PRE_POST_OSCILLATE = System::Int8(0x3);
-static _DELPHI_CONST System::Int8 PRE_POST_OFFSET = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 PRE_POST_LINEAR = System::Int8(0x5);
-static _DELPHI_CONST System::Word POLS_VCOUNT_MASK = System::Word(0x3ff);
-static _DELPHI_CONST System::Word POLS_FLAGS_MASK = System::Word(0xfc00);
-static _DELPHI_CONST System::Int8 SIDE_FRONT = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 SIDE_BACK = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 SIDE_FRONT_AND_BACK = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 RFOP_BACKDROP = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 RFOP_RAYTRACEANDBACKDROP = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 RFOP_SPHERICALMAP = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 RFOP_RAYTRACEANDSPHERICALMAP = System::Int8(0x3);
-extern DELPHI_PACKAGE System::UnicodeString __fastcall ToDosPath(const System::UnicodeString Path);
-extern DELPHI_PACKAGE System::UnicodeString __fastcall ToUnixPath(const System::UnicodeString Path);
-extern DELPHI_PACKAGE TLWContentDir* __fastcall GetContentDir(void);
-extern DELPHI_PACKAGE void __fastcall FindChunkById(TLWChunk* AChunk, void * data, bool &Found);
-extern DELPHI_PACKAGE void __fastcall FindClipByClipIndex(TLWChunk* AChunk, void * AIndex, bool &Found);
-extern DELPHI_PACKAGE void __fastcall FindSurfaceByName(TLWChunk* AChunk, void * AName, bool &Found);
-extern DELPHI_PACKAGE void __fastcall FindSurfaceByTag(TLWChunk* AChunk, void * ATag, bool &Found);
-extern DELPHI_PACKAGE void __fastcall FindVMapByName(TLWChunk* AChunk, void * AName, bool &Found);
-extern DELPHI_PACKAGE void __fastcall RegisterChunkClass(TLWChunkClass ChunkClass);
-extern DELPHI_PACKAGE System::LongWord __cdecl LoadLW0FromStream(System::Classes::TStream* Stream, TLWOReadCallback ReadCallback, void * UserData);
-extern DELPHI_PACKAGE System::LongWord __fastcall LoadLWOFromFile(const System::UnicodeString AFilename, TLWOReadCallback ReadCallback, void * UserData);
-extern DELPHI_PACKAGE void __fastcall ReverseByteOrder(void * ValueIn, int size, int Count = 0x1);
-extern DELPHI_PACKAGE void __fastcall ReadMotorolaNumber(System::Classes::TStream* Stream, void * data, int ElementSize, int Count = 0x1);
-extern DELPHI_PACKAGE int __fastcall WriteMotorolaNumber(System::Classes::TStream* Stream, void * data, int ElementSize, int Count = 0x1);
-extern DELPHI_PACKAGE int __fastcall ReadS0(System::Classes::TStream* Stream, /* out */ System::UnicodeString &Str);
-extern DELPHI_PACKAGE int __fastcall ReadVXAsU4(System::Classes::TStream* Stream, void * data, int Count = 0x1);
-extern DELPHI_PACKAGE void __fastcall WriteS0(System::Classes::TStream* Stream, System::UnicodeString data);
-extern DELPHI_PACKAGE void __fastcall WriteU4AsVX(System::Classes::TStream* Stream, void * data, int Count);
-extern DELPHI_PACKAGE int __fastcall ID4ToInt(const TID4 id);
-}	/* namespace Lwo */
-}	/* namespace Formats */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS_LWO)
-using namespace Formats::Lwo;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS)
-using namespace Formats;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// Formats_LWOHPP

include/Win32/Formats.MD2.hpp

@@ -1,157 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'Formats.MD2.pas' rev: 36.00 (Windows)
-
-#ifndef Formats_MD2HPP
-#define Formats_MD2HPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <System.Classes.hpp>
-#include <System.SysUtils.hpp>
-#include <Stage.VectorTypes.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Formats
-{
-namespace Md2
-{
-//-- forward type declarations -----------------------------------------------
-struct TMD2VertexIndex;
-struct TMD2Triangle;
-struct TMD2TriangleVertex;
-struct TMD2AliasFrame;
-struct TMD2Header;
-class DELPHICLASS TFileMD2;
-//-- type declarations -------------------------------------------------------
-typedef TMD2VertexIndex *PMD2VertexIndex;
-
-struct DECLSPEC_DRECORD TMD2VertexIndex
-{
-public:
-	int A;
-	int B;
-	int C;
-	float A_S;
-	float A_T;
-	float B_S;
-	float B_T;
-	float C_S;
-	float C_T;
-};
-
-
-struct DECLSPEC_DRECORD TMD2Triangle
-{
-public:
-	Stage::Vectortypes::TVector3s VertexIndex;
-	Stage::Vectortypes::TVector3s TextureCoordIndex;
-};
-
-
-struct DECLSPEC_DRECORD TMD2TriangleVertex
-{
-public:
-	System::StaticArray<System::Byte, 3> Vert;
-	System::Byte LightnormalIndex;
-};
-
-
-typedef TMD2AliasFrame *PMD2AliasFrame;
-
-struct DECLSPEC_DRECORD TMD2AliasFrame
-{
-public:
-	Stage::Vectortypes::TVector3f Scale;
-	Stage::Vectortypes::TVector3f Translate;
-	System::StaticArray<char, 16> Name;
-	System::StaticArray<TMD2TriangleVertex, 1> Vertices;
-};
-
-
-struct DECLSPEC_DRECORD TMD2Header
-{
-public:
-	int Ident;
-	int Version;
-	int SkinWidth;
-	int SkinHeight;
-	int FrameSize;
-	int Num_Skins;
-	int Num_Vertices;
-	int Num_TextureCoords;
-	int Num_VertexIndices;
-	int Num_GLCommdands;
-	int Num_Frames;
-	int Offset_skins;
-	int Offset_st;
-	int Offset_tris;
-	int Offset_frames;
-	int Offset_glcmds;
-	int Offset_end;
-};
-
-
-typedef System::DynamicArray<TMD2VertexIndex> TIndexList;
-
-typedef System::DynamicArray<Stage::Vectortypes::TVector3f> Formats_Md2__1;
-
-typedef System::DynamicArray<System::DynamicArray<Stage::Vectortypes::TVector3f> > TGLVertexList;
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TFileMD2 : public System::TObject
-{
-	typedef System::TObject inherited;
-	
-private:
-	System::LongInt FiFrames;
-	System::LongInt FiVertices;
-	System::LongInt FiTriangles;
-	void __fastcall FreeLists();
-	
-public:
-	TIndexList fIndexList;
-	TGLVertexList fVertexList;
-	System::Classes::TStrings* FrameNames;
-	__fastcall virtual TFileMD2();
-	__fastcall virtual ~TFileMD2();
-	void __fastcall LoadFromStream(System::Classes::TStream* aStream);
-	__property System::LongInt iFrames = {read=FiFrames, nodefault};
-	__property System::LongInt iVertices = {read=FiVertices, nodefault};
-	__property System::LongInt iTriangles = {read=FiTriangles, nodefault};
-	__property TIndexList IndexList = {read=fIndexList};
-	__property TGLVertexList VertexList = {read=fVertexList};
-};
-
-#pragma pack(pop)
-
-//-- var, const, procedure ---------------------------------------------------
-static _DELPHI_CONST System::Word MAX_MD2_TRIANGLES = System::Word(0x1000);
-static _DELPHI_CONST System::Word MAX_MD2_VERTICES = System::Word(0x800);
-static _DELPHI_CONST System::Word MAX_MD2_FRAMES = System::Word(0x200);
-static _DELPHI_CONST System::Int8 MAX_MD2_SKINS = System::Int8(0x20);
-static _DELPHI_CONST System::Int8 MAX_MD2_SKINNAME = System::Int8(0x40);
-}	/* namespace Md2 */
-}	/* namespace Formats */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS_MD2)
-using namespace Formats::Md2;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS)
-using namespace Formats;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// Formats_MD2HPP

include/Win32/Formats.MD3.hpp

@@ -1,190 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'Formats.MD3.pas' rev: 36.00 (Windows)
-
-#ifndef Formats_MD3HPP
-#define Formats_MD3HPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <System.Classes.hpp>
-#include <Stage.VectorTypes.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Formats
-{
-namespace Md3
-{
-//-- forward type declarations -----------------------------------------------
-struct TMD3Tag;
-struct TMD3Bone;
-struct TMD3Triangle;
-struct TMD3Face;
-struct TMD3TexCoord;
-struct TMD3Skin;
-struct TMD3Header;
-struct TMD3MeshHeader;
-struct TMD3MeshData;
-class DELPHICLASS TFileMD3;
-//-- type declarations -------------------------------------------------------
-struct DECLSPEC_DRECORD TMD3Tag
-{
-public:
-	System::StaticArray<char, 64> strName;
-	Stage::Vectortypes::TVector3f vPosition;
-	Stage::Vectortypes::TMatrix3f rotation;
-};
-
-
-struct DECLSPEC_DRECORD TMD3Bone
-{
-public:
-	Stage::Vectortypes::TVector3f mins;
-	Stage::Vectortypes::TVector3f maxs;
-	Stage::Vectortypes::TVector3f position;
-	float scale;
-	System::StaticArray<char, 16> creator;
-};
-
-
-struct DECLSPEC_DRECORD TMD3Triangle
-{
-public:
-	Stage::Vectortypes::TVector3s vertex;
-	Stage::Vectortypes::TVector2b normal;
-};
-
-
-struct DECLSPEC_DRECORD TMD3Face
-{
-public:
-	Stage::Vectortypes::TVector3i vertexIndices;
-};
-
-
-struct DECLSPEC_DRECORD TMD3TexCoord
-{
-public:
-	Stage::Vectortypes::TVector2f textureCoord;
-};
-
-
-struct DECLSPEC_DRECORD TMD3Skin
-{
-public:
-	System::StaticArray<char, 64> strName;
-	int shaderIndex;
-};
-
-
-struct DECLSPEC_DRECORD TMD3Header
-{
-public:
-	System::StaticArray<char, 4> fileID;
-	int version;
-	System::StaticArray<char, 64> strFile;
-	int flags;
-	int numFrames;
-	int numTags;
-	int numMeshes;
-	int numMaxSkins;
-	int headerSize;
-	int tagStart;
-	int tagEnd;
-	int fileSize;
-};
-
-
-struct DECLSPEC_DRECORD TMD3MeshHeader
-{
-public:
-	System::StaticArray<char, 4> meshID;
-	System::StaticArray<char, 64> strName;
-	int flags;
-	int numMeshFrames;
-	int numSkins;
-	int numVertices;
-	int numTriangles;
-	int triStart;
-	int headerSize;
-	int uvStart;
-	int vertexStart;
-	int meshSize;
-};
-
-
-struct DECLSPEC_DRECORD TMD3MeshData
-{
-	
-private:
-	typedef System::DynamicArray<TMD3Skin> _TMD3MeshData__1;
-	
-	typedef System::DynamicArray<TMD3Face> _TMD3MeshData__2;
-	
-	typedef System::DynamicArray<TMD3TexCoord> _TMD3MeshData__3;
-	
-	typedef System::DynamicArray<TMD3Triangle> _TMD3MeshData__4;
-	
-	
-public:
-	TMD3MeshHeader MeshHeader;
-	_TMD3MeshData__1 Skins;
-	_TMD3MeshData__2 Triangles;
-	_TMD3MeshData__3 TexCoords;
-	_TMD3MeshData__4 Vertices;
-};
-
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TFileMD3 : public System::TObject
-{
-	typedef System::TObject inherited;
-	
-	
-private:
-	typedef System::DynamicArray<TMD3Bone> _TFileMD3__1;
-	
-	typedef System::DynamicArray<TMD3Tag> _TFileMD3__2;
-	
-	typedef System::DynamicArray<TMD3MeshData> _TFileMD3__3;
-	
-	
-public:
-	TMD3Header ModelHeader;
-	_TFileMD3__1 Bones;
-	_TFileMD3__2 Tags;
-	_TFileMD3__3 MeshData;
-	void __fastcall LoadFromStream(System::Classes::TStream* aStream);
-public:
-	/* TObject.Create */ inline __fastcall TFileMD3() : System::TObject() { }
-	/* TObject.Destroy */ inline __fastcall virtual ~TFileMD3() { }
-	
-};
-
-#pragma pack(pop)
-
-//-- var, const, procedure ---------------------------------------------------
-}	/* namespace Md3 */
-}	/* namespace Formats */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS_MD3)
-using namespace Formats::Md3;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS)
-using namespace Formats;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// Formats_MD3HPP

include/Win32/Formats.OCT.hpp

@@ -1,152 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'Formats.OCT.pas' rev: 36.00 (Windows)
-
-#ifndef Formats_OCTHPP
-#define Formats_OCTHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <System.Classes.hpp>
-#include <System.SysUtils.hpp>
-#include <Stage.VectorGeometry.hpp>
-#include <Stage.VectorTypes.hpp>
-#include <GLS.VectorLists.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Formats
-{
-namespace Oct
-{
-//-- forward type declarations -----------------------------------------------
-struct TOCTHeader;
-struct TOCTVertex;
-struct TOCTFace;
-struct TOCTTexture;
-struct TOCTLightmap;
-struct TOCTLight;
-class DELPHICLASS TOCTFile;
-//-- type declarations -------------------------------------------------------
-struct DECLSPEC_DRECORD TOCTHeader
-{
-public:
-	int numVerts;
-	int numFaces;
-	int numTextures;
-	int numLightmaps;
-	int numLights;
-};
-
-
-struct DECLSPEC_DRECORD TOCTVertex
-{
-public:
-	Stage::Vectorgeometry::TTexPoint tv;
-	Stage::Vectorgeometry::TTexPoint lv;
-	Stage::Vectorgeometry::TAffineVector pos;
-};
-
-
-struct DECLSPEC_DRECORD TOCTFace
-{
-public:
-	int start;
-	int num;
-	int id;
-	int lid;
-	Stage::Vectorgeometry::THmgPlane p;
-};
-
-
-typedef TOCTFace *POCTFace;
-
-struct DECLSPEC_DRECORD TOCTTexture
-{
-public:
-	int id;
-	System::StaticArray<char, 64> Name;
-};
-
-
-struct DECLSPEC_DRECORD TOCTLightmap
-{
-public:
-	int id;
-	System::StaticArray<System::Byte, 49152> map;
-};
-
-
-typedef TOCTLightmap *POCTLightmap;
-
-struct DECLSPEC_DRECORD TOCTLight
-{
-public:
-	Stage::Vectorgeometry::TAffineVector pos;
-	Stage::Vectorgeometry::TAffineVector color;
-	int intensity;
-};
-
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TOCTFile : public System::TObject
-{
-	typedef System::TObject inherited;
-	
-	
-private:
-	typedef System::DynamicArray<TOCTVertex> _TOCTFile__1;
-	
-	typedef System::DynamicArray<TOCTFace> _TOCTFile__2;
-	
-	typedef System::DynamicArray<TOCTTexture> _TOCTFile__3;
-	
-	typedef System::DynamicArray<TOCTLightmap> _TOCTFile__4;
-	
-	typedef System::DynamicArray<TOCTLight> _TOCTFile__5;
-	
-	
-public:
-	TOCTHeader Header;
-	_TOCTFile__1 Vertices;
-	_TOCTFile__2 Faces;
-	_TOCTFile__3 Textures;
-	_TOCTFile__4 Lightmaps;
-	_TOCTFile__5 Lights;
-	Stage::Vectorgeometry::TAffineVector PlayerPos;
-	__fastcall TOCTFile()/* overload */;
-	__fastcall TOCTFile(System::Classes::TStream* octStream)/* overload */;
-	void __fastcall SaveToStream(System::Classes::TStream* aStream);
-	void __fastcall AddTriangles(Gls::Vectorlists::TGLAffineVectorList* vertexCoords, Gls::Vectorlists::TGLAffineVectorList* texMapCoords, const System::UnicodeString textureName);
-	void __fastcall AddLight(const Stage::Vectorgeometry::TAffineVector &lightPos, const Stage::Vectortypes::TGLVector &lightColor, int lightIntensity);
-public:
-	/* TObject.Destroy */ inline __fastcall virtual ~TOCTFile() { }
-	
-};
-
-#pragma pack(pop)
-
-//-- var, const, procedure ---------------------------------------------------
-}	/* namespace Oct */
-}	/* namespace Formats */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS_OCT)
-using namespace Formats::Oct;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS)
-using namespace Formats;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// Formats_OCTHPP

include/Win32/Formats.Q3BSP.hpp

@@ -1,246 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'Formats.Q3BSP.pas' rev: 36.00 (Windows)
-
-#ifndef Formats_Q3BSPHPP
-#define Formats_Q3BSPHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <System.Classes.hpp>
-#include <System.SysUtils.hpp>
-#include <Stage.VectorTypes.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Formats
-{
-namespace Q3bsp
-{
-//-- forward type declarations -----------------------------------------------
-struct TBSPHeader;
-struct TBSPLump;
-struct TBSPNode;
-struct TBSPLeaf;
-struct TBSPModel;
-struct TBSPVertex;
-struct TBSPFace;
-struct TBSPTexture;
-struct TBSPLightmap;
-struct TBSPVisData;
-class DELPHICLASS TQ3BSP;
-//-- type declarations -------------------------------------------------------
-struct DECLSPEC_DRECORD TBSPHeader
-{
-public:
-	System::StaticArray<char, 4> StrID;
-	int Version;
-};
-
-
-struct DECLSPEC_DRECORD TBSPLump
-{
-public:
-	int Offset;
-	int Length;
-};
-
-
-typedef System::StaticArray<int, 6> TBSPBBox;
-
-struct DECLSPEC_DRECORD TBSPNode
-{
-public:
-	int Plane;
-	System::StaticArray<int, 2> Children;
-	TBSPBBox BBox;
-};
-
-
-struct DECLSPEC_DRECORD TBSPLeaf
-{
-public:
-	int Cluster;
-	int Area;
-	TBSPBBox BBox;
-	int FirstFace;
-	int NumFaces;
-	int FirstBrush;
-	int NumBrushes;
-};
-
-
-struct DECLSPEC_DRECORD TBSPModel
-{
-public:
-	TBSPBBox BBox;
-	int FirstFace;
-	int NumFaces;
-	int FirstBrush;
-	int NumBrushes;
-};
-
-
-struct DECLSPEC_DRECORD TBSPVertex
-{
-public:
-	Stage::Vectortypes::TVector3f Position;
-	Stage::Vectortypes::TVector2f TextureCoord;
-	Stage::Vectortypes::TVector2f LightmapCoord;
-	Stage::Vectortypes::TVector3f Normal;
-	System::StaticArray<System::Byte, 4> Color;
-};
-
-
-typedef TBSPVertex *PBSPVertex;
-
-struct DECLSPEC_DRECORD TBSPFace
-{
-public:
-	int textureID;
-	int effect;
-	int FaceType;
-	int startVertIndex;
-	int numOfVerts;
-	int meshVertIndex;
-	int numMeshVerts;
-	int lightmapID;
-	System::StaticArray<int, 2> lMapCorner;
-	System::StaticArray<int, 2> lMapSize;
-	Stage::Vectortypes::TVector3f lMapPos;
-	System::StaticArray<Stage::Vectortypes::TVector3f, 2> lMapVecs;
-	Stage::Vectortypes::TVector3f vNormal;
-	System::StaticArray<int, 2> Size;
-};
-
-
-typedef TBSPFace *PBSPFace;
-
-struct DECLSPEC_DRECORD TBSPTexture
-{
-public:
-	System::StaticArray<System::WideChar, 64> TextureName;
-	int flags;
-	int contents;
-};
-
-
-typedef TBSPTexture *PBSPTexture;
-
-struct DECLSPEC_DRECORD TBSPLightmap
-{
-public:
-	System::StaticArray<System::Byte, 49152> imageBits;
-};
-
-
-typedef TBSPLightmap *PBSPLightmap;
-
-struct DECLSPEC_DRECORD TBSPVisData
-{
-	
-private:
-	typedef System::DynamicArray<System::Byte> _TBSPVisData__1;
-	
-	
-public:
-	int numOfClusters;
-	int bytesPerCluster;
-	_TBSPVisData__1 bitSets;
-};
-
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TQ3BSP : public System::TObject
-{
-	typedef System::TObject inherited;
-	
-	
-private:
-	typedef System::DynamicArray<TBSPLump> _TQ3BSP__1;
-	
-	typedef System::DynamicArray<TBSPVertex> _TQ3BSP__2;
-	
-	typedef System::DynamicArray<TBSPNode> _TQ3BSP__3;
-	
-	typedef System::DynamicArray<Stage::Vectortypes::TVector4f> _TQ3BSP__4;
-	
-	typedef System::DynamicArray<TBSPLeaf> _TQ3BSP__5;
-	
-	typedef System::DynamicArray<TBSPFace> _TQ3BSP__6;
-	
-	typedef System::DynamicArray<TBSPTexture> _TQ3BSP__7;
-	
-	typedef System::DynamicArray<TBSPLightmap> _TQ3BSP__8;
-	
-	
-public:
-	TBSPHeader Header;
-	_TQ3BSP__1 Lumps;
-	int numOfVerts;
-	int NumOfNodes;
-	int NumOfPlanes;
-	int NumOfLeaves;
-	int NumOfFaces;
-	int NumOfTextures;
-	int NumOfLightmaps;
-	_TQ3BSP__2 Vertices;
-	_TQ3BSP__3 Nodes;
-	_TQ3BSP__4 Planes;
-	_TQ3BSP__5 Leaves;
-	_TQ3BSP__6 Faces;
-	_TQ3BSP__7 Textures;
-	_TQ3BSP__8 Lightmaps;
-	TBSPVisData VisData;
-	__fastcall TQ3BSP(System::Classes::TStream* bspStream);
-public:
-	/* TObject.Destroy */ inline __fastcall virtual ~TQ3BSP() { }
-	
-};
-
-#pragma pack(pop)
-
-//-- var, const, procedure ---------------------------------------------------
-static _DELPHI_CONST System::Int8 FACE_POLYGON = System::Int8(0x1);
-static _DELPHI_CONST System::Word MAX_TEXTURES = System::Word(0x3e8);
-static _DELPHI_CONST System::Int8 kEntities = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 kTextures = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 kPlanes = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 kNodes = System::Int8(0x3);
-static _DELPHI_CONST System::Int8 kLeafs = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 kLeafFaces = System::Int8(0x5);
-static _DELPHI_CONST System::Int8 kLeafBrushes = System::Int8(0x6);
-static _DELPHI_CONST System::Int8 kModels = System::Int8(0x7);
-static _DELPHI_CONST System::Int8 kBrushes = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 kBrushSides = System::Int8(0x9);
-static _DELPHI_CONST System::Int8 kVertices = System::Int8(0xa);
-static _DELPHI_CONST System::Int8 kMeshVerts = System::Int8(0xb);
-static _DELPHI_CONST System::Int8 kShaders = System::Int8(0xc);
-static _DELPHI_CONST System::Int8 kFaces = System::Int8(0xd);
-static _DELPHI_CONST System::Int8 kLightmaps = System::Int8(0xe);
-static _DELPHI_CONST System::Int8 kLightVolumes = System::Int8(0xf);
-static _DELPHI_CONST System::Int8 kVisData = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 kMaxLumps = System::Int8(0x11);
-}	/* namespace Q3bsp */
-}	/* namespace Formats */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS_Q3BSP)
-using namespace Formats::Q3bsp;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS)
-using namespace Formats;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// Formats_Q3BSPHPP

include/Win32/Formats.TGA.hpp

@@ -1,71 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'Formats.TGA.pas' rev: 36.00 (Windows)
-
-#ifndef Formats_TGAHPP
-#define Formats_TGAHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <Winapi.OpenGL.hpp>
-#include <Winapi.OpenGLext.hpp>
-#include <System.Classes.hpp>
-#include <System.SysUtils.hpp>
-#include <Stage.OpenGLTokens.hpp>
-#include <GLS.Context.hpp>
-#include <GLS.Graphics.hpp>
-#include <GLS.ApplicationFileIO.hpp>
-#include <Stage.TextureFormat.hpp>
-#include <GLS.BaseClasses.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Formats
-{
-namespace Tga
-{
-//-- forward type declarations -----------------------------------------------
-class DELPHICLASS TGLTGAImage;
-//-- type declarations -------------------------------------------------------
-class PASCALIMPLEMENTATION TGLTGAImage : public Gls::Graphics::TGLBaseImage
-{
-	typedef Gls::Graphics::TGLBaseImage inherited;
-	
-public:
-	virtual void __fastcall LoadFromFile(const System::UnicodeString filename);
-	virtual void __fastcall SaveToFile(const System::UnicodeString filename);
-	virtual void __fastcall LoadFromStream(System::Classes::TStream* stream);
-	virtual void __fastcall SaveToStream(System::Classes::TStream* stream);
-	__classmethod virtual Gls::Applicationfileio::TGLDataFileCapabilities __fastcall Capabilities();
-	HIDESBASE void __fastcall AssignFromTexture(Gls::Context::TGLContext* textureContext, const unsigned textureHandle, Stage::Textureformat::TglTextureTarget textureTarget, const bool CurrentFormat, const Stage::Textureformat::TglInternalFormat intFormat);
-public:
-	/* TGLBaseImage.Create */ inline __fastcall virtual TGLTGAImage() : Gls::Graphics::TGLBaseImage() { }
-	/* TGLBaseImage.Destroy */ inline __fastcall virtual ~TGLTGAImage() { }
-	
-};
-
-
-//-- var, const, procedure ---------------------------------------------------
-}	/* namespace Tga */
-}	/* namespace Formats */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS_TGA)
-using namespace Formats::Tga;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS)
-using namespace Formats;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// Formats_TGAHPP

include/Win32/Formats.VFW.hpp

@@ -1,2023 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'Formats.VFW.pas' rev: 36.00 (Windows)
-
-#ifndef Formats_VFWHPP
-#define Formats_VFWHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <Winapi.Windows.hpp>
-#include <Winapi.MMSystem.hpp>
-#include <Winapi.Messages.hpp>
-#include <Winapi.CommDlg.hpp>
-#include <Winapi.ActiveX.hpp>
-#include <System.Types.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Formats
-{
-namespace Vfw
-{
-//-- forward type declarations -----------------------------------------------
-struct TICOPEN;
-struct TICINFO;
-struct TICCOMPRESS;
-struct TICCOMPRESSFRAMES;
-struct TICSETSTATUSPROC;
-struct TICDECOMPRESS;
-struct TICDECOMPRESSEX;
-struct TICDRAWBEGIN;
-struct TICDRAW;
-struct TICDRAWSUGGEST;
-struct TICPALETTE;
-struct TCOMPVARS;
-struct TDRAWDIBTIME;
-struct TMainAVIHeader;
-struct TAVIStreamHeader;
-struct TAVIINDEXENTRY;
-struct TAVIPALCHANGE;
-struct TAVIStreamInfoW;
-struct TAVIStreamInfoA;
-struct TAVIFileInfoW;
-struct TAVIFileInfoA;
-struct TAVICOMPRESSOPTIONS;
-__interface DELPHIINTERFACE IAVIStream;
-typedef System::DelphiInterface<IAVIStream> _di_IAVIStream;
-__interface DELPHIINTERFACE IAVIStreaming;
-typedef System::DelphiInterface<IAVIStreaming> _di_IAVIStreaming;
-__interface DELPHIINTERFACE IAVIEditStream;
-typedef System::DelphiInterface<IAVIEditStream> _di_IAVIEditStream;
-__interface DELPHIINTERFACE IAVIFile;
-typedef System::DelphiInterface<IAVIFile> _di_IAVIFile;
-__interface DELPHIINTERFACE IGetFrame;
-typedef System::DelphiInterface<IGetFrame> _di_IGetFrame;
-struct TVIDEOHDR;
-struct TCHANNEL_CAPS;
-struct TCAPDRIVERCAPS;
-struct TCAPSTATUS;
-struct TCAPTUREPARMS;
-struct TCAPINFOCHUNK;
-//-- type declarations -------------------------------------------------------
-typedef void * PVOID;
-
-typedef System::LongInt LONG;
-
-typedef int *PLONG;
-
-typedef int Int;
-
-typedef Winapi::Windows::THandle HIC;
-
-typedef System::Word TWOCC;
-
-typedef TICOPEN *PICOPEN;
-
-#pragma pack(push,1)
-struct DECLSPEC_DRECORD TICOPEN
-{
-public:
-	unsigned dwSize;
-	unsigned fccType;
-	unsigned fccHandler;
-	unsigned dwVersion;
-	unsigned dwFlags;
-	unsigned dwError;
-	PVOID pV1Reserved;
-	PVOID pV2Reserved;
-	unsigned dnDevNode;
-};
-#pragma pack(pop)
-
-
-typedef TICINFO *PICINFO;
-
-#pragma pack(push,1)
-struct DECLSPEC_DRECORD TICINFO
-{
-public:
-	unsigned dwSize;
-	unsigned fccType;
-	unsigned fccHandler;
-	unsigned dwFlags;
-	unsigned dwVersion;
-	unsigned dwVersionICM;
-	System::StaticArray<System::WideChar, 16> szName;
-	System::StaticArray<System::WideChar, 128> szDescription;
-	System::StaticArray<System::WideChar, 128> szDriver;
-};
-#pragma pack(pop)
-
-
-typedef TICCOMPRESS *PICCOMPRESS;
-
-#pragma pack(push,1)
-struct DECLSPEC_DRECORD TICCOMPRESS
-{
-public:
-	unsigned dwFlags;
-	Winapi::Windows::PBitmapInfoHeader lpbiOutput;
-	PVOID lpOutput;
-	Winapi::Windows::PBitmapInfoHeader lpbiInput;
-	PVOID lpInput;
-	unsigned *lpckid;
-	unsigned *lpdwFlags;
-	LONG lFrameNum;
-	unsigned dwFrameSize;
-	unsigned dwQuality;
-	Winapi::Windows::PBitmapInfoHeader lpbiPrev;
-	PVOID lpPrev;
-};
-#pragma pack(pop)
-
-
-typedef LONG __stdcall (*TICCompressProc)(int lInputOutput, unsigned lFrame, PVOID lpBits, LONG len);
-
-typedef TICCOMPRESSFRAMES *PICCOMPRESSFRAMES;
-
-#pragma pack(push,1)
-struct DECLSPEC_DRECORD TICCOMPRESSFRAMES
-{
-public:
-	unsigned dwFlags;
-	Winapi::Windows::PBitmapInfoHeader lpbiOutput;
-	int lOutput;
-	Winapi::Windows::PBitmapInfoHeader lpbiInput;
-	int lInput;
-	LONG lStartFrame;
-	LONG lFrameCount;
-	LONG lQuality;
-	LONG lDataRate;
-	LONG lKeyRate;
-	unsigned dwRate;
-	unsigned dwScale;
-	unsigned dwOverheadPerFrame;
-	unsigned dwReserved2;
-	TICCompressProc GetData;
-	TICCompressProc PutData;
-};
-#pragma pack(pop)
-
-
-typedef LONG __stdcall (*TICStatusProc)(int lParam, unsigned message, LONG l);
-
-typedef TICSETSTATUSPROC *PICSETSTATUSPROC;
-
-#pragma pack(push,1)
-struct DECLSPEC_DRECORD TICSETSTATUSPROC
-{
-public:
-	unsigned dwFlags;
-	int lParam;
-	TICStatusProc Status;
-};
-#pragma pack(pop)
-
-
-typedef TICDECOMPRESS *PICDECOMPRESS;
-
-#pragma pack(push,1)
-struct DECLSPEC_DRECORD TICDECOMPRESS
-{
-public:
-	unsigned dwFlags;
-	Winapi::Windows::PBitmapInfoHeader lpbiInput;
-	PVOID lpInput;
-	Winapi::Windows::PBitmapInfoHeader lpbiOutput;
-	PVOID lpOutput;
-	unsigned ckid;
-};
-#pragma pack(pop)
-
-
-typedef TICDECOMPRESSEX *PICDECOMPRESSEX;
-
-#pragma pack(push,1)
-struct DECLSPEC_DRECORD TICDECOMPRESSEX
-{
-public:
-	unsigned dwFlags;
-	Winapi::Windows::PBitmapInfoHeader lpbiSrc;
-	PVOID lpSrc;
-	Winapi::Windows::PBitmapInfoHeader lpbiDst;
-	PVOID lpDst;
-	Int xDst;
-	Int yDst;
-	Int dxDst;
-	Int dyDst;
-	Int xSrc;
-	Int ySrc;
-	Int dxSrc;
-	Int dySrc;
-};
-#pragma pack(pop)
-
-
-typedef TICDRAWBEGIN *PICDRAWBEGIN;
-
-#pragma pack(push,1)
-struct DECLSPEC_DRECORD TICDRAWBEGIN
-{
-public:
-	unsigned dwFlags;
-	HPALETTE hpal;
-	HWND hwnd;
-	HDC hdc;
-	Int xDst;
-	Int yDst;
-	Int dxDst;
-	Int dyDst;
-	Winapi::Windows::PBitmapInfoHeader lpbi;
-	Int xSrc;
-	Int ySrc;
-	Int dxSrc;
-	Int dySrc;
-	unsigned dwRate;
-	unsigned dwScale;
-};
-#pragma pack(pop)
-
-
-typedef TICDRAW *PICDRAW;
-
-#pragma pack(push,1)
-struct DECLSPEC_DRECORD TICDRAW
-{
-public:
-	unsigned dwFlags;
-	PVOID lpFormat;
-	PVOID lpData;
-	unsigned cbData;
-	LONG lTime;
-};
-#pragma pack(pop)
-
-
-typedef TICDRAWSUGGEST *PICDRAWSUGGEST;
-
-#pragma pack(push,1)
-struct DECLSPEC_DRECORD TICDRAWSUGGEST
-{
-public:
-	Winapi::Windows::PBitmapInfoHeader lpbiIn;
-	Winapi::Windows::PBitmapInfoHeader lpbiSuggest;
-	Int dxSrc;
-	Int dySrc;
-	Int dxDst;
-	Int dyDst;
-	HIC hicDecompressor;
-};
-#pragma pack(pop)
-
-
-typedef TICPALETTE *PICPALETTE;
-
-#pragma pack(push,1)
-struct DECLSPEC_DRECORD TICPALETTE
-{
-public:
-	unsigned dwFlags;
-	Int iStart;
-	Int iLen;
-	Winapi::Windows::PPaletteEntry lppe;
-};
-#pragma pack(pop)
-
-
-typedef TCOMPVARS *PCOMPVARS;
-
-#pragma pack(push,1)
-struct DECLSPEC_DRECORD TCOMPVARS
-{
-public:
-	unsigned cbSize;
-	unsigned dwFlags;
-	HIC hic;
-	unsigned fccType;
-	unsigned fccHandler;
-	Winapi::Windows::PBitmapInfo lpbiIn;
-	Winapi::Windows::PBitmapInfo lpbiOut;
-	PVOID lpBitsOut;
-	PVOID lpBitsPrev;
-	LONG lFrame;
-	LONG lKey;
-	LONG lDataRate;
-	LONG lQ;
-	LONG lKeyCount;
-	PVOID lpState;
-	LONG cbState;
-};
-#pragma pack(pop)
-
-
-typedef Winapi::Windows::THandle HDRAWDIB;
-
-typedef TDRAWDIBTIME *PDRAWDIBTIME;
-
-#pragma pack(push,1)
-struct DECLSPEC_DRECORD TDRAWDIBTIME
-{
-public:
-	LONG timeCount;
-	LONG timeDraw;
-	LONG timeDecompress;
-	LONG timeDither;
-	LONG timeStretch;
-	LONG timeBlt;
-	LONG timeSetDIBits;
-};
-#pragma pack(pop)
-
-
-typedef TMainAVIHeader *PMainAVIHeader;
-
-#pragma pack(push,1)
-struct DECLSPEC_DRECORD TMainAVIHeader
-{
-public:
-	unsigned dwMicroSecPerFrame;
-	unsigned dwMaxBytesPerSec;
-	unsigned dwPaddingGranularity;
-	unsigned dwFlags;
-	unsigned dwTotalFrames;
-	unsigned dwInitialFrames;
-	unsigned dwStreams;
-	unsigned dwSuggestedBufferSize;
-	unsigned dwWidth;
-	unsigned dwHeight;
-	System::StaticArray<unsigned, 4> dwReserved;
-};
-#pragma pack(pop)
-
-
-typedef TAVIStreamHeader *PAVIStreamHeader;
-
-#pragma pack(push,1)
-struct DECLSPEC_DRECORD TAVIStreamHeader
-{
-public:
-	unsigned fccType;
-	unsigned fccHandler;
-	unsigned dwFlags;
-	System::Word wPriority;
-	System::Word wLanguage;
-	unsigned dwInitialFrames;
-	unsigned dwScale;
-	unsigned dwRate;
-	unsigned dwStart;
-	unsigned dwLength;
-	unsigned dwSuggestedBufferSize;
-	unsigned dwQuality;
-	unsigned dwSampleSize;
-	Winapi::Windows::TRect rcFrame;
-};
-#pragma pack(pop)
-
-
-typedef TAVIINDEXENTRY *PAVIINDEXENTRY;
-
-#pragma pack(push,1)
-struct DECLSPEC_DRECORD TAVIINDEXENTRY
-{
-public:
-	unsigned ckid;
-	unsigned dwFlags;
-	unsigned dwChunkOffset;
-	unsigned dwChunkLength;
-};
-#pragma pack(pop)
-
-
-typedef TAVIPALCHANGE *PAVIPALCHANGE;
-
-#pragma pack(push,1)
-struct DECLSPEC_DRECORD TAVIPALCHANGE
-{
-public:
-	System::Byte bFirstEntry;
-	System::Byte bNumEntries;
-	System::Word wFlags;
-	System::StaticArray<tagPALETTEENTRY, 1> peNew;
-};
-#pragma pack(pop)
-
-
-typedef TAVIStreamInfoW *PAVIStreamInfoW;
-
-#pragma pack(push,1)
-struct DECLSPEC_DRECORD TAVIStreamInfoW
-{
-public:
-	unsigned fccType;
-	unsigned fccHandler;
-	unsigned dwFlags;
-	unsigned dwCaps;
-	System::Word wPriority;
-	System::Word wLanguage;
-	unsigned dwScale;
-	unsigned dwRate;
-	unsigned dwStart;
-	unsigned dwLength;
-	unsigned dwInitialFrames;
-	unsigned dwSuggestedBufferSize;
-	unsigned dwQuality;
-	unsigned dwSampleSize;
-	Winapi::Windows::TRect rcFrame;
-	unsigned dwEditCount;
-	unsigned dwFormatChangeCount;
-	System::StaticArray<System::WideChar, 64> szName;
-};
-#pragma pack(pop)
-
-
-typedef TAVIStreamInfoA *PAVIStreamInfoA;
-
-#pragma pack(push,1)
-struct DECLSPEC_DRECORD TAVIStreamInfoA
-{
-public:
-	unsigned fccType;
-	unsigned fccHandler;
-	unsigned dwFlags;
-	unsigned dwCaps;
-	System::Word wPriority;
-	System::Word wLanguage;
-	unsigned dwScale;
-	unsigned dwRate;
-	unsigned dwStart;
-	unsigned dwLength;
-	unsigned dwInitialFrames;
-	unsigned dwSuggestedBufferSize;
-	unsigned dwQuality;
-	unsigned dwSampleSize;
-	Winapi::Windows::TRect rcFrame;
-	unsigned dwEditCount;
-	unsigned dwFormatChangeCount;
-	System::StaticArray<char, 64> szName;
-};
-#pragma pack(pop)
-
-
-typedef TAVIStreamInfoW *PAVIStreamInfo;
-
-typedef TAVIStreamInfoW TAVIStreamInfo;
-
-typedef TAVIFileInfoW *PAVIFileInfoW;
-
-#pragma pack(push,1)
-struct DECLSPEC_DRECORD TAVIFileInfoW
-{
-public:
-	unsigned dwMaxBytesPerSec;
-	unsigned dwFlags;
-	unsigned dwCaps;
-	unsigned dwStreams;
-	unsigned dwSuggestedBufferSize;
-	unsigned dwWidth;
-	unsigned dwHeight;
-	unsigned dwScale;
-	unsigned dwRate;
-	unsigned dwLength;
-	unsigned dwEditCount;
-	System::StaticArray<System::WideChar, 64> szFileType;
-};
-#pragma pack(pop)
-
-
-typedef TAVIFileInfoA *PAVIFileInfoA;
-
-#pragma pack(push,1)
-struct DECLSPEC_DRECORD TAVIFileInfoA
-{
-public:
-	unsigned dwMaxBytesPerSec;
-	unsigned dwFlags;
-	unsigned dwCaps;
-	unsigned dwStreams;
-	unsigned dwSuggestedBufferSize;
-	unsigned dwWidth;
-	unsigned dwHeight;
-	unsigned dwScale;
-	unsigned dwRate;
-	unsigned dwLength;
-	unsigned dwEditCount;
-	System::StaticArray<char, 64> szFileType;
-};
-#pragma pack(pop)
-
-
-typedef TAVIFileInfoW *PAVIFileInfo;
-
-typedef TAVIFileInfoW TAVIFileInfo;
-
-typedef System::LongBool __pascal (*TAVISAVECALLBACK)(Int i);
-
-typedef TAVICOMPRESSOPTIONS *PAVICOMPRESSOPTIONS;
-
-#pragma pack(push,1)
-struct DECLSPEC_DRECORD TAVICOMPRESSOPTIONS
-{
-public:
-	unsigned fccType;
-	unsigned fccHandler;
-	unsigned dwKeyFrameEvery;
-	unsigned dwQuality;
-	unsigned dwBytesPerSecond;
-	unsigned dwFlags;
-	PVOID lpFormat;
-	unsigned cbFormat;
-	PVOID lpParms;
-	unsigned cbParms;
-	unsigned dwInterleaveEvery;
-};
-#pragma pack(pop)
-
-
-__interface IAVIStream  : public System::IInterface 
-{
-	virtual HRESULT __stdcall Create(int lParam1, int lParam2) = 0 ;
-	virtual HRESULT __stdcall Info(TAVIStreamInfoW &psi, LONG lSize) = 0 ;
-	virtual LONG __stdcall FindSample(LONG lPos, LONG lFlags) = 0 ;
-	virtual HRESULT __stdcall ReadFormat(LONG lPos, PVOID lpFormat, LONG &lpcbFormat) = 0 ;
-	virtual HRESULT __stdcall SetFormat(LONG lPos, PVOID lpFormat, LONG cbFormat) = 0 ;
-	virtual HRESULT __stdcall Read(LONG lStart, LONG lSamples, PVOID lpBuffer, LONG cbBuffer, LONG &plBytes, LONG &plSamples) = 0 ;
-	virtual HRESULT __stdcall Write(LONG lStart, LONG lSamples, PVOID lpBuffer, LONG cbBuffer, unsigned dwFlags, LONG &plSampWritten, LONG &plBytesWritten) = 0 ;
-	virtual HRESULT __stdcall Delete(LONG lStart, LONG lSamples) = 0 ;
-	virtual HRESULT __stdcall ReadData(unsigned fcc, PVOID lp, LONG &lpcb) = 0 ;
-	virtual HRESULT __stdcall WriteData(unsigned fcc, PVOID lp, LONG cb) = 0 ;
-	virtual HRESULT __stdcall SetInfo(TAVIStreamInfoW &lpInfo, LONG cbInfo) = 0 ;
-};
-
-__interface IAVIStreaming  : public System::IInterface 
-{
-	virtual HRESULT __stdcall _Begin(LONG lStart, LONG lEnd, LONG lRate) = 0 ;
-	virtual HRESULT __stdcall _End() = 0 ;
-};
-
-__interface IAVIEditStream  : public System::IInterface 
-{
-	virtual HRESULT __stdcall Cut(LONG &plStart, LONG &plLength, _di_IAVIStream &ppResult) = 0 ;
-	virtual HRESULT __stdcall Copy(LONG &plStart, LONG &plLength, _di_IAVIStream &ppResult) = 0 ;
-	virtual HRESULT __stdcall Paste(LONG &plPos, LONG &plLength, _di_IAVIStream pstream, LONG lStart, LONG lEnd) = 0 ;
-	virtual HRESULT __stdcall Clone(_di_IAVIStream &ppResult) = 0 ;
-	virtual HRESULT __stdcall SetInfo(TAVIStreamInfoW &lpInfo, LONG cbInfo) = 0 ;
-};
-
-__interface IAVIFile  : public System::IInterface 
-{
-	virtual HRESULT __stdcall Info(TAVIFileInfoW &pfi, LONG iSize) = 0 ;
-	virtual HRESULT __stdcall GetStream(_di_IAVIStream &ppStream, unsigned fccType, LONG lParam) = 0 ;
-	virtual HRESULT __stdcall CreateStream(_di_IAVIStream &ppStream, TAVIStreamInfoW &psi) = 0 ;
-	virtual HRESULT __stdcall WriteData(unsigned ckid, PVOID lpData, LONG cbData) = 0 ;
-	virtual HRESULT __stdcall ReadData(unsigned ckid, PVOID lpData, PLONG lpcbData) = 0 ;
-	virtual HRESULT __stdcall EndRecord() = 0 ;
-	virtual HRESULT __stdcall DeleteStream(unsigned fccType, LONG lParam) = 0 ;
-};
-
-__interface IGetFrame  : public System::IInterface 
-{
-	virtual Winapi::Windows::PBitmapInfoHeader __stdcall GetFrame(LONG lPos) = 0 ;
-	virtual HRESULT __stdcall BeginExtraction(LONG lStart, LONG lEnd, LONG lRate) = 0 ;
-	virtual HRESULT __stdcall EndExtraction() = 0 ;
-	virtual HRESULT __stdcall SetFormat(Winapi::Windows::TBitmapInfoHeader &lpbi, void * lpBits, int x, int y, int dx, int dy) = 0 ;
-};
-
-typedef System::_di_IInterface *PUnknown;
-
-typedef Winapi::Windows::THandle HVIDEO;
-
-typedef unsigned *PHVIDEO;
-
-typedef TVIDEOHDR *PVIDEOHDR;
-
-struct DECLSPEC_DRECORD TVIDEOHDR
-{
-public:
-	Winapi::Windows::PByte lpData;
-	unsigned dwBufferLength;
-	unsigned dwBytesUsed;
-	unsigned dwTimeCaptured;
-	unsigned dwUser;
-	unsigned dwFlags;
-	System::StaticArray<unsigned, 4> dwReserved;
-};
-
-
-typedef TCHANNEL_CAPS *PCHANNEL_CAPS;
-
-struct DECLSPEC_DRECORD TCHANNEL_CAPS
-{
-public:
-	unsigned dwFlags;
-	unsigned dwSrcRectXMod;
-	unsigned dwSrcRectYMod;
-	unsigned dwSrcRectWidthMod;
-	unsigned dwSrcRectHeightMod;
-	unsigned dwDstRectXMod;
-	unsigned dwDstRectYMod;
-	unsigned dwDstRectWidthMod;
-	unsigned dwDstRectHeightMod;
-};
-
-
-typedef unsigned __stdcall (*TCAPYIELDCALLBACK)(HWND hWnd);
-
-typedef unsigned __stdcall (*TCAPSTATUSCALLBACKW)(HWND hWnd, Int nID, System::WideChar * lpsz);
-
-typedef unsigned __stdcall (*TCAPERRORCALLBACKW)(HWND hWnd, Int nID, System::WideChar * lpsz);
-
-typedef unsigned __stdcall (*TCAPSTATUSCALLBACKA)(HWND hWnd, Int nID, char * lpsz);
-
-typedef unsigned __stdcall (*TCAPERRORCALLBACKA)(HWND hWnd, Int nID, char * lpsz);
-
-typedef TCAPSTATUSCALLBACKA TCAPSTATUSCALLBACK;
-
-typedef TCAPERRORCALLBACKA TCAPERRORCALLBACK;
-
-typedef unsigned __stdcall (*TCAPVIDEOCALLBACK)(HWND hWnd, PVIDEOHDR lpVHdr);
-
-typedef unsigned __stdcall (*TCAPWAVECALLBACK)(HWND hWnd, Winapi::Mmsystem::PWaveHdr lpWHdr);
-
-typedef unsigned __stdcall (*TCAPCONTROLCALLBACK)(HWND hWnd, Int nState);
-
-typedef TCAPDRIVERCAPS *PCAPDRIVERCAPS;
-
-struct DECLSPEC_DRECORD TCAPDRIVERCAPS
-{
-public:
-	unsigned wDeviceIndex;
-	System::LongBool fHasOverlay;
-	System::LongBool fHasDlgVideoSource;
-	System::LongBool fHasDlgVideoFormat;
-	System::LongBool fHasDlgVideoDisplay;
-	System::LongBool fCaptureInitialized;
-	System::LongBool fDriverSuppliesPalettes;
-	Winapi::Windows::THandle hVideoIn;
-	Winapi::Windows::THandle hVideoOut;
-	Winapi::Windows::THandle hVideoExtIn;
-	Winapi::Windows::THandle hVideoExtOut;
-};
-
-
-typedef TCAPSTATUS *PCAPSTATUS;
-
-struct DECLSPEC_DRECORD TCAPSTATUS
-{
-public:
-	unsigned uiImageWidth;
-	unsigned uiImageHeight;
-	System::LongBool fLiveWindow;
-	System::LongBool fOverlayWindow;
-	System::LongBool fScale;
-	Winapi::Windows::TPoint ptScroll;
-	System::LongBool fUsingDefaultPalette;
-	System::LongBool fAudioHardware;
-	System::LongBool fCapFileExists;
-	unsigned dwCurrentVideoFrame;
-	unsigned dwCurrentVideoFramesDropped;
-	unsigned dwCurrentWaveSamples;
-	unsigned dwCurrentTimeElapsedMS;
-	HPALETTE hPalCurrent;
-	System::LongBool fCapturingNow;
-	unsigned dwReturn;
-	unsigned wNumVideoAllocated;
-	unsigned wNumAudioAllocated;
-};
-
-
-typedef TCAPTUREPARMS *PCAPTUREPARMS;
-
-struct DECLSPEC_DRECORD TCAPTUREPARMS
-{
-public:
-	unsigned dwRequestMicroSecPerFrame;
-	System::LongBool fMakeUserHitOKToCapture;
-	unsigned wPercentDropForError;
-	System::LongBool fYield;
-	unsigned dwIndexSize;
-	unsigned wChunkGranularity;
-	System::LongBool fUsingDOSMemory;
-	unsigned wNumVideoRequested;
-	System::LongBool fCaptureAudio;
-	unsigned wNumAudioRequested;
-	unsigned vKeyAbort;
-	System::LongBool fAbortLeftMouse;
-	System::LongBool fAbortRightMouse;
-	System::LongBool fLimitEnabled;
-	unsigned wTimeLimit;
-	System::LongBool fMCIControl;
-	System::LongBool fStepMCIDevice;
-	unsigned dwMCIStartTime;
-	unsigned dwMCIStopTime;
-	System::LongBool fStepCaptureAt2x;
-	unsigned wStepCaptureAverageFrames;
-	unsigned dwAudioBufferSize;
-	System::LongBool fDisableWriteCache;
-	unsigned AVStreamMaster;
-};
-
-
-typedef TCAPINFOCHUNK *PCAPINFOCHUNK;
-
-struct DECLSPEC_DRECORD TCAPINFOCHUNK
-{
-public:
-	unsigned fccInfoID;
-	PVOID lpData;
-	unsigned cbData;
-};
-
-
-//-- var, const, procedure ---------------------------------------------------
-static _DELPHI_CONST System::Word ICVERSION = System::Word(0x104);
-static _DELPHI_CONST int BI_1632 = int(0x32333631);
-static _DELPHI_CONST int ICTYPE_VIDEO = int(0x63646976);
-static _DELPHI_CONST int ICTYPE_AUDIO = int(0x63647561);
-static _DELPHI_CONST System::Int8 ICERR_OK = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 ICERR_DONTDRAW = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 ICERR_NEWPALETTE = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 ICERR_GOTOKEYFRAME = System::Int8(0x3);
-static _DELPHI_CONST System::Int8 ICERR_STOPDRAWING = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 ICERR_UNSUPPORTED = System::Int8(-1);
-static _DELPHI_CONST System::Int8 ICERR_BADFORMAT = System::Int8(-2);
-static _DELPHI_CONST System::Int8 ICERR_MEMORY = System::Int8(-3);
-static _DELPHI_CONST System::Int8 ICERR_INTERNAL = System::Int8(-4);
-static _DELPHI_CONST System::Int8 ICERR_BADFLAGS = System::Int8(-5);
-static _DELPHI_CONST System::Int8 ICERR_BADPARAM = System::Int8(-6);
-static _DELPHI_CONST System::Int8 ICERR_BADSIZE = System::Int8(-7);
-static _DELPHI_CONST System::Int8 ICERR_BADHANDLE = System::Int8(-8);
-static _DELPHI_CONST System::Int8 ICERR_CANTUPDATE = System::Int8(-9);
-static _DELPHI_CONST System::Int8 ICERR_ABORT = System::Int8(-10);
-static _DELPHI_CONST System::Int8 ICERR_ERROR = System::Int8(-100);
-static _DELPHI_CONST short ICERR_BADBITDEPTH = short(-200);
-static _DELPHI_CONST short ICERR_BADIMAGESIZE = short(-201);
-static _DELPHI_CONST short ICERR_CUSTOM = short(-400);
-static _DELPHI_CONST System::Int8 ICMODE_COMPRESS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 ICMODE_DECOMPRESS = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 ICMODE_FASTDECOMPRESS = System::Int8(0x3);
-static _DELPHI_CONST System::Int8 ICMODE_QUERY = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 ICMODE_FASTCOMPRESS = System::Int8(0x5);
-static _DELPHI_CONST System::Int8 ICMODE_DRAW = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 AVIIF_LIST = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 AVIIF_TWOCC = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 AVIIF_KEYFRAME = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 ICQUALITY_LOW = System::Int8(0x0);
-static _DELPHI_CONST System::Word ICQUALITY_HIGH = System::Word(0x2710);
-static _DELPHI_CONST System::Int8 ICQUALITY_DEFAULT = System::Int8(-1);
-static _DELPHI_CONST System::Word ICM_USER = System::Word(0x4000);
-static _DELPHI_CONST System::Word ICM_RESERVED_LOW = System::Word(0x5000);
-static _DELPHI_CONST System::Word ICM_RESERVED_HIGH = System::Word(0x6000);
-static _DELPHI_CONST System::Word ICM_RESERVED = System::Word(0x5000);
-static _DELPHI_CONST System::Word ICM_GETSTATE = System::Word(0x5000);
-static _DELPHI_CONST System::Word ICM_SETSTATE = System::Word(0x5001);
-static _DELPHI_CONST System::Word ICM_GETINFO = System::Word(0x5002);
-static _DELPHI_CONST System::Word ICM_CONFIGURE = System::Word(0x500a);
-static _DELPHI_CONST System::Word ICM_ABOUT = System::Word(0x500b);
-static _DELPHI_CONST System::Word ICM_GETDEFAULTQUALITY = System::Word(0x501e);
-static _DELPHI_CONST System::Word ICM_GETQUALITY = System::Word(0x501f);
-static _DELPHI_CONST System::Word ICM_SETQUALITY = System::Word(0x5020);
-static _DELPHI_CONST System::Word ICM_SET = System::Word(0x5028);
-static _DELPHI_CONST System::Word ICM_GET = System::Word(0x5029);
-static _DELPHI_CONST int ICM_FRAMERATE = int(0x526d7246);
-static _DELPHI_CONST int ICM_KEYFRAMERATE = int(0x5279654b);
-static _DELPHI_CONST System::Word ICM_COMPRESS_GET_FORMAT = System::Word(0x4004);
-static _DELPHI_CONST System::Word ICM_COMPRESS_GET_SIZE = System::Word(0x4005);
-static _DELPHI_CONST System::Word ICM_COMPRESS_QUERY = System::Word(0x4006);
-static _DELPHI_CONST System::Word ICM_COMPRESS_BEGIN = System::Word(0x4007);
-static _DELPHI_CONST System::Word ICM_COMPRESS = System::Word(0x4008);
-static _DELPHI_CONST System::Word ICM_COMPRESS_END = System::Word(0x4009);
-static _DELPHI_CONST System::Word ICM_DECOMPRESS_GET_FORMAT = System::Word(0x400a);
-static _DELPHI_CONST System::Word ICM_DECOMPRESS_QUERY = System::Word(0x400b);
-static _DELPHI_CONST System::Word ICM_DECOMPRESS_BEGIN = System::Word(0x400c);
-static _DELPHI_CONST System::Word ICM_DECOMPRESS = System::Word(0x400d);
-static _DELPHI_CONST System::Word ICM_DECOMPRESS_END = System::Word(0x400e);
-static _DELPHI_CONST System::Word ICM_DECOMPRESS_SET_PALETTE = System::Word(0x401d);
-static _DELPHI_CONST System::Word ICM_DECOMPRESS_GET_PALETTE = System::Word(0x401e);
-static _DELPHI_CONST System::Word ICM_DRAW_QUERY = System::Word(0x401f);
-static _DELPHI_CONST System::Word ICM_DRAW_BEGIN = System::Word(0x400f);
-static _DELPHI_CONST System::Word ICM_DRAW_GET_PALETTE = System::Word(0x4010);
-static _DELPHI_CONST System::Word ICM_DRAW_START = System::Word(0x4012);
-static _DELPHI_CONST System::Word ICM_DRAW_STOP = System::Word(0x4013);
-static _DELPHI_CONST System::Word ICM_DRAW_END = System::Word(0x4015);
-static _DELPHI_CONST System::Word ICM_DRAW_GETTIME = System::Word(0x4020);
-static _DELPHI_CONST System::Word ICM_DRAW = System::Word(0x4021);
-static _DELPHI_CONST System::Word ICM_DRAW_WINDOW = System::Word(0x4022);
-static _DELPHI_CONST System::Word ICM_DRAW_SETTIME = System::Word(0x4023);
-static _DELPHI_CONST System::Word ICM_DRAW_REALIZE = System::Word(0x4024);
-static _DELPHI_CONST System::Word ICM_DRAW_FLUSH = System::Word(0x4025);
-static _DELPHI_CONST System::Word ICM_DRAW_RENDERBUFFER = System::Word(0x4026);
-static _DELPHI_CONST System::Word ICM_DRAW_START_PLAY = System::Word(0x4027);
-static _DELPHI_CONST System::Word ICM_DRAW_STOP_PLAY = System::Word(0x4028);
-static _DELPHI_CONST System::Word ICM_DRAW_SUGGESTFORMAT = System::Word(0x4032);
-static _DELPHI_CONST System::Word ICM_DRAW_CHANGEPALETTE = System::Word(0x4033);
-static _DELPHI_CONST System::Word ICM_GETBUFFERSWANTED = System::Word(0x4029);
-static _DELPHI_CONST System::Word ICM_GETDEFAULTKEYFRAMERATE = System::Word(0x402a);
-static _DELPHI_CONST System::Word ICM_DECOMPRESSEX_BEGIN = System::Word(0x403c);
-static _DELPHI_CONST System::Word ICM_DECOMPRESSEX_QUERY = System::Word(0x403d);
-static _DELPHI_CONST System::Word ICM_DECOMPRESSEX = System::Word(0x403e);
-static _DELPHI_CONST System::Word ICM_DECOMPRESSEX_END = System::Word(0x403f);
-static _DELPHI_CONST System::Word ICM_COMPRESS_FRAMES_INFO = System::Word(0x4046);
-static _DELPHI_CONST System::Word ICM_SET_STATUS_PROC = System::Word(0x4048);
-static _DELPHI_CONST System::Int8 VIDCF_QUALITY = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 VIDCF_CRUNCH = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 VIDCF_TEMPORAL = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 VIDCF_COMPRESSFRAMES = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 VIDCF_DRAW = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 VIDCF_FASTTEMPORALC = System::Int8(0x20);
-static _DELPHI_CONST System::Byte VIDCF_FASTTEMPORALD = System::Byte(0x80);
-static _DELPHI_CONST System::Int8 ICCOMPRESS_KEYFRAME = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 ICCOMPRESSFRAMES_PADDING = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 ICSTATUS_START = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 ICSTATUS_STATUS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 ICSTATUS_END = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 ICSTATUS_ERROR = System::Int8(0x3);
-static _DELPHI_CONST System::Int8 ICSTATUS_YIELD = System::Int8(0x4);
-static _DELPHI_CONST unsigned ICDECOMPRESS_HURRYUP = unsigned(0x80000000);
-static _DELPHI_CONST int ICDECOMPRESS_UPDATE = int(0x40000000);
-static _DELPHI_CONST int ICDECOMPRESS_PREROLL = int(0x20000000);
-static _DELPHI_CONST int ICDECOMPRESS_NULLFRAME = int(0x10000000);
-static _DELPHI_CONST int ICDECOMPRESS_NOTKEYFRAME = int(0x8000000);
-static _DELPHI_CONST System::Int8 ICDRAW_QUERY = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 ICDRAW_FULLSCREEN = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 ICDRAW_HDC = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 ICDRAW_ANIMATE = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 ICDRAW_CONTINUE = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 ICDRAW_MEMORYDC = System::Int8(0x20);
-static _DELPHI_CONST System::Int8 ICDRAW_UPDATING = System::Int8(0x40);
-static _DELPHI_CONST System::Byte ICDRAW_RENDER = System::Byte(0x80);
-static _DELPHI_CONST System::Word ICDRAW_BUFFER = System::Word(0x100);
-static _DELPHI_CONST unsigned ICDRAW_HURRYUP = unsigned(0x80000000);
-static _DELPHI_CONST int ICDRAW_UPDATE = int(0x40000000);
-static _DELPHI_CONST int ICDRAW_PREROLL = int(0x20000000);
-static _DELPHI_CONST int ICDRAW_NULLFRAME = int(0x10000000);
-static _DELPHI_CONST int ICDRAW_NOTKEYFRAME = int(0x8000000);
-static _DELPHI_CONST System::Word ICINSTALL_UNICODE = System::Word(0x8000);
-static _DELPHI_CONST System::Int8 ICINSTALL_FUNCTION = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 ICINSTALL_DRIVER = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 ICINSTALL_HDRV = System::Int8(0x4);
-static _DELPHI_CONST System::Word ICINSTALL_DRIVERW = System::Word(0x8002);
-static _DELPHI_CONST System::Int8 ICMF_CONFIGURE_QUERY = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 ICMF_ABOUT_QUERY = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 ICMF_COMPVARS_VALID = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 ICMF_CHOOSE_KEYFRAME = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 ICMF_CHOOSE_DATARATE = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 ICMF_CHOOSE_PREVIEW = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 ICMF_CHOOSE_ALLCOMPRESSORS = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 DDF_UPDATE = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 DDF_SAME_HDC = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 DDF_SAME_DRAW = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 DDF_DONTDRAW = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 DDF_ANIMATE = System::Int8(0x20);
-static _DELPHI_CONST System::Int8 DDF_BUFFER = System::Int8(0x40);
-static _DELPHI_CONST System::Byte DDF_JUSTDRAWIT = System::Byte(0x80);
-static _DELPHI_CONST System::Word DDF_FULLSCREEN = System::Word(0x100);
-static _DELPHI_CONST System::Word DDF_BACKGROUNDPAL = System::Word(0x200);
-static _DELPHI_CONST System::Word DDF_NOTKEYFRAME = System::Word(0x400);
-static _DELPHI_CONST System::Word DDF_HURRYUP = System::Word(0x800);
-static _DELPHI_CONST System::Word DDF_HALFTONE = System::Word(0x1000);
-static _DELPHI_CONST System::Int8 DDF_PREROLL = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 DDF_SAME_DIB = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 DDF_SAME_SIZE = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 PD_CAN_DRAW_DIB = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 PD_CAN_STRETCHDIB = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 PD_STRETCHDIB_1_1_OK = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 PD_STRETCHDIB_1_2_OK = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 PD_STRETCHDIB_1_N_OK = System::Int8(0x10);
-static _DELPHI_CONST int formtypeAVI = int(0x20495641);
-static _DELPHI_CONST int listtypeAVIHEADER = int(0x6c726468);
-static _DELPHI_CONST int ckidAVIMAINHDR = int(0x68697661);
-static _DELPHI_CONST int listtypeSTREAMHEADER = int(0x6c727473);
-static _DELPHI_CONST int ckidSTREAMHEADER = int(0x68727473);
-static _DELPHI_CONST int ckidSTREAMFORMAT = int(0x66727473);
-static _DELPHI_CONST int ckidSTREAMHANDLERDATA = int(0x64727473);
-static _DELPHI_CONST int ckidSTREAMNAME = int(0x6e727473);
-static _DELPHI_CONST int listtypeAVIMOVIE = int(0x69766f6d);
-static _DELPHI_CONST int listtypeAVIRECORD = int(0x20636572);
-static _DELPHI_CONST int ckidAVINEWINDEX = int(0x31786469);
-static _DELPHI_CONST int streamtypeVIDEO = int(0x73646976);
-static _DELPHI_CONST int streamtypeAUDIO = int(0x73647561);
-static _DELPHI_CONST int streamtypeMIDI = int(0x7364696d);
-static _DELPHI_CONST int streamtypeTEXT = int(0x73747874);
-static _DELPHI_CONST System::Word cktypeDIBbits = System::Word(0x6264);
-static _DELPHI_CONST System::Word cktypeDIBcompressed = System::Word(0x6364);
-static _DELPHI_CONST System::Word cktypePALchange = System::Word(0x6370);
-static _DELPHI_CONST System::Word cktypeWAVEbytes = System::Word(0x6277);
-static _DELPHI_CONST int ckidAVIPADDING = int(0x4b4e554a);
-static _DELPHI_CONST System::Int8 AVIF_HASINDEX = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 AVIF_MUSTUSEINDEX = System::Int8(0x20);
-static _DELPHI_CONST System::Word AVIF_ISINTERLEAVED = System::Word(0x100);
-static _DELPHI_CONST System::Word AVIF_TRUSTCKTYPE = System::Word(0x800);
-static _DELPHI_CONST int AVIF_WASCAPTUREFILE = int(0x10000);
-static _DELPHI_CONST int AVIF_COPYRIGHTED = int(0x20000);
-static _DELPHI_CONST System::Word AVI_HEADERSIZE = System::Word(0x800);
-static _DELPHI_CONST System::Int8 AVISF_DISABLED = System::Int8(0x1);
-static _DELPHI_CONST int AVISF_VIDEO_PALCHANGES = int(0x10000);
-static _DELPHI_CONST System::Word AVIIF_NOTIME = System::Word(0x100);
-static _DELPHI_CONST int AVIIF_COMPUSE = int(0xfff0000);
-static _DELPHI_CONST System::Int8 AVIGETFRAMEF_BESTDISPLAYFMT = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 AVISTREAMINFO_DISABLED = System::Int8(0x1);
-static _DELPHI_CONST int AVISTREAMINFO_FORMATCHANGES = int(0x10000);
-static _DELPHI_CONST System::Int8 AVIFILEINFO_HASINDEX = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 AVIFILEINFO_MUSTUSEINDEX = System::Int8(0x20);
-static _DELPHI_CONST System::Word AVIFILEINFO_ISINTERLEAVED = System::Word(0x100);
-static _DELPHI_CONST int AVIFILEINFO_WASCAPTUREFILE = int(0x10000);
-static _DELPHI_CONST int AVIFILEINFO_COPYRIGHTED = int(0x20000);
-static _DELPHI_CONST System::Int8 AVIFILECAPS_CANREAD = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 AVIFILECAPS_CANWRITE = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 AVIFILECAPS_ALLKEYFRAMES = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 AVIFILECAPS_NOCOMPRESSION = System::Int8(0x20);
-static _DELPHI_CONST System::Int8 AVICOMPRESSF_INTERLEAVE = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 AVICOMPRESSF_DATARATE = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 AVICOMPRESSF_KEYFRAMES = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 AVICOMPRESSF_VALID = System::Int8(0x8);
-extern DELPHI_PACKAGE GUID IID_IAVIFile;
-extern DELPHI_PACKAGE GUID IID_IAVIStream;
-extern DELPHI_PACKAGE GUID IID_IAVIStreaming;
-extern DELPHI_PACKAGE GUID IID_IGetFrame;
-extern DELPHI_PACKAGE GUID IID_IAVIEditStream;
-extern DELPHI_PACKAGE GUID CLSID_AVISimpleUnMarshal;
-extern DELPHI_PACKAGE GUID CLSID_AVIFile;
-static _DELPHI_CONST System::Int8 AVIFILEHANDLER_CANREAD = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 AVIFILEHANDLER_CANWRITE = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 AVIFILEHANDLER_CANACCEPTNONRGB = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 AVISTREAMREAD_CONVENIENT = System::Int8(-1);
-static _DELPHI_CONST System::Int8 FIND_DIR = System::Int8(0xf);
-static _DELPHI_CONST System::Int8 FIND_NEXT = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 FIND_PREV = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 FIND_FROM_START = System::Int8(0x8);
-static _DELPHI_CONST System::Byte FIND_TYPE = System::Byte(0xf0);
-static _DELPHI_CONST System::Int8 FIND_KEY = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 FIND_ANY = System::Int8(0x20);
-static _DELPHI_CONST System::Int8 FIND_FORMAT = System::Int8(0x40);
-static _DELPHI_CONST System::Word FIND_RET = System::Word(0xf000);
-static _DELPHI_CONST System::Int8 FIND_POS = System::Int8(0x0);
-static _DELPHI_CONST System::Word FIND_LENGTH = System::Word(0x1000);
-static _DELPHI_CONST System::Word FIND_OFFSET = System::Word(0x2000);
-static _DELPHI_CONST System::Word FIND_SIZE = System::Word(0x3000);
-static _DELPHI_CONST System::Word FIND_INDEX = System::Word(0x4000);
-static _DELPHI_CONST System::Int8 SEARCH_NEAREST = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 SEARCH_BACKWARD = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 SEARCH_FORWARD = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 SEARCH_KEY = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 SEARCH_ANY = System::Int8(0x20);
-static _DELPHI_CONST int comptypeDIB = int(0x20424944);
-static _DELPHI_CONST System::Int8 AVIERR_OK = System::Int8(0x0);
-static _DELPHI_CONST unsigned AVIERR_UNSUPPORTED = unsigned(0x80044065);
-static _DELPHI_CONST unsigned AVIERR_BADFORMAT = unsigned(0x80044066);
-static _DELPHI_CONST unsigned AVIERR_MEMORY = unsigned(0x80044067);
-static _DELPHI_CONST unsigned AVIERR_INTERNAL = unsigned(0x80044068);
-static _DELPHI_CONST unsigned AVIERR_BADFLAGS = unsigned(0x80044069);
-static _DELPHI_CONST unsigned AVIERR_BADPARAM = unsigned(0x8004406a);
-static _DELPHI_CONST unsigned AVIERR_BADSIZE = unsigned(0x8004406b);
-static _DELPHI_CONST unsigned AVIERR_BADHANDLE = unsigned(0x8004406c);
-static _DELPHI_CONST unsigned AVIERR_FILEREAD = unsigned(0x8004406d);
-static _DELPHI_CONST unsigned AVIERR_FILEWRITE = unsigned(0x8004406e);
-static _DELPHI_CONST unsigned AVIERR_FILEOPEN = unsigned(0x8004406f);
-static _DELPHI_CONST unsigned AVIERR_COMPRESSOR = unsigned(0x80044070);
-static _DELPHI_CONST unsigned AVIERR_NOCOMPRESSOR = unsigned(0x80044071);
-static _DELPHI_CONST unsigned AVIERR_READONLY = unsigned(0x80044072);
-static _DELPHI_CONST unsigned AVIERR_NODATA = unsigned(0x80044073);
-static _DELPHI_CONST unsigned AVIERR_BUFFERTOOSMALL = unsigned(0x80044074);
-static _DELPHI_CONST unsigned AVIERR_CANTCOMPRESS = unsigned(0x80044075);
-static _DELPHI_CONST unsigned AVIERR_USERABORT = unsigned(0x800440c6);
-static _DELPHI_CONST unsigned AVIERR_ERROR = unsigned(0x800440c7);
-#define MCIWND_WINDOW_CLASS L"MCIWndClass"
-static _DELPHI_CONST System::Int8 MCIWNDOPENF_NEW = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 MCIWNDF_NOAUTOSIZEWINDOW = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 MCIWNDF_NOPLAYBAR = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 MCIWNDF_NOAUTOSIZEMOVIE = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 MCIWNDF_NOMENU = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 MCIWNDF_SHOWNAME = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 MCIWNDF_SHOWPOS = System::Int8(0x20);
-static _DELPHI_CONST System::Int8 MCIWNDF_SHOWMODE = System::Int8(0x40);
-static _DELPHI_CONST System::Int8 MCIWNDF_SHOWALL = System::Int8(0x70);
-static _DELPHI_CONST System::Word MCIWNDF_NOTIFYMODE = System::Word(0x100);
-static _DELPHI_CONST System::Word MCIWNDF_NOTIFYPOS = System::Word(0x200);
-static _DELPHI_CONST System::Word MCIWNDF_NOTIFYSIZE = System::Word(0x400);
-static _DELPHI_CONST System::Word MCIWNDF_NOTIFYERROR = System::Word(0x1000);
-static _DELPHI_CONST System::Word MCIWNDF_NOTIFYALL = System::Word(0x1f00);
-static _DELPHI_CONST System::Byte MCIWNDF_NOTIFYANSI = System::Byte(0x80);
-static _DELPHI_CONST System::Word MCIWNDF_NOTIFYMEDIAA = System::Word(0x880);
-static _DELPHI_CONST System::Word MCIWNDF_NOTIFYMEDIAW = System::Word(0x800);
-static _DELPHI_CONST System::Word MCIWNDF_NOTIFYMEDIA = System::Word(0x880);
-static _DELPHI_CONST System::Word MCIWNDF_RECORD = System::Word(0x2000);
-static _DELPHI_CONST System::Word MCIWNDF_NOERRORDLG = System::Word(0x4000);
-static _DELPHI_CONST System::Word MCIWNDF_NOOPEN = System::Word(0x8000);
-static _DELPHI_CONST System::Word MCIWNDM_GETDEVICEID = System::Word(0x464);
-static _DELPHI_CONST System::Word MCIWNDM_GETSTART = System::Word(0x467);
-static _DELPHI_CONST System::Word MCIWNDM_GETLENGTH = System::Word(0x468);
-static _DELPHI_CONST System::Word MCIWNDM_GETEND = System::Word(0x469);
-static _DELPHI_CONST System::Word MCIWNDM_EJECT = System::Word(0x46b);
-static _DELPHI_CONST System::Word MCIWNDM_SETZOOM = System::Word(0x46c);
-static _DELPHI_CONST System::Word MCIWNDM_GETZOOM = System::Word(0x46d);
-static _DELPHI_CONST System::Word MCIWNDM_SETVOLUME = System::Word(0x46e);
-static _DELPHI_CONST System::Word MCIWNDM_GETVOLUME = System::Word(0x46f);
-static _DELPHI_CONST System::Word MCIWNDM_SETSPEED = System::Word(0x470);
-static _DELPHI_CONST System::Word MCIWNDM_GETSPEED = System::Word(0x471);
-static _DELPHI_CONST System::Word MCIWNDM_SETREPEAT = System::Word(0x472);
-static _DELPHI_CONST System::Word MCIWNDM_GETREPEAT = System::Word(0x473);
-static _DELPHI_CONST System::Word MCIWNDM_REALIZE = System::Word(0x476);
-static _DELPHI_CONST System::Word MCIWNDM_VALIDATEMEDIA = System::Word(0x479);
-static _DELPHI_CONST System::Word MCIWNDM_PLAYFROM = System::Word(0x47a);
-static _DELPHI_CONST System::Word MCIWNDM_PLAYTO = System::Word(0x47b);
-static _DELPHI_CONST System::Word MCIWNDM_GETPALETTE = System::Word(0x47e);
-static _DELPHI_CONST System::Word MCIWNDM_SETPALETTE = System::Word(0x47f);
-static _DELPHI_CONST System::Word MCIWNDM_SETTIMERS = System::Word(0x481);
-static _DELPHI_CONST System::Word MCIWNDM_SETACTIVETIMER = System::Word(0x482);
-static _DELPHI_CONST System::Word MCIWNDM_SETINACTIVETIMER = System::Word(0x483);
-static _DELPHI_CONST System::Word MCIWNDM_GETACTIVETIMER = System::Word(0x484);
-static _DELPHI_CONST System::Word MCIWNDM_GETINACTIVETIMER = System::Word(0x485);
-static _DELPHI_CONST System::Word MCIWNDM_CHANGESTYLES = System::Word(0x487);
-static _DELPHI_CONST System::Word MCIWNDM_GETSTYLES = System::Word(0x488);
-static _DELPHI_CONST System::Word MCIWNDM_GETALIAS = System::Word(0x489);
-static _DELPHI_CONST System::Word MCIWNDM_PLAYREVERSE = System::Word(0x48b);
-static _DELPHI_CONST System::Word MCIWNDM_GET_SOURCE = System::Word(0x48c);
-static _DELPHI_CONST System::Word MCIWNDM_PUT_SOURCE = System::Word(0x48d);
-static _DELPHI_CONST System::Word MCIWNDM_GET_DEST = System::Word(0x48e);
-static _DELPHI_CONST System::Word MCIWNDM_PUT_DEST = System::Word(0x48f);
-static _DELPHI_CONST System::Word MCIWNDM_CAN_PLAY = System::Word(0x490);
-static _DELPHI_CONST System::Word MCIWNDM_CAN_WINDOW = System::Word(0x491);
-static _DELPHI_CONST System::Word MCIWNDM_CAN_RECORD = System::Word(0x492);
-static _DELPHI_CONST System::Word MCIWNDM_CAN_SAVE = System::Word(0x493);
-static _DELPHI_CONST System::Word MCIWNDM_CAN_EJECT = System::Word(0x494);
-static _DELPHI_CONST System::Word MCIWNDM_CAN_CONFIG = System::Word(0x495);
-static _DELPHI_CONST System::Word MCIWNDM_PALETTEKICK = System::Word(0x496);
-static _DELPHI_CONST System::Word MCIWNDM_OPENINTERFACE = System::Word(0x497);
-static _DELPHI_CONST System::Word MCIWNDM_SETOWNER = System::Word(0x498);
-static _DELPHI_CONST System::Word MCIWNDM_SENDSTRINGA = System::Word(0x465);
-static _DELPHI_CONST System::Word MCIWNDM_GETPOSITIONA = System::Word(0x466);
-static _DELPHI_CONST System::Word MCIWNDM_GETMODEA = System::Word(0x46a);
-static _DELPHI_CONST System::Word MCIWNDM_SETTIMEFORMATA = System::Word(0x477);
-static _DELPHI_CONST System::Word MCIWNDM_GETTIMEFORMATA = System::Word(0x478);
-static _DELPHI_CONST System::Word MCIWNDM_GETFILENAMEA = System::Word(0x47c);
-static _DELPHI_CONST System::Word MCIWNDM_GETDEVICEA = System::Word(0x47d);
-static _DELPHI_CONST System::Word MCIWNDM_GETERRORA = System::Word(0x480);
-static _DELPHI_CONST System::Word MCIWNDM_NEWA = System::Word(0x486);
-static _DELPHI_CONST System::Word MCIWNDM_RETURNSTRINGA = System::Word(0x48a);
-static _DELPHI_CONST System::Word MCIWNDM_OPENA = System::Word(0x499);
-static _DELPHI_CONST System::Word MCIWNDM_SENDSTRINGW = System::Word(0x4c9);
-static _DELPHI_CONST System::Word MCIWNDM_GETPOSITIONW = System::Word(0x4ca);
-static _DELPHI_CONST System::Word MCIWNDM_GETMODEW = System::Word(0x4ce);
-static _DELPHI_CONST System::Word MCIWNDM_SETTIMEFORMATW = System::Word(0x4db);
-static _DELPHI_CONST System::Word MCIWNDM_GETTIMEFORMATW = System::Word(0x4dc);
-static _DELPHI_CONST System::Word MCIWNDM_GETFILENAMEW = System::Word(0x4e0);
-static _DELPHI_CONST System::Word MCIWNDM_GETDEVICEW = System::Word(0x4e1);
-static _DELPHI_CONST System::Word MCIWNDM_GETERRORW = System::Word(0x4e4);
-static _DELPHI_CONST System::Word MCIWNDM_NEWW = System::Word(0x4ea);
-static _DELPHI_CONST System::Word MCIWNDM_RETURNSTRINGW = System::Word(0x4ee);
-static _DELPHI_CONST System::Word MCIWNDM_OPENW = System::Word(0x4fc);
-static _DELPHI_CONST System::Word MCIWNDM_SENDSTRING = System::Word(0x465);
-static _DELPHI_CONST System::Word MCIWNDM_GETPOSITION = System::Word(0x466);
-static _DELPHI_CONST System::Word MCIWNDM_GETMODE = System::Word(0x46a);
-static _DELPHI_CONST System::Word MCIWNDM_SETTIMEFORMAT = System::Word(0x477);
-static _DELPHI_CONST System::Word MCIWNDM_GETTIMEFORMAT = System::Word(0x478);
-static _DELPHI_CONST System::Word MCIWNDM_GETFILENAME = System::Word(0x47c);
-static _DELPHI_CONST System::Word MCIWNDM_GETDEVICE = System::Word(0x47d);
-static _DELPHI_CONST System::Word MCIWNDM_GETERROR = System::Word(0x480);
-static _DELPHI_CONST System::Word MCIWNDM_NEW = System::Word(0x486);
-static _DELPHI_CONST System::Word MCIWNDM_RETURNSTRING = System::Word(0x48a);
-static _DELPHI_CONST System::Word MCIWNDM_OPEN = System::Word(0x499);
-static _DELPHI_CONST System::Word MCIWNDM_NOTIFYMODE = System::Word(0x4c8);
-static _DELPHI_CONST System::Word MCIWNDM_NOTIFYPOS = System::Word(0x4c9);
-static _DELPHI_CONST System::Word MCIWNDM_NOTIFYSIZE = System::Word(0x4ca);
-static _DELPHI_CONST System::Word MCIWNDM_NOTIFYMEDIA = System::Word(0x4cb);
-static _DELPHI_CONST System::Word MCIWNDM_NOTIFYERROR = System::Word(0x4cd);
-static _DELPHI_CONST unsigned MCIWND_START = unsigned(0xffffffff);
-static _DELPHI_CONST unsigned MCIWND_END = unsigned(0xfffffffe);
-static _DELPHI_CONST System::Int8 DV_ERR_OK = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 DV_ERR_BASE = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 DV_ERR_NONSPECIFIC = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 DV_ERR_BADFORMAT = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 DV_ERR_STILLPLAYING = System::Int8(0x3);
-static _DELPHI_CONST System::Int8 DV_ERR_UNPREPARED = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 DV_ERR_SYNC = System::Int8(0x5);
-static _DELPHI_CONST System::Int8 DV_ERR_TOOMANYCHANNELS = System::Int8(0x6);
-static _DELPHI_CONST System::Int8 DV_ERR_NOTDETECTED = System::Int8(0x7);
-static _DELPHI_CONST System::Int8 DV_ERR_BADINSTALL = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 DV_ERR_CREATEPALETTE = System::Int8(0x9);
-static _DELPHI_CONST System::Int8 DV_ERR_SIZEFIELD = System::Int8(0xa);
-static _DELPHI_CONST System::Int8 DV_ERR_PARAM1 = System::Int8(0xb);
-static _DELPHI_CONST System::Int8 DV_ERR_PARAM2 = System::Int8(0xc);
-static _DELPHI_CONST System::Int8 DV_ERR_CONFIG1 = System::Int8(0xd);
-static _DELPHI_CONST System::Int8 DV_ERR_CONFIG2 = System::Int8(0xe);
-static _DELPHI_CONST System::Int8 DV_ERR_FLAGS = System::Int8(0xf);
-static _DELPHI_CONST System::Int8 DV_ERR_13 = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 DV_ERR_NOTSUPPORTED = System::Int8(0x11);
-static _DELPHI_CONST System::Int8 DV_ERR_NOMEM = System::Int8(0x12);
-static _DELPHI_CONST System::Int8 DV_ERR_ALLOCATED = System::Int8(0x13);
-static _DELPHI_CONST System::Int8 DV_ERR_BADDEVICEID = System::Int8(0x14);
-static _DELPHI_CONST System::Int8 DV_ERR_INVALHANDLE = System::Int8(0x15);
-static _DELPHI_CONST System::Int8 DV_ERR_BADERRNUM = System::Int8(0x16);
-static _DELPHI_CONST System::Int8 DV_ERR_NO_BUFFERS = System::Int8(0x17);
-static _DELPHI_CONST System::Int8 DV_ERR_MEM_CONFLICT = System::Int8(0x18);
-static _DELPHI_CONST System::Int8 DV_ERR_IO_CONFLICT = System::Int8(0x19);
-static _DELPHI_CONST System::Int8 DV_ERR_DMA_CONFLICT = System::Int8(0x1a);
-static _DELPHI_CONST System::Int8 DV_ERR_INT_CONFLICT = System::Int8(0x1b);
-static _DELPHI_CONST System::Int8 DV_ERR_PROTECT_ONLY = System::Int8(0x1c);
-static _DELPHI_CONST System::Int8 DV_ERR_LASTERROR = System::Int8(0x1c);
-static _DELPHI_CONST System::Word DV_ERR_USER_MSG = System::Word(0x3e9);
-static _DELPHI_CONST System::Word DV_VM_OPEN = System::Word(0x3d0);
-static _DELPHI_CONST System::Word DV_VM_CLOSE = System::Word(0x3d1);
-static _DELPHI_CONST System::Word DV_VM_DATA = System::Word(0x3d2);
-static _DELPHI_CONST System::Word DV_VM_ERROR = System::Word(0x3d3);
-static _DELPHI_CONST System::Int8 VHDR_DONE = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 VHDR_PREPARED = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 VHDR_INQUEUE = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 VHDR_KEYFRAME = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 VCAPS_OVERLAY = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 VCAPS_SRC_CAN_CLIP = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 VCAPS_DST_CAN_CLIP = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 VCAPS_CAN_SCALE = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 VIDEO_EXTERNALIN = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 VIDEO_EXTERNALOUT = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 VIDEO_IN = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 VIDEO_OUT = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 VIDEO_DLG_QUERY = System::Int8(0x10);
-static _DELPHI_CONST System::Word VIDEO_CONFIGURE_QUERY = System::Word(0x8000);
-static _DELPHI_CONST System::Word VIDEO_CONFIGURE_SET = System::Word(0x1000);
-static _DELPHI_CONST System::Word VIDEO_CONFIGURE_GET = System::Word(0x2000);
-static _DELPHI_CONST System::Int8 VIDEO_CONFIGURE_QUERYSIZE = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 VIDEO_CONFIGURE_CURRENT = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 VIDEO_CONFIGURE_NOMINAL = System::Int8(0x20);
-static _DELPHI_CONST System::Int8 VIDEO_CONFIGURE_MIN = System::Int8(0x40);
-static _DELPHI_CONST System::Byte VIDEO_CONFIGURE_MAX = System::Byte(0x80);
-static _DELPHI_CONST System::Word DVM_USER = System::Word(0x4000);
-static _DELPHI_CONST System::Word DVM_CONFIGURE_START = System::Word(0x1000);
-static _DELPHI_CONST System::Word DVM_CONFIGURE_END = System::Word(0x1fff);
-static _DELPHI_CONST System::Word DVM_PALETTE = System::Word(0x1001);
-static _DELPHI_CONST System::Word DVM_FORMAT = System::Word(0x1002);
-static _DELPHI_CONST System::Word DVM_PALETTERGB555 = System::Word(0x1003);
-static _DELPHI_CONST System::Word DVM_SRC_RECT = System::Word(0x1004);
-static _DELPHI_CONST System::Word DVM_DST_RECT = System::Word(0x1005);
-static _DELPHI_CONST System::Word WM_CAP_START = System::Word(0x400);
-static _DELPHI_CONST System::Word WM_CAP_UNICODE_START = System::Word(0x464);
-static _DELPHI_CONST System::Word WM_CAP_GET_CAPSTREAMPTR = System::Word(0x401);
-static _DELPHI_CONST System::Word WM_CAP_SET_CALLBACK_ERRORW = System::Word(0x466);
-static _DELPHI_CONST System::Word WM_CAP_SET_CALLBACK_STATUSW = System::Word(0x467);
-static _DELPHI_CONST System::Word WM_CAP_SET_CALLBACK_ERRORA = System::Word(0x402);
-static _DELPHI_CONST System::Word WM_CAP_SET_CALLBACK_STATUSA = System::Word(0x403);
-static _DELPHI_CONST System::Word WM_CAP_SET_CALLBACK_ERROR = System::Word(0x402);
-static _DELPHI_CONST System::Word WM_CAP_SET_CALLBACK_STATUS = System::Word(0x403);
-static _DELPHI_CONST System::Word WM_CAP_SET_CALLBACK_YIELD = System::Word(0x404);
-static _DELPHI_CONST System::Word WM_CAP_SET_CALLBACK_FRAME = System::Word(0x405);
-static _DELPHI_CONST System::Word WM_CAP_SET_CALLBACK_VIDEOSTREAM = System::Word(0x406);
-static _DELPHI_CONST System::Word WM_CAP_SET_CALLBACK_WAVESTREAM = System::Word(0x407);
-static _DELPHI_CONST System::Word WM_CAP_GET_USER_DATA = System::Word(0x408);
-static _DELPHI_CONST System::Word WM_CAP_SET_USER_DATA = System::Word(0x409);
-static _DELPHI_CONST System::Word WM_CAP_DRIVER_CONNECT = System::Word(0x40a);
-static _DELPHI_CONST System::Word WM_CAP_DRIVER_DISCONNECT = System::Word(0x40b);
-static _DELPHI_CONST System::Word WM_CAP_DRIVER_GET_NAMEA = System::Word(0x40c);
-static _DELPHI_CONST System::Word WM_CAP_DRIVER_GET_VERSIONA = System::Word(0x40d);
-static _DELPHI_CONST System::Word WM_CAP_DRIVER_GET_NAMEW = System::Word(0x470);
-static _DELPHI_CONST System::Word WM_CAP_DRIVER_GET_VERSIONW = System::Word(0x471);
-static _DELPHI_CONST System::Word WM_CAP_DRIVER_GET_NAME = System::Word(0x40c);
-static _DELPHI_CONST System::Word WM_CAP_DRIVER_GET_VERSION = System::Word(0x40d);
-static _DELPHI_CONST System::Word WM_CAP_DRIVER_GET_CAPS = System::Word(0x40e);
-static _DELPHI_CONST System::Word WM_CAP_FILE_SET_CAPTURE_FILEA = System::Word(0x414);
-static _DELPHI_CONST System::Word WM_CAP_FILE_GET_CAPTURE_FILEA = System::Word(0x415);
-static _DELPHI_CONST System::Word WM_CAP_FILE_SAVEASA = System::Word(0x417);
-static _DELPHI_CONST System::Word WM_CAP_FILE_SAVEDIBA = System::Word(0x419);
-static _DELPHI_CONST System::Word WM_CAP_FILE_SET_CAPTURE_FILEW = System::Word(0x478);
-static _DELPHI_CONST System::Word WM_CAP_FILE_GET_CAPTURE_FILEW = System::Word(0x479);
-static _DELPHI_CONST System::Word WM_CAP_FILE_SAVEASW = System::Word(0x47b);
-static _DELPHI_CONST System::Word WM_CAP_FILE_SAVEDIBW = System::Word(0x47d);
-static _DELPHI_CONST System::Word WM_CAP_FILE_SET_CAPTURE_FILE = System::Word(0x414);
-static _DELPHI_CONST System::Word WM_CAP_FILE_GET_CAPTURE_FILE = System::Word(0x415);
-static _DELPHI_CONST System::Word WM_CAP_FILE_SAVEAS = System::Word(0x417);
-static _DELPHI_CONST System::Word WM_CAP_FILE_SAVEDIB = System::Word(0x419);
-static _DELPHI_CONST System::Word WM_CAP_FILE_ALLOCATE = System::Word(0x416);
-static _DELPHI_CONST System::Word WM_CAP_FILE_SET_INFOCHUNK = System::Word(0x418);
-static _DELPHI_CONST System::Word WM_CAP_EDIT_COPY = System::Word(0x41e);
-static _DELPHI_CONST System::Word WM_CAP_SET_AUDIOFORMAT = System::Word(0x423);
-static _DELPHI_CONST System::Word WM_CAP_GET_AUDIOFORMAT = System::Word(0x424);
-static _DELPHI_CONST System::Word WM_CAP_DLG_VIDEOFORMAT = System::Word(0x429);
-static _DELPHI_CONST System::Word WM_CAP_DLG_VIDEOSOURCE = System::Word(0x42a);
-static _DELPHI_CONST System::Word WM_CAP_DLG_VIDEODISPLAY = System::Word(0x42b);
-static _DELPHI_CONST System::Word WM_CAP_GET_VIDEOFORMAT = System::Word(0x42c);
-static _DELPHI_CONST System::Word WM_CAP_SET_VIDEOFORMAT = System::Word(0x42d);
-static _DELPHI_CONST System::Word WM_CAP_DLG_VIDEOCOMPRESSION = System::Word(0x42e);
-static _DELPHI_CONST System::Word WM_CAP_SET_PREVIEW = System::Word(0x432);
-static _DELPHI_CONST System::Word WM_CAP_SET_OVERLAY = System::Word(0x433);
-static _DELPHI_CONST System::Word WM_CAP_SET_PREVIEWRATE = System::Word(0x434);
-static _DELPHI_CONST System::Word WM_CAP_SET_SCALE = System::Word(0x435);
-static _DELPHI_CONST System::Word WM_CAP_GET_STATUS = System::Word(0x436);
-static _DELPHI_CONST System::Word WM_CAP_SET_SCROLL = System::Word(0x437);
-static _DELPHI_CONST System::Word WM_CAP_GRAB_FRAME = System::Word(0x43c);
-static _DELPHI_CONST System::Word WM_CAP_GRAB_FRAME_NOSTOP = System::Word(0x43d);
-static _DELPHI_CONST System::Word WM_CAP_SEQUENCE = System::Word(0x43e);
-static _DELPHI_CONST System::Word WM_CAP_SEQUENCE_NOFILE = System::Word(0x43f);
-static _DELPHI_CONST System::Word WM_CAP_SET_SEQUENCE_SETUP = System::Word(0x440);
-static _DELPHI_CONST System::Word WM_CAP_GET_SEQUENCE_SETUP = System::Word(0x441);
-static _DELPHI_CONST System::Word WM_CAP_SET_MCI_DEVICEA = System::Word(0x442);
-static _DELPHI_CONST System::Word WM_CAP_GET_MCI_DEVICEA = System::Word(0x443);
-static _DELPHI_CONST System::Word WM_CAP_SET_MCI_DEVICEW = System::Word(0x4a6);
-static _DELPHI_CONST System::Word WM_CAP_GET_MCI_DEVICEW = System::Word(0x4a7);
-static _DELPHI_CONST System::Word WM_CAP_SET_MCI_DEVICE = System::Word(0x442);
-static _DELPHI_CONST System::Word WM_CAP_GET_MCI_DEVICE = System::Word(0x443);
-static _DELPHI_CONST System::Word WM_CAP_STOP = System::Word(0x444);
-static _DELPHI_CONST System::Word WM_CAP_ABORT = System::Word(0x445);
-static _DELPHI_CONST System::Word WM_CAP_SINGLE_FRAME_OPEN = System::Word(0x446);
-static _DELPHI_CONST System::Word WM_CAP_SINGLE_FRAME_CLOSE = System::Word(0x447);
-static _DELPHI_CONST System::Word WM_CAP_SINGLE_FRAME = System::Word(0x448);
-static _DELPHI_CONST System::Word WM_CAP_PAL_OPENA = System::Word(0x450);
-static _DELPHI_CONST System::Word WM_CAP_PAL_SAVEA = System::Word(0x451);
-static _DELPHI_CONST System::Word WM_CAP_PAL_OPENW = System::Word(0x4b4);
-static _DELPHI_CONST System::Word WM_CAP_PAL_SAVEW = System::Word(0x4b5);
-static _DELPHI_CONST System::Word WM_CAP_PAL_OPEN = System::Word(0x450);
-static _DELPHI_CONST System::Word WM_CAP_PAL_SAVE = System::Word(0x451);
-static _DELPHI_CONST System::Word WM_CAP_PAL_PASTE = System::Word(0x452);
-static _DELPHI_CONST System::Word WM_CAP_PAL_AUTOCREATE = System::Word(0x453);
-static _DELPHI_CONST System::Word WM_CAP_PAL_MANUALCREATE = System::Word(0x454);
-static _DELPHI_CONST System::Word WM_CAP_SET_CALLBACK_CAPCONTROL = System::Word(0x455);
-static _DELPHI_CONST System::Word WM_CAP_UNICODE_END = System::Word(0x4b5);
-static _DELPHI_CONST System::Word WM_CAP_END = System::Word(0x4b5);
-static _DELPHI_CONST System::Int8 AVSTREAMMASTER_AUDIO = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 AVSTREAMMASTER_NONE = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 CONTROLCALLBACK_PREROLL = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 CONTROLCALLBACK_CAPTURING = System::Int8(0x2);
-static _DELPHI_CONST int infotypeDIGITIZATION_TIME = int(0x54494449);
-static _DELPHI_CONST int infotypeSMPTE_TIME = int(0x504d5349);
-static _DELPHI_CONST System::Word IDS_CAP_BEGIN = System::Word(0x12c);
-static _DELPHI_CONST System::Word IDS_CAP_END = System::Word(0x12d);
-static _DELPHI_CONST System::Word IDS_CAP_INFO = System::Word(0x191);
-static _DELPHI_CONST System::Word IDS_CAP_OUTOFMEM = System::Word(0x192);
-static _DELPHI_CONST System::Word IDS_CAP_FILEEXISTS = System::Word(0x193);
-static _DELPHI_CONST System::Word IDS_CAP_ERRORPALOPEN = System::Word(0x194);
-static _DELPHI_CONST System::Word IDS_CAP_ERRORPALSAVE = System::Word(0x195);
-static _DELPHI_CONST System::Word IDS_CAP_ERRORDIBSAVE = System::Word(0x196);
-static _DELPHI_CONST System::Word IDS_CAP_DEFAVIEXT = System::Word(0x197);
-static _DELPHI_CONST System::Word IDS_CAP_DEFPALEXT = System::Word(0x198);
-static _DELPHI_CONST System::Word IDS_CAP_CANTOPEN = System::Word(0x199);
-static _DELPHI_CONST System::Word IDS_CAP_SEQ_MSGSTART = System::Word(0x19a);
-static _DELPHI_CONST System::Word IDS_CAP_SEQ_MSGSTOP = System::Word(0x19b);
-static _DELPHI_CONST System::Word IDS_CAP_VIDEDITERR = System::Word(0x19c);
-static _DELPHI_CONST System::Word IDS_CAP_READONLYFILE = System::Word(0x19d);
-static _DELPHI_CONST System::Word IDS_CAP_WRITEERROR = System::Word(0x19e);
-static _DELPHI_CONST System::Word IDS_CAP_NODISKSPACE = System::Word(0x19f);
-static _DELPHI_CONST System::Word IDS_CAP_SETFILESIZE = System::Word(0x1a0);
-static _DELPHI_CONST System::Word IDS_CAP_SAVEASPERCENT = System::Word(0x1a1);
-static _DELPHI_CONST System::Word IDS_CAP_DRIVER_ERROR = System::Word(0x1a2);
-static _DELPHI_CONST System::Word IDS_CAP_WAVE_OPEN_ERROR = System::Word(0x1a3);
-static _DELPHI_CONST System::Word IDS_CAP_WAVE_ALLOC_ERROR = System::Word(0x1a4);
-static _DELPHI_CONST System::Word IDS_CAP_WAVE_PREPARE_ERROR = System::Word(0x1a5);
-static _DELPHI_CONST System::Word IDS_CAP_WAVE_ADD_ERROR = System::Word(0x1a6);
-static _DELPHI_CONST System::Word IDS_CAP_WAVE_SIZE_ERROR = System::Word(0x1a7);
-static _DELPHI_CONST System::Word IDS_CAP_VIDEO_OPEN_ERROR = System::Word(0x1a8);
-static _DELPHI_CONST System::Word IDS_CAP_VIDEO_ALLOC_ERROR = System::Word(0x1a9);
-static _DELPHI_CONST System::Word IDS_CAP_VIDEO_PREPARE_ERROR = System::Word(0x1aa);
-static _DELPHI_CONST System::Word IDS_CAP_VIDEO_ADD_ERROR = System::Word(0x1ab);
-static _DELPHI_CONST System::Word IDS_CAP_VIDEO_SIZE_ERROR = System::Word(0x1ac);
-static _DELPHI_CONST System::Word IDS_CAP_FILE_OPEN_ERROR = System::Word(0x1ad);
-static _DELPHI_CONST System::Word IDS_CAP_FILE_WRITE_ERROR = System::Word(0x1ae);
-static _DELPHI_CONST System::Word IDS_CAP_RECORDING_ERROR = System::Word(0x1af);
-static _DELPHI_CONST System::Word IDS_CAP_RECORDING_ERROR2 = System::Word(0x1b0);
-static _DELPHI_CONST System::Word IDS_CAP_AVI_INIT_ERROR = System::Word(0x1b1);
-static _DELPHI_CONST System::Word IDS_CAP_NO_FRAME_CAP_ERROR = System::Word(0x1b2);
-static _DELPHI_CONST System::Word IDS_CAP_NO_PALETTE_WARN = System::Word(0x1b3);
-static _DELPHI_CONST System::Word IDS_CAP_MCI_CONTROL_ERROR = System::Word(0x1b4);
-static _DELPHI_CONST System::Word IDS_CAP_MCI_CANT_STEP_ERROR = System::Word(0x1b5);
-static _DELPHI_CONST System::Word IDS_CAP_NO_AUDIO_CAP_ERROR = System::Word(0x1b6);
-static _DELPHI_CONST System::Word IDS_CAP_AVI_DRAWDIB_ERROR = System::Word(0x1b7);
-static _DELPHI_CONST System::Word IDS_CAP_COMPRESSOR_ERROR = System::Word(0x1b8);
-static _DELPHI_CONST System::Word IDS_CAP_AUDIO_DROP_ERROR = System::Word(0x1b9);
-static _DELPHI_CONST System::Word IDS_CAP_STAT_LIVE_MODE = System::Word(0x1f4);
-static _DELPHI_CONST System::Word IDS_CAP_STAT_OVERLAY_MODE = System::Word(0x1f5);
-static _DELPHI_CONST System::Word IDS_CAP_STAT_CAP_INIT = System::Word(0x1f6);
-static _DELPHI_CONST System::Word IDS_CAP_STAT_CAP_FINI = System::Word(0x1f7);
-static _DELPHI_CONST System::Word IDS_CAP_STAT_PALETTE_BUILD = System::Word(0x1f8);
-static _DELPHI_CONST System::Word IDS_CAP_STAT_OPTPAL_BUILD = System::Word(0x1f9);
-static _DELPHI_CONST System::Word IDS_CAP_STAT_I_FRAMES = System::Word(0x1fa);
-static _DELPHI_CONST System::Word IDS_CAP_STAT_L_FRAMES = System::Word(0x1fb);
-static _DELPHI_CONST System::Word IDS_CAP_STAT_CAP_L_FRAMES = System::Word(0x1fc);
-static _DELPHI_CONST System::Word IDS_CAP_STAT_CAP_AUDIO = System::Word(0x1fd);
-static _DELPHI_CONST System::Word IDS_CAP_STAT_VIDEOCURRENT = System::Word(0x1fe);
-static _DELPHI_CONST System::Word IDS_CAP_STAT_VIDEOAUDIO = System::Word(0x1ff);
-static _DELPHI_CONST System::Word IDS_CAP_STAT_VIDEOONLY = System::Word(0x200);
-static _DELPHI_CONST System::Word IDS_CAP_STAT_FRAMESDROPPED = System::Word(0x201);
-extern DELPHI_PACKAGE unsigned __fastcall MKFOURCC(char ch0, char ch1, char ch2, char ch3);
-extern DELPHI_PACKAGE unsigned __fastcall mmioFOURCC(char ch0, char ch1, char ch2, char ch3);
-extern DELPHI_PACKAGE TWOCC __fastcall aviTWOCC(char ch0, char ch1);
-extern DELPHI_PACKAGE System::LongBool __fastcall ICQueryAbout(HIC hic);
-extern DELPHI_PACKAGE unsigned __fastcall ICAbout(HIC hic, HWND hwnd);
-extern DELPHI_PACKAGE System::LongBool __fastcall ICQueryConfigure(HIC hic);
-extern DELPHI_PACKAGE unsigned __fastcall ICConfigure(HIC hic, HWND hwnd);
-extern DELPHI_PACKAGE unsigned __fastcall ICGetState(HIC hic, PVOID pv, unsigned cb);
-extern DELPHI_PACKAGE unsigned __fastcall ICSetState(HIC hic, PVOID pv, unsigned cb);
-extern DELPHI_PACKAGE unsigned __fastcall ICGetStateSize(HIC hic);
-extern DELPHI_PACKAGE unsigned __fastcall ICGetDefaultQuality(HIC hic);
-extern DELPHI_PACKAGE unsigned __fastcall ICGetDefaultKeyFrameRate(HIC hic);
-extern DELPHI_PACKAGE unsigned __fastcall ICDrawWindow(HIC hic, Winapi::Windows::PRect prc);
-extern DELPHI_PACKAGE unsigned __fastcall ICCompressBegin(HIC hic, Winapi::Windows::PBitmapInfoHeader lpbiInput, Winapi::Windows::PBitmapInfoHeader lpbiOutput);
-extern DELPHI_PACKAGE unsigned __fastcall ICCompressQuery(HIC hic, Winapi::Windows::PBitmapInfoHeader lpbiInput, Winapi::Windows::PBitmapInfoHeader lpbiOutput);
-extern DELPHI_PACKAGE unsigned __fastcall ICCompressGetFormat(HIC hic, Winapi::Windows::PBitmapInfoHeader lpbiInput, Winapi::Windows::PBitmapInfoHeader lpbiOutput);
-extern DELPHI_PACKAGE unsigned __fastcall ICCompressGetFormatSize(HIC hic, Winapi::Windows::PBitmapInfoHeader lpbi);
-extern DELPHI_PACKAGE unsigned __fastcall ICCompressGetSize(HIC hic, Winapi::Windows::PBitmapInfoHeader lpbiInput, Winapi::Windows::PBitmapInfoHeader lpbiOutput);
-extern DELPHI_PACKAGE unsigned __fastcall ICCompressEnd(HIC hic);
-extern DELPHI_PACKAGE unsigned __fastcall ICDecompressBegin(HIC hic, Winapi::Windows::PBitmapInfoHeader lpbiInput, Winapi::Windows::PBitmapInfoHeader lpbiOutput);
-extern DELPHI_PACKAGE unsigned __fastcall ICDecompressQuery(HIC hic, Winapi::Windows::PBitmapInfoHeader lpbiInput, Winapi::Windows::PBitmapInfoHeader lpbiOutput);
-extern DELPHI_PACKAGE unsigned __fastcall ICDecompressGetFormat(HIC hic, Winapi::Windows::PBitmapInfoHeader lpbiInput, Winapi::Windows::PBitmapInfoHeader lpbiOutput);
-extern DELPHI_PACKAGE unsigned __fastcall ICDecompressGetFormatSize(HIC hic, Winapi::Windows::PBitmapInfoHeader lpbi);
-extern DELPHI_PACKAGE unsigned __fastcall ICDecompressGetPalette(HIC hic, Winapi::Windows::PBitmapInfoHeader lpbiInput, Winapi::Windows::PBitmapInfoHeader lpbiOutput);
-extern DELPHI_PACKAGE unsigned __fastcall ICDecompressSetPalette(HIC hic, Winapi::Windows::PBitmapInfoHeader lpbiPalette);
-extern DELPHI_PACKAGE unsigned __fastcall ICDecompressEnd(HIC hic);
-extern DELPHI_PACKAGE unsigned __stdcall ICDecompressEx(HIC hic, unsigned dwFlags, Winapi::Windows::PBitmapInfoHeader lpbiSrc, PVOID lpSrc, Int xSrc, Int ySrc, Int dxSrc, Int dySrc, Winapi::Windows::PBitmapInfoHeader lpbiDst, PVOID lpDst, Int xDst, Int yDst, Int dxDst, Int dyDst);
-extern DELPHI_PACKAGE unsigned __stdcall ICDecompressExBegin(HIC hic, unsigned dwFlags, Winapi::Windows::PBitmapInfoHeader lpbiSrc, PVOID lpSrc, Int xSrc, Int ySrc, Int dxSrc, Int dySrc, Winapi::Windows::PBitmapInfoHeader lpbiDst, PVOID lpDst, Int xDst, Int yDst, Int dxDst, Int dyDst);
-extern DELPHI_PACKAGE unsigned __stdcall ICDecompressExQuery(HIC hic, unsigned dwFlags, Winapi::Windows::PBitmapInfoHeader lpbiSrc, PVOID lpSrc, Int xSrc, Int ySrc, Int dxSrc, Int dySrc, Winapi::Windows::PBitmapInfoHeader lpbiDst, PVOID lpDst, Int xDst, Int yDst, Int dxDst, Int dyDst);
-extern DELPHI_PACKAGE unsigned __fastcall ICDecompressExEnd(HIC hic);
-extern DELPHI_PACKAGE unsigned __stdcall ICDrawSuggestFormat(HIC hic, Winapi::Windows::PBitmapInfoHeader lpbiIn, Winapi::Windows::PBitmapInfoHeader lpbiOut, Int dxSrc, Int dySrc, Int dxDst, Int dyDst, HIC hicDecomp);
-extern DELPHI_PACKAGE unsigned __fastcall ICDrawQuery(HIC hic, Winapi::Windows::PBitmapInfoHeader lpbiInput);
-extern DELPHI_PACKAGE unsigned __fastcall ICDrawChangePalette(HIC hic, Winapi::Windows::PBitmapInfoHeader lpbiInput);
-extern DELPHI_PACKAGE unsigned __fastcall ICGetBuffersWanted(HIC hic, unsigned* lpdwBuffers);
-extern DELPHI_PACKAGE unsigned __fastcall ICDrawEnd(HIC hic);
-extern DELPHI_PACKAGE unsigned __fastcall ICDrawStart(HIC hic);
-extern DELPHI_PACKAGE unsigned __fastcall ICDrawStartPlay(HIC hic, unsigned lFrom, unsigned lTo);
-extern DELPHI_PACKAGE unsigned __fastcall ICDrawStop(HIC hic);
-extern DELPHI_PACKAGE unsigned __fastcall ICDrawStopPlay(HIC hic);
-extern DELPHI_PACKAGE unsigned __fastcall ICDrawGetTime(HIC hic, unsigned* lplTime);
-extern DELPHI_PACKAGE unsigned __fastcall ICDrawSetTime(HIC hic, unsigned lTime);
-extern DELPHI_PACKAGE unsigned __fastcall ICDrawRealize(HIC hic, HDC hdc, System::LongBool fBackground);
-extern DELPHI_PACKAGE unsigned __fastcall ICDrawFlush(HIC hic);
-extern DELPHI_PACKAGE unsigned __fastcall ICDrawRenderBuffer(HIC hic);
-extern DELPHI_PACKAGE unsigned __stdcall ICSetStatusProc(HIC hic, unsigned dwFlags, unsigned lParam, TICStatusProc fpfnStatus);
-extern DELPHI_PACKAGE HIC __fastcall ICDecompressOpen(unsigned fccType, unsigned fccHandler, Winapi::Windows::PBitmapInfoHeader lpbiIn, Winapi::Windows::PBitmapInfoHeader lpbiOut);
-extern DELPHI_PACKAGE HIC __fastcall ICDrawOpen(unsigned fccType, unsigned fccHandler, Winapi::Windows::PBitmapInfoHeader lpbiIn);
-extern DELPHI_PACKAGE System::LongBool __fastcall DrawDibUpdate(HDRAWDIB hdd, HDC hdc, Int x, Int y);
-extern DELPHI_PACKAGE System::Byte __fastcall FromHex(System::Byte n);
-extern DELPHI_PACKAGE System::Byte __fastcall StreamFromFOURCC(unsigned fcc);
-extern DELPHI_PACKAGE System::Word __fastcall TWOCCFromFOURCC(unsigned fcc);
-extern DELPHI_PACKAGE System::Byte __fastcall ToHex(System::Byte n);
-extern DELPHI_PACKAGE unsigned __fastcall MAKEAVICKID(System::Word tcc, System::Byte stream);
-extern DELPHI_PACKAGE LONG __fastcall AVIStreamSampleToSample(_di_IAVIStream pavi1, _di_IAVIStream pavi2, LONG l);
-extern DELPHI_PACKAGE LONG __fastcall AVIStreamNextSample(_di_IAVIStream pavi, LONG l);
-extern DELPHI_PACKAGE LONG __fastcall AVIStreamPrevSample(_di_IAVIStream pavi, LONG l);
-extern DELPHI_PACKAGE LONG __fastcall AVIStreamNearestSample(_di_IAVIStream pavi, LONG l);
-extern DELPHI_PACKAGE LONG __fastcall AVIStreamNextKeyFrame(_di_IAVIStream pavi, LONG l);
-extern DELPHI_PACKAGE LONG __fastcall AVIStreamPrevKeyFrame(_di_IAVIStream pavi, LONG l);
-extern DELPHI_PACKAGE LONG __fastcall AVIStreamNearestKeyFrame(_di_IAVIStream pavi, LONG l);
-extern DELPHI_PACKAGE System::LongBool __fastcall AVIStreamIsKeyFrame(_di_IAVIStream pavi, LONG l);
-extern DELPHI_PACKAGE LONG __fastcall AVIStreamPrevSampleTime(_di_IAVIStream pavi, LONG t);
-extern DELPHI_PACKAGE LONG __fastcall AVIStreamNextSampleTime(_di_IAVIStream pavi, LONG t);
-extern DELPHI_PACKAGE LONG __fastcall AVIStreamNearestSampleTime(_di_IAVIStream pavi, LONG t);
-extern DELPHI_PACKAGE LONG __fastcall AVIStreamNextKeyFrameTime(_di_IAVIStream pavi, LONG t);
-extern DELPHI_PACKAGE LONG __fastcall AVIStreamPrevKeyFrameTime(_di_IAVIStream pavi, LONG t);
-extern DELPHI_PACKAGE LONG __fastcall AVIStreamNearestKeyFrameTime(_di_IAVIStream pavi, LONG t);
-extern DELPHI_PACKAGE LONG __fastcall AVIStreamStartTime(_di_IAVIStream pavi);
-extern DELPHI_PACKAGE LONG __fastcall AVIStreamLengthTime(_di_IAVIStream pavi);
-extern DELPHI_PACKAGE LONG __fastcall AVIStreamEnd(_di_IAVIStream pavi);
-extern DELPHI_PACKAGE LONG __fastcall AVIStreamEndTime(_di_IAVIStream pavi);
-extern DELPHI_PACKAGE LONG __fastcall AVIStreamSampleSize(_di_IAVIStream pavi, LONG lPos, PLONG plSize);
-extern DELPHI_PACKAGE HRESULT __fastcall AVIStreamFormatSize(_di_IAVIStream pavi, LONG lPos, PLONG plSize);
-extern DELPHI_PACKAGE HRESULT __fastcall AVIStreamDataSize(_di_IAVIStream pavi, unsigned fcc, PLONG plSize);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndSM(HWND hWnd, unsigned Msg, unsigned wParam, int lParam);
-extern DELPHI_PACKAGE System::LongBool __fastcall MCIWndCanPlay(HWND hwnd);
-extern DELPHI_PACKAGE System::LongBool __fastcall MCIWndCanRecord(HWND hwnd);
-extern DELPHI_PACKAGE System::LongBool __fastcall MCIWndCanSave(HWND hwnd);
-extern DELPHI_PACKAGE System::LongBool __fastcall MCIWndCanWindow(HWND hwnd);
-extern DELPHI_PACKAGE System::LongBool __fastcall MCIWndCanEject(HWND hwnd);
-extern DELPHI_PACKAGE System::LongBool __fastcall MCIWndCanConfig(HWND hwnd);
-extern DELPHI_PACKAGE System::LongBool __fastcall MCIWndPaletteKick(HWND hwnd);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndSave(HWND hwnd, char * szFile);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndSaveDialog(HWND hwnd);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndNew(HWND hwnd, PVOID lp);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndRecord(HWND hwnd);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndOpen(HWND hwnd, char * sz, System::LongBool f);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndOpenDialog(HWND hwnd);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndClose(HWND hwnd);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndPlay(HWND hwnd);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndStop(HWND hwnd);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndPause(HWND hwnd);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndResume(HWND hwnd);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndSeek(HWND hwnd, unsigned lPos);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndEject(HWND hwnd);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndHome(HWND hwnd);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndEnd(HWND hwnd);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndGetSource(HWND hwnd, Winapi::Windows::PRect prc);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndPutSource(HWND hwnd, Winapi::Windows::PRect prc);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndGetDest(HWND hwnd, Winapi::Windows::PRect prc);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndPutDest(HWND hwnd, Winapi::Windows::PRect prc);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndPlayReverse(HWND hwnd);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndPlayFrom(HWND hwnd, unsigned lPos);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndPlayTo(HWND hwnd, unsigned lPos);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndPlayFromTo(HWND hwnd, unsigned lStart, unsigned lEnd);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndGetDeviceID(HWND hwnd);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndGetAlias(HWND hwnd);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndGetMode(HWND hwnd, char * lp, unsigned len);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndGetPosition(HWND hwnd);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndGetPositionString(HWND hwnd, char * lp, unsigned len);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndGetStart(HWND hwnd);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndGetLength(HWND hwnd);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndGetEnd(HWND hwnd);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndStep(HWND hwnd, unsigned n);
-extern DELPHI_PACKAGE void __fastcall MCIWndDestroy(HWND hwnd);
-extern DELPHI_PACKAGE void __fastcall MCIWndSetZoom(HWND hwnd, unsigned iZoom);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndGetZoom(HWND hwnd);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndSetVolume(HWND hwnd, unsigned iVol);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndGetVolume(HWND hwnd);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndSetSpeed(HWND hwnd, unsigned iSpeed);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndGetSpeed(HWND hwnd);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndSetTimeFormat(HWND hwnd, char * lp);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndGetTimeFormat(HWND hwnd, char * lp, unsigned len);
-extern DELPHI_PACKAGE void __fastcall MCIWndValidateMedia(HWND hwnd);
-extern DELPHI_PACKAGE void __fastcall MCIWndSetRepeat(HWND hwnd, System::LongBool f);
-extern DELPHI_PACKAGE System::LongBool __fastcall MCIWndGetRepeat(HWND hwnd);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndUseFrames(HWND hwnd);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndUseTime(HWND hwnd);
-extern DELPHI_PACKAGE void __fastcall MCIWndSetActiveTimer(HWND hwnd, unsigned active);
-extern DELPHI_PACKAGE void __fastcall MCIWndSetInactiveTimer(HWND hwnd, unsigned inactive);
-extern DELPHI_PACKAGE void __fastcall MCIWndSetTimers(HWND hwnd, unsigned active, unsigned inactive);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndGetActiveTimer(HWND hwnd);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndGetInactiveTimer(HWND hwnd);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndRealize(HWND hwnd, System::LongBool fBkgnd);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndSendString(HWND hwnd, char * sz);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndReturnString(HWND hwnd, char * lp, unsigned len);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndGetError(HWND hwnd, char * lp, unsigned len);
-extern DELPHI_PACKAGE HPALETTE __fastcall MCIWndGetPalette(HWND hwnd);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndSetPalette(HWND hwnd, HPALETTE hpal);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndGetFileName(HWND hwnd, char * lp, unsigned len);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndGetDevice(HWND hwnd, char * lp, unsigned len);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndGetStyles(HWND hwnd);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndChangeStyles(HWND hwnd, unsigned mask, unsigned value);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndOpenInterface(HWND hwnd, PUnknown pUnk);
-extern DELPHI_PACKAGE unsigned __fastcall MCIWndSetOwner(HWND hwnd, HWND hwndP);
-extern DELPHI_PACKAGE unsigned __fastcall AVICapSM(HWND hwnd, unsigned m, unsigned w, int l);
-extern DELPHI_PACKAGE System::LongBool __fastcall capSetCallbackOnError(HWND hwnd, TCAPERRORCALLBACK fpProc);
-extern DELPHI_PACKAGE System::LongBool __fastcall capSetCallbackOnStatus(HWND hwnd, TCAPSTATUSCALLBACK fpProc);
-extern DELPHI_PACKAGE System::LongBool __fastcall capSetCallbackOnYield(HWND hwnd, TCAPYIELDCALLBACK fpProc);
-extern DELPHI_PACKAGE System::LongBool __fastcall capSetCallbackOnFrame(HWND hwnd, TCAPVIDEOCALLBACK fpProc);
-extern DELPHI_PACKAGE System::LongBool __fastcall capSetCallbackOnVideoStream(HWND hwnd, TCAPVIDEOCALLBACK fpProc);
-extern DELPHI_PACKAGE System::LongBool __fastcall capSetCallbackOnWaveStream(HWND hwnd, TCAPWAVECALLBACK fpProc);
-extern DELPHI_PACKAGE System::LongBool __fastcall capSetCallbackOnCapControl(HWND hwnd, TCAPCONTROLCALLBACK fpProc);
-extern DELPHI_PACKAGE System::LongBool __fastcall capSetUserData(HWND hwnd, unsigned lUser);
-extern DELPHI_PACKAGE unsigned __fastcall capGetUserData(HWND hwnd);
-extern DELPHI_PACKAGE System::LongBool __fastcall capDriverConnect(HWND hwnd, Int i);
-extern DELPHI_PACKAGE System::LongBool __fastcall capDriverDisconnect(HWND hwnd);
-extern DELPHI_PACKAGE System::LongBool __fastcall capDriverGetName(HWND hwnd, char * szName, System::Word wSize);
-extern DELPHI_PACKAGE System::LongBool __fastcall capDriverGetVersion(HWND hwnd, char * szVer, System::Word wSize);
-extern DELPHI_PACKAGE System::LongBool __fastcall capDriverGetCaps(HWND hwnd, PCAPDRIVERCAPS s, System::Word wSize);
-extern DELPHI_PACKAGE System::LongBool __fastcall capFileSetCaptureFile(HWND hwnd, char * szName);
-extern DELPHI_PACKAGE System::LongBool __fastcall capFileGetCaptureFile(HWND hwnd, char * szName, System::Word wSize);
-extern DELPHI_PACKAGE System::LongBool __fastcall capFileAlloc(HWND hwnd, unsigned dwSize);
-extern DELPHI_PACKAGE System::LongBool __fastcall capFileSaveAs(HWND hwnd, char * szName);
-extern DELPHI_PACKAGE System::LongBool __fastcall capFileSetInfoChunk(HWND hwnd, PCAPINFOCHUNK lpInfoChunk);
-extern DELPHI_PACKAGE System::LongBool __fastcall capFileSaveDIB(HWND hwnd, char * szName);
-extern DELPHI_PACKAGE System::LongBool __fastcall capEditCopy(HWND hwnd);
-extern DELPHI_PACKAGE System::LongBool __fastcall capSetAudioFormat(HWND hwnd, Winapi::Mmsystem::PWaveFormatEx s, System::Word wSize);
-extern DELPHI_PACKAGE unsigned __fastcall capGetAudioFormat(HWND hwnd, Winapi::Mmsystem::PWaveFormatEx s, System::Word wSize);
-extern DELPHI_PACKAGE unsigned __fastcall capGetAudioFormatSize(HWND hwnd);
-extern DELPHI_PACKAGE System::LongBool __fastcall capDlgVideoFormat(HWND hwnd);
-extern DELPHI_PACKAGE System::LongBool __fastcall capDlgVideoSource(HWND hwnd);
-extern DELPHI_PACKAGE System::LongBool __fastcall capDlgVideoDisplay(HWND hwnd);
-extern DELPHI_PACKAGE System::LongBool __fastcall capDlgVideoCompression(HWND hwnd);
-extern DELPHI_PACKAGE unsigned __fastcall capGetVideoFormat(HWND hwnd, PVOID s, System::Word wSize);
-extern DELPHI_PACKAGE unsigned __fastcall capGetVideoFormatSize(HWND hwnd);
-extern DELPHI_PACKAGE System::LongBool __fastcall capSetVideoFormat(HWND hwnd, PVOID s, System::Word wSize);
-extern DELPHI_PACKAGE System::LongBool __fastcall capPreview(HWND hwnd, System::LongBool f);
-extern DELPHI_PACKAGE System::LongBool __fastcall capPreviewRate(HWND hwnd, System::Word wMS);
-extern DELPHI_PACKAGE System::LongBool __fastcall capOverlay(HWND hwnd, System::LongBool f);
-extern DELPHI_PACKAGE System::LongBool __fastcall capPreviewScale(HWND hwnd, System::LongBool f);
-extern DELPHI_PACKAGE System::LongBool __fastcall capGetStatus(HWND hwnd, PCAPSTATUS s, System::Word wSize);
-extern DELPHI_PACKAGE System::LongBool __fastcall capSetScrollPos(HWND hwnd, Winapi::Windows::PPoint lpP);
-extern DELPHI_PACKAGE System::LongBool __fastcall capGrabFrame(HWND hwnd);
-extern DELPHI_PACKAGE System::LongBool __fastcall capGrabFrameNoStop(HWND hwnd);
-extern DELPHI_PACKAGE System::LongBool __fastcall capCaptureSequence(HWND hwnd);
-extern DELPHI_PACKAGE System::LongBool __fastcall capCaptureSequenceNoFile(HWND hwnd);
-extern DELPHI_PACKAGE System::LongBool __fastcall capCaptureStop(HWND hwnd);
-extern DELPHI_PACKAGE System::LongBool __fastcall capCaptureAbort(HWND hwnd);
-extern DELPHI_PACKAGE System::LongBool __fastcall capCaptureSingleFrameOpen(HWND hwnd);
-extern DELPHI_PACKAGE System::LongBool __fastcall capCaptureSingleFrameClose(HWND hwnd);
-extern DELPHI_PACKAGE System::LongBool __fastcall capCaptureSingleFrame(HWND hwnd);
-extern DELPHI_PACKAGE System::LongBool __fastcall capCaptureGetSetup(HWND hwnd, PCAPTUREPARMS s, System::Word wSize);
-extern DELPHI_PACKAGE System::LongBool __fastcall capCaptureSetSetup(HWND hwnd, PCAPTUREPARMS s, System::Word wSize);
-extern DELPHI_PACKAGE System::LongBool __fastcall capSetMCIDeviceName(HWND hwnd, char * szName);
-extern DELPHI_PACKAGE System::LongBool __fastcall capGetMCIDeviceName(HWND hwnd, char * szName, System::Word wSize);
-extern DELPHI_PACKAGE System::LongBool __fastcall capPaletteOpen(HWND hwnd, char * szName);
-extern DELPHI_PACKAGE System::LongBool __fastcall capPaletteSave(HWND hwnd, char * szName);
-extern DELPHI_PACKAGE System::LongBool __fastcall capPalettePaste(HWND hwnd);
-extern DELPHI_PACKAGE System::LongBool __fastcall capPaletteAuto(HWND hwnd, Int iFrames, Int iColors);
-extern DELPHI_PACKAGE System::LongBool __fastcall capPaletteManual(HWND hwnd, System::LongBool fGrab, Int iColors);
-extern "C" unsigned __pascal VideoForWindowsVersion(void);
-extern "C" System::LongBool __stdcall ICInfo(unsigned fccType, unsigned fccHandler, PICINFO lpicinfo);
-extern "C" System::LongBool __stdcall ICInstall(unsigned fccType, unsigned fccHandler, int lParam, char * szDesc, unsigned wFlags);
-extern "C" System::LongBool __stdcall ICRemove(unsigned fccType, unsigned fccHandler, unsigned wFlags);
-extern "C" unsigned __stdcall ICGetInfo(HIC hic, PICINFO picinfo, unsigned cb);
-extern "C" HIC __stdcall ICOpen(unsigned fccType, unsigned fccHandler, unsigned wMode);
-extern "C" HIC __stdcall ICOpenFunction(unsigned fccType, unsigned fccHandler, unsigned wMode, Winapi::Windows::TFarProc lpfnHandler);
-extern "C" unsigned __stdcall ICClose(HIC hic);
-extern "C" unsigned __stdcall ICSendMessage(HIC hic, unsigned msg, unsigned dw1, unsigned dw2);
-extern "C" unsigned __cdecl ICCompress(HIC hic, unsigned dwFlags, Winapi::Windows::PBitmapInfoHeader lpbiOutput, PVOID lpData, Winapi::Windows::PBitmapInfoHeader lpbiInput, PVOID lpBits, unsigned* lpckid, unsigned* lpdwFlags, unsigned lFrameNum, unsigned dwFrameSize, unsigned dwQuality, Winapi::Windows::PBitmapInfoHeader lpbiPrev, PVOID lpPrev);
-extern "C" unsigned __cdecl ICDecompress(HIC hic, unsigned dwFlags, Winapi::Windows::PBitmapInfoHeader lpbiFormat, PVOID lpData, Winapi::Windows::PBitmapInfoHeader lpbi, PVOID lpBits);
-extern "C" unsigned __cdecl ICDrawBegin(HIC hic, unsigned dwFlags, HPALETTE hpal, HWND hwnd, HDC hdc, Int xDst, Int yDst, Int dxDst, Int dyDst, Winapi::Windows::PBitmapInfoHeader lpbi, Int xSrc, Int ySrc, Int dxSrc, Int dySrc, unsigned dwRate, unsigned dwScale);
-extern "C" unsigned __cdecl ICDraw(HIC hic, unsigned dwFlags, PVOID lpFormat, PVOID lpData, unsigned cbData, unsigned lTime);
-extern "C" HIC __stdcall ICLocate(unsigned fccType, unsigned fccHandler, Winapi::Windows::PBitmapInfoHeader lpbiIn, Winapi::Windows::PBitmapInfoHeader lpbiOut, System::Word wFlags);
-extern "C" HIC __stdcall ICGetDisplayFormat(HIC hic, Winapi::Windows::PBitmapInfoHeader lpbiIn, Winapi::Windows::PBitmapInfoHeader lpbiOut, Int BitDepth, Int dx, Int dy);
-extern "C" Winapi::Windows::THandle __stdcall ICImageCompress(HIC hic, unsigned uiFlags, Winapi::Windows::PBitmapInfo lpbiIn, PVOID lpBits, Winapi::Windows::PBitmapInfo lpbiOut, LONG lQuality, unsigned* plSize);
-extern "C" Winapi::Windows::THandle __stdcall ICImageDecompress(HIC hic, unsigned uiFlags, Winapi::Windows::PBitmapInfo lpbiIn, PVOID lpBits, Winapi::Windows::PBitmapInfo lpbiOut);
-extern "C" System::LongBool __stdcall ICCompressorChoose(HWND hwnd, unsigned uiFlags, PVOID pvIn, PVOID lpData, PCOMPVARS pc, char * lpszTitle);
-extern "C" System::LongBool __stdcall ICSeqCompressFrameStart(PCOMPVARS pc, Winapi::Windows::PBitmapInfo lpbiIn);
-extern "C" void __stdcall ICSeqCompressFrameEnd(PCOMPVARS pc);
-extern "C" PVOID __stdcall ICSeqCompressFrame(PCOMPVARS pc, unsigned uiFlags, PVOID lpBits, PBOOL pfKey, unsigned* plSize);
-extern "C" void __stdcall ICCompressorFree(PCOMPVARS pc);
-extern "C" HDRAWDIB __stdcall DrawDibOpen(void);
-extern "C" System::LongBool __stdcall DrawDibClose(HDRAWDIB hdd);
-extern "C" PVOID __stdcall DrawDibGetBuffer(HDRAWDIB hdd, Winapi::Windows::PBitmapInfoHeader lpbi, unsigned dwSize, unsigned dwFlags);
-extern "C" HPALETTE __stdcall DrawDibGetPalette(HDRAWDIB hdd);
-extern "C" System::LongBool __stdcall DrawDibSetPalette(HDRAWDIB hdd, HPALETTE hpal);
-extern "C" System::LongBool __stdcall DrawDibChangePalette(HDRAWDIB hdd, Int iStart, Int iLen, Winapi::Windows::PPaletteEntry lppe);
-extern "C" unsigned __stdcall DrawDibRealize(HDRAWDIB hdd, HDC hdc, System::LongBool fBackground);
-extern "C" System::LongBool __stdcall DrawDibStart(HDRAWDIB hdd, unsigned rate);
-extern "C" System::LongBool __stdcall DrawDibStop(HDRAWDIB hdd);
-extern "C" System::LongBool __stdcall DrawDibBegin(HDRAWDIB hdd, HDC hdc, Int dxDst, Int dyDst, Winapi::Windows::PBitmapInfoHeader lpbi, Int dxSrc, Int dySrc, unsigned wFlags);
-extern "C" System::LongBool __stdcall DrawDibDraw(HDRAWDIB hdd, HDC hdc, Int xDst, Int yDst, Int dxDst, Int dyDst, Winapi::Windows::PBitmapInfoHeader lpbi, PVOID lpBits, Int xSrc, Int ySrc, Int dxSrc, Int dySrc, unsigned wFlags);
-extern "C" System::LongBool __stdcall DrawDibEnd(HDRAWDIB hdd);
-extern "C" System::LongBool __stdcall DrawDibTime(HDRAWDIB hdd, PDRAWDIBTIME lpddtime);
-extern "C" unsigned __stdcall DrawDibProfileDisplay(Winapi::Windows::PBitmapInfoHeader lpbi);
-extern "C" void __stdcall AVIFileInit(void);
-extern "C" void __stdcall AVIFileExit(void);
-extern "C" unsigned __stdcall AVIFileAddRef(_di_IAVIFile pfile);
-extern "C" unsigned __stdcall AVIFileRelease(_di_IAVIFile pfile);
-extern "C" HRESULT __stdcall AVIFileOpenA(_di_IAVIFile &ppfile, char * szFile, unsigned uMode, Winapi::Activex::PCLSID lpHandler);
-extern "C" HRESULT __stdcall AVIFileOpenW(_di_IAVIFile &ppfile, System::WideChar * szFile, unsigned uMode, Winapi::Activex::PCLSID lpHandler);
-extern "C" HRESULT __stdcall AVIFileOpen(_di_IAVIFile &ppfile, System::WideChar * szFile, unsigned uMode, Winapi::Activex::PCLSID lpHandler);
-extern "C" HRESULT __stdcall AVIFileInfoW(_di_IAVIFile pfile, TAVIFileInfoW &pfi, LONG lSize);
-extern "C" HRESULT __stdcall AVIFileInfoA(_di_IAVIFile pfile, TAVIFileInfoA &pfi, LONG lSize);
-extern "C" HRESULT __stdcall AVIFileInfo(_di_IAVIFile pfile, TAVIFileInfo &pfi, LONG lSize);
-extern "C" HRESULT __stdcall AVIFileGetStream(_di_IAVIFile pfile, _di_IAVIStream &ppavi, unsigned fccType, LONG lParam);
-extern "C" HRESULT __stdcall AVIFileCreateStreamW(_di_IAVIFile pfile, _di_IAVIStream &ppavi, TAVIStreamInfoW &psi);
-extern "C" HRESULT __stdcall AVIFileCreateStreamA(_di_IAVIFile pfile, _di_IAVIStream &ppavi, TAVIStreamInfoA &psi);
-extern "C" HRESULT __stdcall AVIFileCreateStream(_di_IAVIFile pfile, _di_IAVIStream &ppavi, TAVIStreamInfo &psi);
-extern "C" HRESULT __stdcall AVIFileWriteData(_di_IAVIFile pfile, unsigned ckid, PVOID lpData, LONG cbData);
-extern "C" HRESULT __stdcall AVIFileReadData(_di_IAVIFile pfile, unsigned ckid, PVOID lpData, LONG &lpcbData);
-extern "C" HRESULT __stdcall AVIFileEndRecord(_di_IAVIFile pfile);
-extern "C" unsigned __stdcall AVIStreamAddRef(_di_IAVIStream pavi);
-extern "C" unsigned __stdcall AVIStreamRelease(_di_IAVIStream pavi);
-extern "C" HRESULT __stdcall AVIStreamInfoW(_di_IAVIStream pavi, TAVIStreamInfoW &psi, LONG lSize);
-extern "C" HRESULT __stdcall AVIStreamInfoA(_di_IAVIStream pavi, TAVIStreamInfoA &psi, LONG lSize);
-extern "C" HRESULT __stdcall AVIStreamInfo(_di_IAVIStream pavi, TAVIStreamInfo &psi, LONG lSize);
-extern "C" LONG __stdcall AVIStreamFindSample(_di_IAVIStream pavi, LONG lPos, LONG lFlags);
-extern "C" HRESULT __stdcall AVIStreamReadFormat(_di_IAVIStream pavi, LONG lPos, PVOID lpFormat, PLONG lpcbFormat);
-extern "C" HRESULT __stdcall AVIStreamSetFormat(_di_IAVIStream pavi, LONG lPos, PVOID lpFormat, LONG cbFormat);
-extern "C" HRESULT __stdcall AVIStreamReadData(_di_IAVIStream pavi, unsigned fcc, PVOID lp, PLONG lpcb);
-extern "C" HRESULT __stdcall AVIStreamWriteData(_di_IAVIStream pavi, unsigned fcc, PVOID lp, LONG cb);
-extern "C" HRESULT __stdcall AVIStreamRead(_di_IAVIStream pavi, LONG lStart, LONG lSamples, PVOID lpBuffer, LONG cbBuffer, PLONG plBytes, PLONG plSamples);
-extern "C" HRESULT __stdcall AVIStreamWrite(_di_IAVIStream pavi, LONG lStart, LONG lSamples, PVOID lpBuffer, LONG cbBuffer, unsigned dwFlags, PLONG plSampWritten, PLONG plBytesWritten);
-extern "C" LONG __stdcall AVIStreamStart(_di_IAVIStream pavi);
-extern "C" LONG __stdcall AVIStreamLength(_di_IAVIStream pavi);
-extern "C" LONG __stdcall AVIStreamTimeToSample(_di_IAVIStream pavi, LONG lTime);
-extern "C" LONG __stdcall AVIStreamSampleToTime(_di_IAVIStream pavi, LONG lSample);
-extern "C" HRESULT __stdcall AVIStreamBeginStreaming(_di_IAVIStream pavi, LONG lStart, LONG lEnd, LONG lRate);
-extern "C" HRESULT __stdcall AVIStreamEndStreaming(_di_IAVIStream pavi);
-extern "C" Winapi::Windows::PBitmapInfoHeader __stdcall AVIStreamGetFrame(_di_IGetFrame pg, LONG lPos);
-extern "C" HRESULT __stdcall AVIStreamGetFrameClose(_di_IGetFrame pg);
-extern DELPHI_PACKAGE _di_IGetFrame __stdcall AVIStreamGetFrameOpen(_di_IAVIStream pavi, Winapi::Windows::PBitmapInfoHeader lpbiWanted);
-extern "C" HRESULT __stdcall AVIStreamOpenFromFileA(_di_IAVIStream &ppavi, char * szFile, unsigned fccType, LONG lParam, unsigned mode, Winapi::Activex::PCLSID pclsidHandler);
-extern "C" HRESULT __stdcall AVIStreamOpenFromFileW(_di_IAVIStream &ppavi, System::WideChar * szFile, unsigned fccType, LONG lParam, unsigned mode, Winapi::Activex::PCLSID pclsidHandler);
-extern "C" HRESULT __stdcall AVIStreamOpenFromFile(_di_IAVIStream &ppavi, System::WideChar * szFile, unsigned fccType, LONG lParam, unsigned mode, Winapi::Activex::PCLSID pclsidHandler);
-extern "C" HRESULT __stdcall AVIStreamCreate(_di_IAVIStream &ppavi, LONG lParam1, LONG lParam2, Winapi::Activex::PCLSID pclsidHandler);
-extern "C" unsigned __stdcall AVIStreamFindKeyFrame(_di_IAVIStream &pavi, LONG lPos, LONG lFlags);
-extern "C" unsigned __stdcall AVIStreamClose(_di_IAVIStream pavi);
-extern "C" unsigned __stdcall AVIFileClose(_di_IAVIFile pfile);
-extern "C" void __stdcall AVIStreamInit(void);
-extern "C" void __stdcall AVIStreamExit(void);
-extern "C" HRESULT __stdcall AVIMakeCompressedStream(_di_IAVIStream &ppsCompressed, _di_IAVIStream ppsSource, PAVICOMPRESSOPTIONS lpOptions, Winapi::Activex::PCLSID pclsidHandler);
-extern "C" HRESULT __stdcall AVISaveVA(char * szFile, Winapi::Activex::PCLSID pclsidHandler, TAVISAVECALLBACK lpfnCallback, Int nStreams, _di_IAVIStream &ppavi, PAVICOMPRESSOPTIONS &plpOptions);
-extern "C" HRESULT __stdcall AVISaveVW(System::WideChar * szFile, Winapi::Activex::PCLSID pclsidHandler, TAVISAVECALLBACK lpfnCallback, Int nStreams, _di_IAVIStream &ppavi, PAVICOMPRESSOPTIONS &plpOptions);
-extern "C" HRESULT __stdcall AVISaveV(char * szFile, Winapi::Activex::PCLSID pclsidHandler, TAVISAVECALLBACK lpfnCallback, Int nStreams, _di_IAVIStream &ppavi, PAVICOMPRESSOPTIONS &plpOptions);
-extern "C" System::LongBool __stdcall AVISaveOptions(HWND hwnd, unsigned uiFlags, Int nStreams, _di_IAVIStream &ppavi, PAVICOMPRESSOPTIONS &plpOptions);
-extern "C" HRESULT __stdcall AVISaveOptionsFree(Int nStreams, PAVICOMPRESSOPTIONS &plpOptions);
-extern "C" HRESULT __stdcall AVIBuildFilterW(System::WideChar * lpszFilter, LONG cbFilter, System::LongBool fSaving);
-extern "C" HRESULT __stdcall AVIBuildFilterA(char * lpszFilter, LONG cbFilter, System::LongBool fSaving);
-extern "C" HRESULT __stdcall AVIBuildFilter(char * lpszFilter, LONG cbFilter, System::LongBool fSaving);
-extern "C" HRESULT __stdcall AVIMakeFileFromStreams(_di_IAVIFile &ppfile, Int nStreams, _di_IAVIStream &papStreams);
-extern "C" HRESULT __stdcall AVIMakeStreamFromClipboard(unsigned cfFormat, Winapi::Windows::THandle hGlobal, _di_IAVIStream &ppstream);
-extern "C" HRESULT __stdcall AVIPutFileOnClipboard(_di_IAVIFile pf);
-extern "C" HRESULT __stdcall AVIGetFromClipboard(_di_IAVIFile &lppf);
-extern "C" HRESULT __stdcall AVIClearClipboard(void);
-extern "C" HRESULT __stdcall CreateEditableStream(_di_IAVIStream &ppsEditable, _di_IAVIStream psSource);
-extern "C" HRESULT __stdcall EditStreamCut(_di_IAVIStream pavi, LONG &plStart, LONG &plLength, _di_IAVIStream &ppResult);
-extern "C" HRESULT __stdcall EditStreamCopy(_di_IAVIStream pavi, LONG &plStart, LONG &plLength, _di_IAVIStream &ppResult);
-extern "C" HRESULT __stdcall EditStreamPaste(_di_IAVIStream pavi, LONG &plPos, LONG &plLength, _di_IAVIStream pstream, LONG lStart, LONG lEnd);
-extern "C" HRESULT __stdcall EditStreamClone(_di_IAVIStream pavi, _di_IAVIStream &ppResult);
-extern "C" HRESULT __stdcall EditStreamSetNameA(_di_IAVIStream pavi, char * lpszName);
-extern "C" HRESULT __stdcall EditStreamSetNameW(_di_IAVIStream pavi, System::WideChar * lpszName);
-extern "C" HRESULT __stdcall EditStreamSetInfoW(_di_IAVIStream pavi, PAVIStreamInfoW lpInfo, LONG cbInfo);
-extern "C" HRESULT __stdcall EditStreamSetInfoA(_di_IAVIStream pavi, PAVIStreamInfoA lpInfo, LONG cbInfo);
-extern "C" HRESULT __stdcall EditStreamSetInfo(_di_IAVIStream pavi, PAVIStreamInfoA lpInfo, LONG cbInfo);
-extern "C" HRESULT __stdcall EditStreamSetName(_di_IAVIStream pavi, char * lpszName);
-extern "C" HWND __cdecl MCIWndCreateA(HWND hwndParent, Winapi::Windows::HINST hInstance, unsigned dwStyle, char * szFile);
-extern "C" HWND __cdecl MCIWndCreateW(HWND hwndParent, Winapi::Windows::HINST hInstance, unsigned dwStyle, System::WideChar * szFile);
-extern "C" HWND __cdecl MCIWndCreate(HWND hwndParent, Winapi::Windows::HINST hInstance, unsigned dwStyle, char * szFile);
-extern "C" System::LongBool __cdecl MCIWndRegisterClass(void);
-extern "C" HWND __stdcall capCreateCaptureWindowA(char * lpszWindowName, unsigned dwStyle, Int x, Int y, Int nWidth, Int nHeight, HWND hwndParent, Int nID);
-extern "C" System::LongBool __stdcall capGetDriverDescriptionA(unsigned wDriverIndex, char * lpszName, Int cbName, char * lpszVer, Int cbVer);
-extern "C" HWND __stdcall capCreateCaptureWindowW(System::WideChar * lpszWindowName, unsigned dwStyle, Int x, Int y, Int nWidth, Int nHeight, HWND hwndParent, Int nID);
-extern "C" System::LongBool __stdcall capGetDriverDescriptionW(unsigned wDriverIndex, System::WideChar * lpszName, Int cbName, System::WideChar * lpszVer, Int cbVer);
-extern "C" HWND __stdcall capCreateCaptureWindow(char * lpszWindowName, unsigned dwStyle, Int x, Int y, Int nWidth, Int nHeight, HWND hwndParent, Int nID);
-extern "C" System::LongBool __stdcall capGetDriverDescription(unsigned wDriverIndex, char * lpszName, Int cbName, char * lpszVer, Int cbVer);
-extern "C" System::LongBool __stdcall GetOpenFileNamePreviewA(Winapi::Commdlg::POpenFilenameA lpofn);
-extern "C" System::LongBool __stdcall GetSaveFileNamePreviewA(Winapi::Commdlg::POpenFilenameA lpofn);
-extern "C" System::LongBool __stdcall GetOpenFileNamePreviewW(Winapi::Commdlg::POpenFilenameW lpofn);
-extern "C" System::LongBool __stdcall GetSaveFileNamePreviewW(Winapi::Commdlg::POpenFilenameW lpofn);
-extern "C" System::LongBool __stdcall GetOpenFileNamePreview(Winapi::Commdlg::POpenFilenameA lpofn);
-extern "C" System::LongBool __stdcall GetSaveFileNamePreview(Winapi::Commdlg::POpenFilenameA lpofn);
-
-#if defined(UNICODE)
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option push -w-inl
-#endif
-inline HRESULT __stdcall AVIFileOpen(_di_IAVIFile &ppfile, System::WideChar * szFile, unsigned uMode, Winapi::Activex::PCLSID lpHandler)
-{
-	return AVIFileOpenW(ppfile, szFile, uMode, lpHandler);
-}
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option pop
-#endif
-
-#else
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option push -w-inl
-#endif
-inline HRESULT __stdcall AVIFileOpen(_di_IAVIFile &ppfile, System::WideChar * szFile, unsigned uMode, Winapi::Activex::PCLSID lpHandler)
-{
-	return AVIFileOpenA(ppfile, szFile, uMode, lpHandler);
-}
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option pop
-#endif
-
-#endif
-
-
-#if defined(UNICODE)
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option push -w-inl
-#endif
-inline HRESULT __stdcall AVIFileInfo(_di_IAVIFile pfile, TAVIFileInfo &pfi, LONG lSize)
-{
-	return AVIFileInfoW(pfile, pfi, lSize);
-}
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option pop
-#endif
-
-#else
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option push -w-inl
-#endif
-inline HRESULT __stdcall AVIFileInfo(_di_IAVIFile pfile, TAVIFileInfo &pfi, LONG lSize)
-{
-	return AVIFileInfoA(pfile, pfi, lSize);
-}
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option pop
-#endif
-
-#endif
-
-
-#if defined(UNICODE)
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option push -w-inl
-#endif
-inline HRESULT __stdcall AVIFileCreateStream(_di_IAVIFile pfile, _di_IAVIStream &ppavi, TAVIStreamInfo &psi)
-{
-	return AVIFileCreateStreamW(pfile, ppavi, psi);
-}
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option pop
-#endif
-
-#else
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option push -w-inl
-#endif
-inline HRESULT __stdcall AVIFileCreateStream(_di_IAVIFile pfile, _di_IAVIStream &ppavi, TAVIStreamInfo &psi)
-{
-	return AVIFileCreateStreamA(pfile, ppavi, psi);
-}
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option pop
-#endif
-
-#endif
-
-
-#if defined(UNICODE)
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option push -w-inl
-#endif
-inline HRESULT __stdcall AVIStreamInfo(_di_IAVIStream pavi, TAVIStreamInfo &psi, LONG lSize)
-{
-	return AVIStreamInfoW(pavi, psi, lSize);
-}
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option pop
-#endif
-
-#else
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option push -w-inl
-#endif
-inline HRESULT __stdcall AVIStreamInfo(_di_IAVIStream pavi, TAVIStreamInfo &psi, LONG lSize)
-{
-	return AVIStreamInfoA(pavi, psi, lSize);
-}
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option pop
-#endif
-
-#endif
-
-
-#if defined(UNICODE)
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option push -w-inl
-#endif
-inline HRESULT __stdcall AVIStreamOpenFromFile(_di_IAVIStream &ppavi, System::WideChar * szFile, unsigned fccType, LONG lParam, unsigned mode, Winapi::Activex::PCLSID pclsidHandler)
-{
-	return AVIStreamOpenFromFileW(ppavi, szFile, fccType, lParam, mode, pclsidHandler);
-}
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option pop
-#endif
-
-#else
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option push -w-inl
-#endif
-inline HRESULT __stdcall AVIStreamOpenFromFile(_di_IAVIStream &ppavi, System::WideChar * szFile, unsigned fccType, LONG lParam, unsigned mode, Winapi::Activex::PCLSID pclsidHandler)
-{
-	return AVIStreamOpenFromFileA(ppavi, szFile, fccType, lParam, mode, pclsidHandler);
-}
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option pop
-#endif
-
-#endif
-
-
-#if defined(UNICODE)
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option push -w-inl
-#endif
-inline HRESULT __stdcall AVISaveV(char * szFile, Winapi::Activex::PCLSID pclsidHandler, TAVISAVECALLBACK lpfnCallback, Int nStreams, _di_IAVIStream &ppavi, PAVICOMPRESSOPTIONS &plpOptions)
-{
-	return AVISaveVW(szFile, pclsidHandler, lpfnCallback, nStreams, ppavi, plpOptions);
-}
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option pop
-#endif
-
-#else
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option push -w-inl
-#endif
-inline HRESULT __stdcall AVISaveV(char * szFile, Winapi::Activex::PCLSID pclsidHandler, TAVISAVECALLBACK lpfnCallback, Int nStreams, _di_IAVIStream &ppavi, PAVICOMPRESSOPTIONS &plpOptions)
-{
-	return AVISaveVA(szFile, pclsidHandler, lpfnCallback, nStreams, ppavi, plpOptions);
-}
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option pop
-#endif
-
-#endif
-
-
-#if defined(UNICODE)
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option push -w-inl
-#endif
-inline HRESULT __stdcall AVIBuildFilter(char * lpszFilter, LONG cbFilter, System::LongBool fSaving)
-{
-	return AVIBuildFilterW(lpszFilter, cbFilter, fSaving);
-}
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option pop
-#endif
-
-#else
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option push -w-inl
-#endif
-inline HRESULT __stdcall AVIBuildFilter(char * lpszFilter, LONG cbFilter, System::LongBool fSaving)
-{
-	return AVIBuildFilterA(lpszFilter, cbFilter, fSaving);
-}
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option pop
-#endif
-
-#endif
-
-
-#if defined(UNICODE)
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option push -w-inl
-#endif
-inline HRESULT __stdcall EditStreamSetInfo(_di_IAVIStream pavi, PAVIStreamInfoA lpInfo, LONG cbInfo)
-{
-	return EditStreamSetInfoW(pavi, lpInfo, cbInfo);
-}
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option pop
-#endif
-
-#else
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option push -w-inl
-#endif
-inline HRESULT __stdcall EditStreamSetInfo(_di_IAVIStream pavi, PAVIStreamInfoA lpInfo, LONG cbInfo)
-{
-	return EditStreamSetInfoA(pavi, lpInfo, cbInfo);
-}
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option pop
-#endif
-
-#endif
-
-
-#if defined(UNICODE)
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option push -w-inl
-#endif
-inline HRESULT __stdcall EditStreamSetName(_di_IAVIStream pavi, char * lpszName)
-{
-	return EditStreamSetNameW(pavi, lpszName);
-}
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option pop
-#endif
-
-#else
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option push -w-inl
-#endif
-inline HRESULT __stdcall EditStreamSetName(_di_IAVIStream pavi, char * lpszName)
-{
-	return EditStreamSetNameA(pavi, lpszName);
-}
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option pop
-#endif
-
-#endif
-
-
-#if defined(UNICODE)
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option push -w-inl
-#endif
-inline HWND __cdecl MCIWndCreate(HWND hwndParent, Winapi::Windows::HINST hInstance, unsigned dwStyle, char * szFile)
-{
-	return MCIWndCreateW(hwndParent, hInstance, dwStyle, szFile);
-}
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option pop
-#endif
-
-#else
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option push -w-inl
-#endif
-inline HWND __cdecl MCIWndCreate(HWND hwndParent, Winapi::Windows::HINST hInstance, unsigned dwStyle, char * szFile)
-{
-	return MCIWndCreateA(hwndParent, hInstance, dwStyle, szFile);
-}
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option pop
-#endif
-
-#endif
-
-
-#if defined(UNICODE)
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option push -w-inl
-#endif
-inline HWND __stdcall capCreateCaptureWindow(char * lpszWindowName, unsigned dwStyle, Int x, Int y, Int nWidth, Int nHeight, HWND hwndParent, Int nID)
-{
-	return capCreateCaptureWindowW(lpszWindowName, dwStyle, x, y, nWidth, nHeight, hwndParent, nID);
-}
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option pop
-#endif
-
-#else
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option push -w-inl
-#endif
-inline HWND __stdcall capCreateCaptureWindow(char * lpszWindowName, unsigned dwStyle, Int x, Int y, Int nWidth, Int nHeight, HWND hwndParent, Int nID)
-{
-	return capCreateCaptureWindowA(lpszWindowName, dwStyle, x, y, nWidth, nHeight, hwndParent, nID);
-}
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option pop
-#endif
-
-#endif
-
-
-#if defined(UNICODE)
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option push -w-inl
-#endif
-inline System::LongBool __stdcall capGetDriverDescription(unsigned wDriverIndex, char * lpszName, Int cbName, char * lpszVer, Int cbVer)
-{
-	return capGetDriverDescriptionW(wDriverIndex, lpszName, cbName, lpszVer, cbVer);
-}
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option pop
-#endif
-
-#else
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option push -w-inl
-#endif
-inline System::LongBool __stdcall capGetDriverDescription(unsigned wDriverIndex, char * lpszName, Int cbName, char * lpszVer, Int cbVer)
-{
-	return capGetDriverDescriptionA(wDriverIndex, lpszName, cbName, lpszVer, cbVer);
-}
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option pop
-#endif
-
-#endif
-
-
-#if defined(UNICODE)
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option push -w-inl
-#endif
-inline System::LongBool __stdcall GetOpenFileNamePreview(Winapi::Commdlg::POpenFilenameA lpofn)
-{
-	return GetOpenFileNamePreviewW(lpofn);
-}
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option pop
-#endif
-
-#else
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option push -w-inl
-#endif
-inline System::LongBool __stdcall GetOpenFileNamePreview(Winapi::Commdlg::POpenFilenameA lpofn)
-{
-	return GetOpenFileNamePreviewA(lpofn);
-}
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option pop
-#endif
-
-#endif
-
-
-#if defined(UNICODE)
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option push -w-inl
-#endif
-inline System::LongBool __stdcall GetSaveFileNamePreview(Winapi::Commdlg::POpenFilenameA lpofn)
-{
-	return GetSaveFileNamePreviewW(lpofn);
-}
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option pop
-#endif
-
-#else
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option push -w-inl
-#endif
-inline System::LongBool __stdcall GetSaveFileNamePreview(Winapi::Commdlg::POpenFilenameA lpofn)
-{
-	return GetSaveFileNamePreviewA(lpofn);
-}
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option pop
-#endif
-
-#endif
-
-}	/* namespace Vfw */
-}	/* namespace Formats */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS_VFW)
-using namespace Formats::Vfw;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS)
-using namespace Formats;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// Formats_VFWHPP

include/Win32/Formats.VRML.hpp

@@ -1,276 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'Formats.VRML.pas' rev: 36.00 (Windows)
-
-#ifndef Formats_VRMLHPP
-#define Formats_VRMLHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <System.Classes.hpp>
-#include <System.SysUtils.hpp>
-#include <System.Types.hpp>
-#include <Stage.VectorGeometry.hpp>
-#include <Stage.VectorTypes.hpp>
-#include <GLS.VectorLists.hpp>
-#include <Stage.Utils.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Formats
-{
-namespace Vrml
-{
-//-- forward type declarations -----------------------------------------------
-class DELPHICLASS TVRMLNode;
-class DELPHICLASS TVRMLSingleArray;
-class DELPHICLASS TVRMLIntegerArray;
-class DELPHICLASS TVRMLMaterial;
-class DELPHICLASS TVRMLUse;
-class DELPHICLASS TVRMLShapeHints;
-class DELPHICLASS TVRMLTransform;
-class DELPHICLASS TVRMLParser;
-//-- type declarations -------------------------------------------------------
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TVRMLNode : public System::TObject
-{
-	typedef System::TObject inherited;
-	
-public:
-	TVRMLNode* operator[](int index) { return this->Nodes[index]; }
-	
-private:
-	System::Classes::TList* FNodes;
-	TVRMLNode* FParent;
-	System::UnicodeString FName;
-	System::UnicodeString FDefName;
-	TVRMLNode* __fastcall GetNode(int index);
-	
-public:
-	__fastcall virtual TVRMLNode();
-	__fastcall TVRMLNode(TVRMLNode* AParent);
-	__fastcall virtual ~TVRMLNode();
-	int __fastcall Count();
-	void __fastcall Clear();
-	void __fastcall Add(TVRMLNode* node);
-	void __fastcall Remove(TVRMLNode* node);
-	void __fastcall Delete(int index);
-	__property TVRMLNode* Nodes[int index] = {read=GetNode/*, default*/};
-	__property TVRMLNode* Parent = {read=FParent};
-	__property System::UnicodeString Name = {read=FName, write=FName};
-	__property System::UnicodeString DefName = {read=FDefName, write=FDefName};
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TVRMLSingleArray : public TVRMLNode
-{
-	typedef TVRMLNode inherited;
-	
-private:
-	Gls::Vectorlists::TGLSingleList* FValues;
-	
-public:
-	__fastcall virtual TVRMLSingleArray();
-	__fastcall virtual ~TVRMLSingleArray();
-	__property Gls::Vectorlists::TGLSingleList* Values = {read=FValues};
-public:
-	/* TVRMLNode.CreateOwned */ inline __fastcall TVRMLSingleArray(TVRMLNode* AParent) : TVRMLNode(AParent) { }
-	
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TVRMLIntegerArray : public TVRMLNode
-{
-	typedef TVRMLNode inherited;
-	
-private:
-	Gls::Vectorlists::TGLIntegerList* FValues;
-	
-public:
-	__fastcall virtual TVRMLIntegerArray();
-	__fastcall virtual ~TVRMLIntegerArray();
-	__property Gls::Vectorlists::TGLIntegerList* Values = {read=FValues};
-public:
-	/* TVRMLNode.CreateOwned */ inline __fastcall TVRMLIntegerArray(TVRMLNode* AParent) : TVRMLNode(AParent) { }
-	
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TVRMLMaterial : public TVRMLNode
-{
-	typedef TVRMLNode inherited;
-	
-private:
-	Stage::Vectortypes::TVector3f FDiffuseColor;
-	Stage::Vectortypes::TVector3f FAmbientColor;
-	Stage::Vectortypes::TVector3f FSpecularColor;
-	Stage::Vectortypes::TVector3f FEmissiveColor;
-	float FTransparency;
-	float FShininess;
-	bool FHasDiffuse;
-	bool FHasAmbient;
-	bool FHasSpecular;
-	bool FHasEmissive;
-	bool FHasTransparency;
-	bool FHasShininess;
-	
-public:
-	__fastcall virtual TVRMLMaterial();
-	__property Stage::Vectortypes::TVector3f DiffuseColor = {read=FDiffuseColor, write=FDiffuseColor};
-	__property Stage::Vectortypes::TVector3f AmbientColor = {read=FAmbientColor, write=FAmbientColor};
-	__property Stage::Vectortypes::TVector3f SpecularColor = {read=FSpecularColor, write=FSpecularColor};
-	__property Stage::Vectortypes::TVector3f EmissiveColor = {read=FEmissiveColor, write=FEmissiveColor};
-	__property float Transparency = {read=FTransparency, write=FTransparency};
-	__property float Shininess = {read=FShininess, write=FShininess};
-	__property bool HasDiffuse = {read=FHasDiffuse, write=FHasDiffuse, nodefault};
-	__property bool HasAmbient = {read=FHasAmbient, write=FHasAmbient, nodefault};
-	__property bool HasSpecular = {read=FHasSpecular, write=FHasSpecular, nodefault};
-	__property bool HasEmissive = {read=FHasEmissive, write=FHasEmissive, nodefault};
-	__property bool HasTransparency = {read=FHasTransparency, write=FHasTransparency, nodefault};
-	__property bool HasShininess = {read=FHasShininess, write=FHasShininess, nodefault};
-public:
-	/* TVRMLNode.CreateOwned */ inline __fastcall TVRMLMaterial(TVRMLNode* AParent) : TVRMLNode(AParent) { }
-	/* TVRMLNode.Destroy */ inline __fastcall virtual ~TVRMLMaterial() { }
-	
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TVRMLUse : public TVRMLNode
-{
-	typedef TVRMLNode inherited;
-	
-private:
-	System::UnicodeString FValue;
-	
-public:
-	__property System::UnicodeString Value = {read=FValue, write=FValue};
-public:
-	/* TVRMLNode.Create */ inline __fastcall virtual TVRMLUse() : TVRMLNode() { }
-	/* TVRMLNode.CreateOwned */ inline __fastcall TVRMLUse(TVRMLNode* AParent) : TVRMLNode(AParent) { }
-	/* TVRMLNode.Destroy */ inline __fastcall virtual ~TVRMLUse() { }
-	
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TVRMLShapeHints : public TVRMLNode
-{
-	typedef TVRMLNode inherited;
-	
-private:
-	float FCreaseAngle;
-	
-public:
-	__property float CreaseAngle = {read=FCreaseAngle, write=FCreaseAngle};
-public:
-	/* TVRMLNode.Create */ inline __fastcall virtual TVRMLShapeHints() : TVRMLNode() { }
-	/* TVRMLNode.CreateOwned */ inline __fastcall TVRMLShapeHints(TVRMLNode* AParent) : TVRMLNode(AParent) { }
-	/* TVRMLNode.Destroy */ inline __fastcall virtual ~TVRMLShapeHints() { }
-	
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TVRMLTransform : public TVRMLNode
-{
-	typedef TVRMLNode inherited;
-	
-private:
-	Stage::Vectortypes::TVector3f FCenter;
-	Stage::Vectortypes::TVector4f FRotation;
-	Stage::Vectortypes::TVector3f FScaleFactor;
-	
-public:
-	__fastcall virtual TVRMLTransform();
-	__property Stage::Vectortypes::TVector3f Center = {read=FCenter, write=FCenter};
-	__property Stage::Vectortypes::TVector4f Rotation = {read=FRotation, write=FRotation};
-	__property Stage::Vectortypes::TVector3f ScaleFactor = {read=FScaleFactor, write=FScaleFactor};
-public:
-	/* TVRMLNode.CreateOwned */ inline __fastcall TVRMLTransform(TVRMLNode* AParent) : TVRMLNode(AParent) { }
-	/* TVRMLNode.Destroy */ inline __fastcall virtual ~TVRMLTransform() { }
-	
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TVRMLParser : public System::TObject
-{
-	typedef System::TObject inherited;
-	
-private:
-	int FCursor;
-	System::Classes::TStringList* FTokens;
-	TVRMLNode* FRootNode;
-	TVRMLNode* FCurrentNode;
-	bool FAllowUnknownNodes;
-	System::Classes::TList* FDefines;
-	
-protected:
-	System::UnicodeString __fastcall ReadToken();
-	float __fastcall ReadSingle();
-	Stage::Vectortypes::TVector3f __fastcall ReadVector3f();
-	Stage::Vectortypes::TVector4f __fastcall ReadVector4f();
-	void __fastcall ReadUnknownArray(System::UnicodeString DefName = System::UnicodeString());
-	void __fastcall ReadUnknownHeirachy(System::UnicodeString DefName = System::UnicodeString());
-	void __fastcall ReadUnknown(System::UnicodeString unknown_token, System::UnicodeString DefName = System::UnicodeString());
-	void __fastcall ReadPointArray(System::UnicodeString DefName = System::UnicodeString());
-	void __fastcall ReadCoordIndexArray(System::UnicodeString DefName = System::UnicodeString());
-	void __fastcall ReadNormalIndexArray(System::UnicodeString DefName = System::UnicodeString());
-	void __fastcall ReadTextureCoordIndexArray(System::UnicodeString DefName = System::UnicodeString());
-	void __fastcall ReadCoordinate3(System::UnicodeString DefName = System::UnicodeString());
-	void __fastcall ReadNormal(System::UnicodeString DefName = System::UnicodeString());
-	void __fastcall ReadTextureCoordinate2(System::UnicodeString DefName = System::UnicodeString());
-	void __fastcall ReadMaterial(System::UnicodeString DefName = System::UnicodeString());
-	void __fastcall ReadIndexedFaceSet(System::UnicodeString DefName = System::UnicodeString());
-	void __fastcall ReadTransform(System::UnicodeString DefName = System::UnicodeString());
-	void __fastcall ReadShapeHints(System::UnicodeString DefName = System::UnicodeString());
-	void __fastcall ReadSeparator(System::UnicodeString DefName = System::UnicodeString());
-	void __fastcall ReadGroup(System::UnicodeString DefName = System::UnicodeString());
-	void __fastcall ReadDef();
-	void __fastcall ReadUse();
-	
-public:
-	__fastcall TVRMLParser();
-	__fastcall virtual ~TVRMLParser();
-	void __fastcall Parse(System::UnicodeString Text);
-	__property TVRMLNode* RootNode = {read=FRootNode};
-	__property bool AllowUnknownNodes = {read=FAllowUnknownNodes, write=FAllowUnknownNodes, nodefault};
-};
-
-#pragma pack(pop)
-
-//-- var, const, procedure ---------------------------------------------------
-}	/* namespace Vrml */
-}	/* namespace Formats */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS_VRML)
-using namespace Formats::Vrml;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS)
-using namespace Formats;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// Formats_VRMLHPP

include/Win32/Formats.X.hpp

@@ -1,220 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'Formats.X.pas' rev: 36.00 (Windows)
-
-#ifndef Formats_XHPP
-#define Formats_XHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <System.Classes.hpp>
-#include <System.SysUtils.hpp>
-#include <Stage.VectorTypes.hpp>
-#include <Stage.VectorGeometry.hpp>
-#include <GLS.VectorLists.hpp>
-#include <GLS.PersistentClasses.hpp>
-#include <Stage.Utils.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Formats
-{
-namespace X
-{
-//-- forward type declarations -----------------------------------------------
-struct TDXFileHeader;
-class DELPHICLASS TDXNode;
-class DELPHICLASS TDXMaterial;
-class DELPHICLASS TDXMaterialList;
-class DELPHICLASS TDXFrame;
-class DELPHICLASS TDXMesh;
-class DELPHICLASS TDXFile;
-//-- type declarations -------------------------------------------------------
-struct DECLSPEC_DRECORD TDXFileHeader
-{
-public:
-	System::StaticArray<char, 4> Magic;
-	System::StaticArray<char, 2> Major;
-	System::StaticArray<char, 2> Minor;
-	System::StaticArray<char, 4> FileType;
-	System::StaticArray<char, 4> FloatType;
-};
-
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TDXNode : public System::Classes::TList
-{
-	typedef System::Classes::TList inherited;
-	
-private:
-	System::UnicodeString FName;
-	System::UnicodeString FTypeName;
-	TDXNode* FOwner;
-	TDXNode* __fastcall GetItem(int index);
-	
-public:
-	__fastcall TDXNode(TDXNode* AOwner);
-	__fastcall virtual TDXNode();
-	virtual void __fastcall Clear();
-	__property System::UnicodeString Name = {read=FName, write=FName};
-	__property System::UnicodeString TypeName = {read=FTypeName, write=FTypeName};
-	__property TDXNode* Owner = {read=FOwner};
-	__property TDXNode* Items[int index] = {read=GetItem};
-public:
-	/* TList.Destroy */ inline __fastcall virtual ~TDXNode() { }
-	
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TDXMaterial : public Gls::Persistentclasses::TGLPersistentObject
-{
-	typedef Gls::Persistentclasses::TGLPersistentObject inherited;
-	
-private:
-	Stage::Vectortypes::TVector4f FDiffuse;
-	float FSpecPower;
-	Stage::Vectortypes::TVector3f FSpecular;
-	Stage::Vectortypes::TVector3f FEmissive;
-	System::UnicodeString FTexture;
-	
-public:
-	__fastcall TDXMaterial(TDXMaterialList* AOwner);
-	__property Stage::Vectortypes::TVector4f Diffuse = {read=FDiffuse, write=FDiffuse};
-	__property float SpecPower = {read=FSpecPower, write=FSpecPower};
-	__property Stage::Vectortypes::TVector3f Specular = {read=FSpecular, write=FSpecular};
-	__property Stage::Vectortypes::TVector3f Emissive = {read=FEmissive, write=FEmissive};
-	__property System::UnicodeString Texture = {read=FTexture, write=FTexture};
-public:
-	/* TGLPersistentObject.Create */ inline __fastcall virtual TDXMaterial() : Gls::Persistentclasses::TGLPersistentObject() { }
-	/* TGLPersistentObject.CreateFromFiler */ inline __fastcall TDXMaterial(Gls::Persistentclasses::TGLVirtualReader* reader) : Gls::Persistentclasses::TGLPersistentObject(reader) { }
-	/* TGLPersistentObject.Destroy */ inline __fastcall virtual ~TDXMaterial() { }
-	
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TDXMaterialList : public TDXNode
-{
-	typedef TDXNode inherited;
-	
-private:
-	TDXMaterial* __fastcall GetMaterial(int index);
-	
-public:
-	__property TDXMaterial* Items[int index] = {read=GetMaterial};
-public:
-	/* TDXNode.CreateOwned */ inline __fastcall TDXMaterialList(TDXNode* AOwner) : TDXNode(AOwner) { }
-	/* TDXNode.Create */ inline __fastcall virtual TDXMaterialList() : TDXNode() { }
-	
-public:
-	/* TList.Destroy */ inline __fastcall virtual ~TDXMaterialList() { }
-	
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TDXFrame : public TDXNode
-{
-	typedef TDXNode inherited;
-	
-private:
-	Stage::Vectortypes::TGLMatrix FMatrix;
-	
-public:
-	__fastcall virtual TDXFrame();
-	Stage::Vectortypes::TGLMatrix __fastcall GlobalMatrix();
-	__property Stage::Vectortypes::TGLMatrix Matrix = {read=FMatrix, write=FMatrix};
-public:
-	/* TDXNode.CreateOwned */ inline __fastcall TDXFrame(TDXNode* AOwner) : TDXNode(AOwner) { }
-	
-public:
-	/* TList.Destroy */ inline __fastcall virtual ~TDXFrame() { }
-	
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TDXMesh : public TDXNode
-{
-	typedef TDXNode inherited;
-	
-private:
-	Gls::Vectorlists::TGLAffineVectorList* FVertices;
-	Gls::Vectorlists::TGLAffineVectorList* FNormals;
-	Gls::Vectorlists::TGLAffineVectorList* FTexCoords;
-	Gls::Vectorlists::TGLIntegerList* FVertexIndices;
-	Gls::Vectorlists::TGLIntegerList* FNormalIndices;
-	Gls::Vectorlists::TGLIntegerList* FMaterialIndices;
-	Gls::Vectorlists::TGLIntegerList* FVertCountIndices;
-	TDXMaterialList* FMaterialList;
-	
-public:
-	__fastcall virtual TDXMesh();
-	__fastcall virtual ~TDXMesh();
-	__property Gls::Vectorlists::TGLAffineVectorList* Vertices = {read=FVertices};
-	__property Gls::Vectorlists::TGLAffineVectorList* Normals = {read=FNormals};
-	__property Gls::Vectorlists::TGLAffineVectorList* TexCoords = {read=FTexCoords};
-	__property Gls::Vectorlists::TGLIntegerList* VertexIndices = {read=FVertexIndices};
-	__property Gls::Vectorlists::TGLIntegerList* NormalIndices = {read=FNormalIndices};
-	__property Gls::Vectorlists::TGLIntegerList* MaterialIndices = {read=FMaterialIndices};
-	__property Gls::Vectorlists::TGLIntegerList* VertCountIndices = {read=FVertCountIndices};
-	__property TDXMaterialList* MaterialList = {read=FMaterialList};
-public:
-	/* TDXNode.CreateOwned */ inline __fastcall TDXMesh(TDXNode* AOwner) : TDXNode(AOwner) { }
-	
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TDXFile : public System::TObject
-{
-	typedef System::TObject inherited;
-	
-private:
-	TDXNode* FRootNode;
-	TDXFileHeader FHeader;
-	
-protected:
-	void __fastcall ParseText(System::Classes::TStream* Stream);
-	void __fastcall ParseBinary(System::Classes::TStream* Stream);
-	
-public:
-	__fastcall TDXFile();
-	__fastcall virtual ~TDXFile();
-	void __fastcall LoadFromStream(System::Classes::TStream* Stream);
-	__property TDXFileHeader Header = {read=FHeader};
-	__property TDXNode* RootNode = {read=FRootNode};
-};
-
-#pragma pack(pop)
-
-//-- var, const, procedure ---------------------------------------------------
-}	/* namespace X */
-}	/* namespace Formats */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS_X)
-using namespace Formats::X;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS)
-using namespace Formats;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// Formats_XHPP

include/Win32/Formats.m3DS.hpp

@@ -1,256 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'Formats.m3DS.pas' rev: 36.00 (Windows)
-
-#ifndef Formats_m3DSHPP
-#define Formats_m3DSHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <System.Classes.hpp>
-#include <System.SysUtils.hpp>
-#include <Formats.m3DSTypes.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Formats
-{
-namespace M3ds
-{
-//-- forward type declarations -----------------------------------------------
-class DELPHICLASS TMaterialList;
-class DELPHICLASS TObjectList;
-class DELPHICLASS TKeyFramer;
-class DELPHICLASS TFile3DS;
-//-- type declarations -------------------------------------------------------
-typedef void __fastcall (__closure *TLoadProgress)(System::LongInt StreamPos, System::LongInt StreamMax);
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TMaterialList : public System::TObject
-{
-	typedef System::TObject inherited;
-	
-public:
-	Formats::M3dstypes::PMaterial3DS operator[](int Index) { return this->Material[Index]; }
-	
-private:
-	TFile3DS* FOwner;
-	System::Classes::TList* FLocalList;
-	int __fastcall GetCount();
-	Formats::M3dstypes::PMaterial3DS __fastcall GetMaterial(int Index);
-	Formats::M3dstypes::PMaterial3DS __fastcall GetMaterialByName(const System::UnicodeString Name);
-	
-public:
-	__fastcall virtual TMaterialList(TFile3DS* AOwner);
-	__fastcall virtual ~TMaterialList();
-	void __fastcall ClearList();
-	__property int Count = {read=GetCount, nodefault};
-	__property Formats::M3dstypes::PMaterial3DS Material[int Index] = {read=GetMaterial/*, default*/};
-	__property Formats::M3dstypes::PMaterial3DS MaterialByName[const System::UnicodeString Name] = {read=GetMaterialByName};
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TObjectList : public System::TObject
-{
-	typedef System::TObject inherited;
-	
-private:
-	TFile3DS* FOwner;
-	System::Classes::TList* FMeshList;
-	System::Classes::TList* FOmniList;
-	System::Classes::TList* FSpotList;
-	System::Classes::TList* FCameraList;
-	Formats::M3dstypes::PCamera3DS __fastcall GetCamera(int Index);
-	int __fastcall GetCamCount();
-	int __fastcall GetMeshObjectCount();
-	Formats::M3dstypes::PMesh3DS __fastcall GetMesh(int Index);
-	int __fastcall GetOmniCount();
-	Formats::M3dstypes::PLight3DS __fastcall GetOmniLight(int Index);
-	int __fastcall GetSpotCount();
-	Formats::M3dstypes::PLight3DS __fastcall GetSpotLight(int Index);
-	
-public:
-	__fastcall virtual TObjectList(TFile3DS* AOwner);
-	__fastcall virtual ~TObjectList();
-	void __fastcall ClearLists();
-	__property int CameraCount = {read=GetCamCount, nodefault};
-	__property int MeshCount = {read=GetMeshObjectCount, nodefault};
-	__property int OmniLightCount = {read=GetOmniCount, nodefault};
-	__property int SpotLightCount = {read=GetSpotCount, nodefault};
-	__property Formats::M3dstypes::PMesh3DS Mesh[int Index] = {read=GetMesh};
-	__property Formats::M3dstypes::PCamera3DS Camera[int Index] = {read=GetCamera};
-	__property Formats::M3dstypes::PLight3DS OmniLight[int Index] = {read=GetOmniLight};
-	__property Formats::M3dstypes::PLight3DS SpotLight[int Index] = {read=GetSpotLight};
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TKeyFramer : public System::TObject
-{
-	typedef System::TObject inherited;
-	
-public:
-	Formats::M3dstypes::PKFMesh3DS operator[](int Index) { return this->MeshMotion[Index]; }
-	
-private:
-	TFile3DS* FOwner;
-	System::Classes::TList* FMeshMotionList;
-	System::Classes::TList* FOmniMotionList;
-	System::Classes::TList* FSpotMotionList;
-	System::Classes::TList* FCameraMotionList;
-	Formats::M3dstypes::PKFAmbient3DS FAmbientMotion;
-	Formats::M3dstypes::PKFAmbient3DS __fastcall GetAmbientMotion();
-	Formats::M3dstypes::PKFCamera3DS __fastcall GetCameraMotion(int Index);
-	int __fastcall GetCamMotionCount();
-	Formats::M3dstypes::TKFSets3DS __fastcall GetKFSets();
-	int __fastcall GetMeshMotionCount();
-	Formats::M3dstypes::PKFMesh3DS __fastcall GetMeshMotion(int Index);
-	int __fastcall GetOmniMotionCount();
-	Formats::M3dstypes::PKFOmni3DS __fastcall GetOmniLightMotion(int Index);
-	int __fastcall GetSpotMotionCount();
-	Formats::M3dstypes::PKFSpot3DS __fastcall GetSpotLightMotion(int Index);
-	
-public:
-	__fastcall virtual TKeyFramer(TFile3DS* AOwner);
-	__fastcall virtual ~TKeyFramer();
-	void __fastcall ClearLists();
-	__property Formats::M3dstypes::PKFAmbient3DS AmbientLightMotion = {read=GetAmbientMotion};
-	__property int CameraMotionCount = {read=GetCamMotionCount, nodefault};
-	__property int MeshMotionCount = {read=GetMeshMotionCount, nodefault};
-	__property int OmniLightMotionCount = {read=GetOmniMotionCount, nodefault};
-	__property int SpotLightMotionCount = {read=GetSpotMotionCount, nodefault};
-	__property Formats::M3dstypes::PKFMesh3DS MeshMotion[int Index] = {read=GetMeshMotion/*, default*/};
-	__property Formats::M3dstypes::PKFCamera3DS CameraMotion[int Index] = {read=GetCameraMotion};
-	__property Formats::M3dstypes::PKFOmni3DS OmniLightMotion[int Index] = {read=GetOmniLightMotion};
-	__property Formats::M3dstypes::TKFSets3DS Settings = {read=GetKFSets};
-	__property Formats::M3dstypes::PKFSpot3DS SpotLightMotion[int Index] = {read=GetSpotLightMotion};
-};
-
-#pragma pack(pop)
-
-class PASCALIMPLEMENTATION TFile3DS : public System::TObject
-{
-	typedef System::TObject inherited;
-	
-private:
-	Formats::M3dstypes::PNodeList FNodeList;
-	Formats::M3dstypes::TDatabase3DS FDatabase;
-	System::Classes::TStream* FStream;
-	bool FOwnStream;
-	TMaterialList* FMaterialList;
-	TObjectList* FObjectList;
-	TKeyFramer* FKeyFramer;
-	System::UnicodeString FFileName;
-	TLoadProgress FOnLoadProgress;
-	Formats::M3dstypes::TAtmosphere3DS __fastcall GetAtmosphereData();
-	Formats::M3dstypes::TBackground3DS __fastcall GetBackgroundData();
-	Formats::M3dstypes::TDBType3DS __fastcall GetDatabaseType();
-	Formats::M3dstypes::TMeshSet3DS __fastcall GetMeshSettings();
-	Formats::M3dstypes::TViewport3DS __fastcall GetViewportData();
-	Formats::M3dstypes::TReleaseLevel __fastcall GetDatabaseRelease();
-	Formats::M3dstypes::TReleaseLevel __fastcall GetMeshRelease();
-	
-protected:
-	void __fastcall AddToNodeList(Formats::M3dstypes::PChunk3DS Chunk);
-	void __fastcall AssignParentNames();
-	void __fastcall CheckListNodeIDs();
-	void __fastcall CreateDatabase();
-	Formats::M3dstypes::PNodeList __fastcall FindNodeByID(short ID);
-	short __fastcall GetChunkNodeID(Formats::M3dstypes::PChunk3DS Chunk);
-	void __fastcall InitDatabase();
-	bool __fastcall IsNode(System::Word Tag);
-	void __fastcall KFAddParentName(Formats::M3dstypes::PChunk3DS Chunk, const Formats::M3dstypes::String3DS Name);
-	void __fastcall MakeNode(Formats::M3dstypes::PNodeList &Node);
-	void __fastcall ParseDatabase();
-	void __fastcall ReadChildren(Formats::M3dstypes::PChunk3DS Parent);
-	void __fastcall ReadXDataEntryChildren(Formats::M3dstypes::PChunk3DS Parent);
-	void __fastcall ReleaseDatabase();
-	void __fastcall ReleaseNodeList();
-	void __fastcall ReleaseStream();
-	
-public:
-	__fastcall virtual TFile3DS();
-	__fastcall virtual TFile3DS(const System::UnicodeString FileName);
-	__fastcall virtual ~TFile3DS();
-	void __fastcall ClearLists();
-	void __fastcall DumpDataBase(System::Classes::TStrings* Strings, Formats::M3dstypes::TDumpLevel DumpLevel);
-	void __fastcall LoadFromFile(const System::UnicodeString FileName);
-	void __fastcall LoadFromStream(System::Classes::TStream* const aStream);
-	System::Byte __fastcall ReadByte();
-	unsigned __fastcall ReadCardinal();
-	void __fastcall ReadChunkData(Formats::M3dstypes::PChunk3DS Chunk);
-	void __fastcall ReadData(int Size, void * Data);
-	double __fastcall ReadDouble();
-	Formats::M3dstypes::TFace3DS __fastcall ReadFace();
-	void __fastcall ReadHeader(System::Word &ChunkType, unsigned &ChunkSize);
-	int __fastcall ReadInteger();
-	Formats::M3dstypes::TKeyHeader3DS __fastcall ReadKeyHeader();
-	Formats::M3dstypes::TPoint3DS __fastcall ReadPoint();
-	short __fastcall ReadShort();
-	float __fastcall ReadSingle();
-	Formats::M3dstypes::PChar3DS __fastcall ReadString();
-	Formats::M3dstypes::TTexVert3DS __fastcall ReadTexVert();
-	Formats::M3dstypes::TTrackHeader3DS __fastcall ReadTrackHeader();
-	System::Word __fastcall ReadWord();
-	void __fastcall FinishHeader(unsigned StartPos, unsigned EndPos);
-	void * __fastcall InitChunkData(Formats::M3dstypes::PChunk3DS Chunk);
-	void __fastcall SeekChild(Formats::M3dstypes::PChunk3DS Chunk);
-	void __fastcall Skip(int AValue);
-	void __fastcall WriteByte(System::Byte AValue);
-	void __fastcall WriteCardinal(unsigned AValue);
-	void __fastcall WriteData(int Size, void * Data);
-	void __fastcall WriteDouble(double AValue);
-	void __fastcall WriteFace(const Formats::M3dstypes::TFace3DS &F);
-	void __fastcall WriteFixedString(const Formats::M3dstypes::String3DS AValue, int Len);
-	void __fastcall WriteHeader(System::Word ChunkType, unsigned ChunkSize);
-	void __fastcall WriteInteger(int AValue);
-	void __fastcall WriteKeyHeader(const Formats::M3dstypes::TKeyHeader3DS &K);
-	void __fastcall WritePoint(const Formats::M3dstypes::TPoint3DS &P);
-	void __fastcall WriteShort(short AValue);
-	void __fastcall WriteSingle(float AValue);
-	void __fastcall WriteString(const Formats::M3dstypes::String3DS AValue);
-	void __fastcall WriteTexVertex(const Formats::M3dstypes::TTexVert3DS &T);
-	void __fastcall WriteTrackHeader(const Formats::M3dstypes::TTrackHeader3DS &T);
-	void __fastcall WriteWord(System::Word AValue);
-	__property Formats::M3dstypes::TAtmosphere3DS Atmosphere = {read=GetAtmosphereData};
-	__property Formats::M3dstypes::TBackground3DS Background = {read=GetBackgroundData};
-	__property Formats::M3dstypes::TReleaseLevel DatabaseRelease = {read=GetDatabaseRelease, nodefault};
-	__property Formats::M3dstypes::TDBType3DS DatabaseType = {read=GetDatabaseType, nodefault};
-	__property System::UnicodeString FileName = {read=FFileName};
-	__property TKeyFramer* KeyFramer = {read=FKeyFramer};
-	__property TMaterialList* Materials = {read=FMaterialList};
-	__property Formats::M3dstypes::TReleaseLevel MeshRelease = {read=GetMeshRelease, nodefault};
-	__property Formats::M3dstypes::TMeshSet3DS MeshSettings = {read=GetMeshSettings};
-	__property TObjectList* Objects = {read=FObjectList};
-	__property Formats::M3dstypes::TViewport3DS Viewport = {read=GetViewportData};
-	__property TLoadProgress OnLoadProgress = {read=FOnLoadProgress, write=FOnLoadProgress};
-};
-
-
-//-- var, const, procedure ---------------------------------------------------
-}	/* namespace M3ds */
-}	/* namespace Formats */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS_M3DS)
-using namespace Formats::M3ds;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS)
-using namespace Formats;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// Formats_m3DSHPP

include/Win32/Formats.m3DSConst.hpp

@@ -1,828 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'Formats.m3DSConst.pas' rev: 36.00 (Windows)
-
-#ifndef Formats_m3DSConstHPP
-#define Formats_m3DSConstHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <Formats.m3DSTypes.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Formats
-{
-namespace M3dsconst
-{
-//-- forward type declarations -----------------------------------------------
-//-- type declarations -------------------------------------------------------
-//-- var, const, procedure ---------------------------------------------------
-static _DELPHI_CONST System::Int8 FaceCAVisable3DS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 FaceBCVisable3DS = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 FaceABVisable3DS = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 FaceUWrap3DS = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 FaceVWrap3DS = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 KeyUsesTension3DS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 KeyUsesCont3DS = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 KeyUsesBias3DS = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 KeyUsesEaseTo3DS = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 KeyUsesEaseFrom3DS = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 TrackSingle3DS = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 TrackLoops3DS = System::Int8(0x3);
-static _DELPHI_CONST System::Int8 TrackRepeats3DS = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 TrackLockX3DS = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 TrackLockY3DS = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 TrackLockZ3DS = System::Int8(0x20);
-static _DELPHI_CONST System::Word TrackNoLinkX3DS = System::Word(0x100);
-static _DELPHI_CONST System::Word TrackNoLinkY3DS = System::Word(0x200);
-static _DELPHI_CONST System::Word TrackNoLinkZ3DS = System::Word(0x400);
-extern DELPHI_PACKAGE Formats::M3dstypes::TPoint3DS DefPoint3DS;
-extern DELPHI_PACKAGE Formats::M3dstypes::TTexVert3DS DefTextVert3DS;
-extern DELPHI_PACKAGE Formats::M3dstypes::TFace3DS DefFace3DS;
-extern DELPHI_PACKAGE Formats::M3dstypes::TTrackHeader3DS DefTrackHeader3DS;
-extern DELPHI_PACKAGE Formats::M3dstypes::TKeyHeader3DS DefKeyHeader3DS;
-extern DELPHI_PACKAGE Formats::M3dstypes::TObjMat3DS DefObjMat3DS;
-extern DELPHI_PACKAGE Formats::M3dstypes::TKFRotKey3DS DefKFRotKey3DS;
-static _DELPHI_CONST int LayerFogBgnd = int(0x100000);
-static _DELPHI_CONST System::Int8 NoFalloff = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 TopFalloff = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 BottomFalloff = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 InitNoExtras3DS = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 InitVertexArray3DS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 InitTextArray3DS = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 InitFaceArray3DS = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 InitMatArray3DS = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 InitSmoothArray3DS = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 InitProcData3DS = System::Int8(0x20);
-static _DELPHI_CONST System::Int8 InitVFlagArray3DS = System::Int8(0x40);
-static _DELPHI_CONST System::Int8 RelVertexArray3ds = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 RelTextArray3ds = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 RelFaceArray3ds = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 RelMatArray3ds = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 RelSmoothArray3ds = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 RelProcData3ds = System::Int8(0x20);
-static _DELPHI_CONST System::Int8 RelVFlagArray3ds = System::Int8(0x40);
-static _DELPHI_CONST System::Word RelAll3DS = System::Word(0xffff);
-static _DELPHI_CONST System::Int8 Smooth01Group3DS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 Smooth02Group3DS = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 Smooth03Group3DS = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 Smooth04Group3DS = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 Smooth05Group3DS = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 Smooth06Group3DS = System::Int8(0x20);
-static _DELPHI_CONST System::Int8 Smooth07Group3DS = System::Int8(0x30);
-static _DELPHI_CONST System::Byte Smooth08Group3DS = System::Byte(0x80);
-static _DELPHI_CONST System::Word Smooth09Group3DS = System::Word(0x100);
-static _DELPHI_CONST System::Word Smooth10Group3DS = System::Word(0x200);
-static _DELPHI_CONST System::Word Smooth11Group3DS = System::Word(0x400);
-static _DELPHI_CONST System::Word Smooth12Group3DS = System::Word(0x800);
-static _DELPHI_CONST System::Word Smooth13Group3DS = System::Word(0x1000);
-static _DELPHI_CONST System::Word Smooth14Group3DS = System::Word(0x2000);
-static _DELPHI_CONST System::Word Smooth15Group3DS = System::Word(0x4000);
-static _DELPHI_CONST System::Word Smooth16Group3DS = System::Word(0x8000);
-static _DELPHI_CONST int Smooth17Group3DS = int(0x10000);
-static _DELPHI_CONST int Smooth18Group3DS = int(0x20000);
-static _DELPHI_CONST int Smooth19Group3DS = int(0x40000);
-static _DELPHI_CONST int Smooth20Group3DS = int(0x80000);
-static _DELPHI_CONST int Smooth21Group3DS = int(0x100000);
-static _DELPHI_CONST int Smooth22Group3DS = int(0x200000);
-static _DELPHI_CONST int Smooth23Group3DS = int(0x400000);
-static _DELPHI_CONST int Smooth24Group3DS = int(0x800000);
-static _DELPHI_CONST int Smooth25Group3DS = int(0x1000000);
-static _DELPHI_CONST int Smooth26Group3DS = int(0x2000000);
-static _DELPHI_CONST int Smooth27Group3DS = int(0x4000000);
-static _DELPHI_CONST int Smooth28Group3DS = int(0x8000000);
-static _DELPHI_CONST int Smooth29Group3DS = int(0x10000000);
-static _DELPHI_CONST int Smooth30Group3DS = int(0x20000000);
-static _DELPHI_CONST int Smooth31Group3DS = int(0x40000000);
-static _DELPHI_CONST unsigned Smooth32Group3DS = unsigned(0x80000000);
-#define DummyName3DS L"$$$DUMMY"
-static _DELPHI_CONST System::Int8 KfNodeOff3DS = System::Int8(0x8);
-static _DELPHI_CONST System::Word KfHideNode3DS = System::Word(0x800);
-static _DELPHI_CONST System::Word KfFastNode3DS = System::Word(0x1000);
-static _DELPHI_CONST System::Int8 KfNodeHasPath3DS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 KfNodeAutoSmooth3DS = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 KfNodeFrozen3DS = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 KfMotionBlur3DS = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 KfBlurBranch3DS = System::Int8(0x20);
-static _DELPHI_CONST System::Int8 KfMorphMtl3DS = System::Int8(0x40);
-static _DELPHI_CONST System::Byte KfMorphOb3DS = System::Byte(0x80);
-static _DELPHI_CONST System::Word FileNameStrMax3DS = System::Word(0x200);
-static _DELPHI_CONST System::Byte FileAttrStrMax3DS = System::Byte(0x80);
-static _DELPHI_CONST System::Int8 MasterScaleMin3DS = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 LoShadowBiasMin3DS = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 HiShadowBiasMin3DS = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 ShadowMapSizeMin3DS = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 ShadowSamplesMin3DS = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 ShadowRangeMin3DS = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 ShadowFilterMin3DS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 ShadowFilterMax3DS = System::Int8(0xa);
-static _DELPHI_CONST System::Int8 BitMapStrMax3DS = System::Int8(0xc);
-static _DELPHI_CONST System::Int8 VGradientMin3DS = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 VGradientMax3DS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 FogMin3DS = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 FogMax3DS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 DistanceCueMin3DS = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 DistanceCueMax3DS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 ViewCameraStrMax3DS = System::Int8(0xa);
-static _DELPHI_CONST System::Int8 MatNameStrMax3DS = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 MatShadingMin3DS = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 MatShadingMax3DS = System::Int8(0x3);
-static _DELPHI_CONST System::Int8 MatACubicFMin3DS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 MatACubicAMin3DS = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 MatACubicAMax3DS = System::Int8(0x3);
-static _DELPHI_CONST System::Int8 ACubicFirst3DS = System::Int8(0x9);
-static _DELPHI_CONST System::Int8 ACubicFlat3DS = System::Int8(0x11);
-static _DELPHI_CONST System::Int8 PointArrayMin3DS = System::Int8(0x3);
-static _DELPHI_CONST System::Int8 FaceArrayMin3DS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 MshMatGroupMin3DS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 MshMatGroupStrMax3DS = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 ProcNameStrMax3DS = System::Int8(0xc);
-static _DELPHI_CONST System::Int8 DLSpotlightMin3DS = System::Int8(0x0);
-static _DELPHI_CONST System::Byte DLSpotlightMax3DS = System::Byte(0xa0);
-static _DELPHI_CONST System::Int8 DLLocalShadow2SMin3DS = System::Int8(0xa);
-static _DELPHI_CONST System::Word DLLocalShadow2SMax3DS = System::Word(0x1000);
-static _DELPHI_CONST System::Int8 DLLocalShadow2FMin3DS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 DLLocalShadow2FMax3DS = System::Int8(0xa);
-static _DELPHI_CONST System::Int8 ColorFMin3DS = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 ColorFMax3DS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 IntPercentageMax3DS = System::Int8(0x64);
-static _DELPHI_CONST System::Int8 FloatPercentageMax3DS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 MatMapNameStrMax3DS = System::Int8(0xc);
-static _DELPHI_CONST System::Int8 NamedObjectStrMax3DS = System::Int8(0xa);
-static const System::Extended NCameraFOVMin3DS = 2.500000E-04;
-static _DELPHI_CONST System::Byte NCameraFOVMax3DS = System::Byte(0xa0);
-#define NCameraFocMin3DS  (1.078130E+01)
-static _DELPHI_CONST int NCameraFocMax3DS = int(0x989680);
-static _DELPHI_CONST System::Int8 KFHdrStrMax3DS = System::Int8(0xc);
-static _DELPHI_CONST System::Int8 NodeHdrStrMax3DS = System::Int8(0xa);
-static _DELPHI_CONST System::Int8 InstanceNameStrMax3DS = System::Int8(0xa);
-static _DELPHI_CONST System::Int8 MorphTrackStrMax3DS = System::Int8(0xa);
-static _DELPHI_CONST System::Int8 MorphSmoothMin3DS = System::Int8(0x0);
-static _DELPHI_CONST System::Word MorphSmoothMax3DS = System::Word(0x168);
-static _DELPHI_CONST System::Int8 KFTensionMin3DS = System::Int8(-1);
-static _DELPHI_CONST System::Int8 KFTensionMax3DS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 KFContinuityMin3DS = System::Int8(-1);
-static _DELPHI_CONST System::Int8 KFContinuityMax3DS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 KFBiasMin3DS = System::Int8(-1);
-static _DELPHI_CONST System::Int8 KFBiasMax3DS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 KFEaseToMin3DS = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 KFEaseToMax3DS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 KFEaseFromMin3DS = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 KFEaseFromMax3DS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 TrackHeaderKeysMin3DS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 ColTrackTagMin3DS = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 ColTrackTagMax3DS = System::Int8(0x1);
-static const System::Extended FOVTrackTagMin3DS = 2.500000E-04;
-static _DELPHI_CONST System::Byte FOVTrackTagMax3DS = System::Byte(0xa0);
-static _DELPHI_CONST System::Int8 HotTrackTagMin3DS = System::Int8(0x0);
-static _DELPHI_CONST System::Byte HotTrackTagMax3DS = System::Byte(0xa0);
-static _DELPHI_CONST System::Int8 FallTrackTagMin3DS = System::Int8(0x0);
-static _DELPHI_CONST System::Byte FallTrackTagMax3DS = System::Byte(0xa0);
-static _DELPHI_CONST System::Int8 KNoID = System::Int8(-1);
-static _DELPHI_CONST System::Int8 TEX_DECAL = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 TEX_MIRROR = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 TEX_UNUSED1 = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 TEX_INVERT = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 TEX_NOWRAP = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 TEX_SAT = System::Int8(0x20);
-static _DELPHI_CONST System::Int8 TEX_ALPHA_SOURCE = System::Int8(0x40);
-static _DELPHI_CONST System::Byte TEX_TINT = System::Byte(0x80);
-static _DELPHI_CONST System::Word TEX_DONT_USE_ALPHA = System::Word(0x100);
-static _DELPHI_CONST System::Word TEX_RGB_TINT = System::Word(0x200);
-static _DELPHI_CONST System::Int8 NODE_RENDOB_HIDE = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 NODE_OFF = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 ATKEY1 = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 ATKEY2 = System::Int8(0x20);
-static _DELPHI_CONST System::Int8 ATKEY3 = System::Int8(0x40);
-static _DELPHI_CONST System::Byte ATKEY4 = System::Byte(0x80);
-static _DELPHI_CONST System::Word ATKEY5 = System::Word(0x100);
-static _DELPHI_CONST System::Word ATKEYFLAGS = System::Word(0x1f0);
-static _DELPHI_CONST System::Word MARK_NODE = System::Word(0x200);
-static _DELPHI_CONST System::Word DISABLE_NODE = System::Word(0x400);
-static _DELPHI_CONST System::Word HIDE_NODE = System::Word(0x800);
-static _DELPHI_CONST System::Word FAST_NODE = System::Word(0x1000);
-static _DELPHI_CONST System::Word PRIMARY_NODE = System::Word(0x4000);
-static _DELPHI_CONST System::Word NODE_CALC_PATH = System::Word(0x8000);
-static _DELPHI_CONST System::Int8 NODE_HAS_PATH = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 NODE_AUTO_SMOOTH = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 NODE_FROZEN = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 NODE_ANI_HIDDEN = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 NODE_MOTION_BLUR = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 NODE_BLUR_BRANCH = System::Int8(0x20);
-static _DELPHI_CONST System::Int8 NODE_MORPH_MTL = System::Int8(0x40);
-static _DELPHI_CONST System::Byte NODE_MORPH_OB = System::Byte(0x80);
-static _DELPHI_CONST System::Int8 NULL_CHUNK = System::Int8(0x0);
-static _DELPHI_CONST System::Word ChunkType = System::Word(0x995);
-static _DELPHI_CONST System::Word ChunkUnique = System::Word(0x996);
-static _DELPHI_CONST System::Word NotChunk = System::Word(0x997);
-static _DELPHI_CONST System::Word Container = System::Word(0x998);
-static _DELPHI_CONST System::Word IsChunk = System::Word(0x999);
-static _DELPHI_CONST System::Word DUMMY = System::Word(0xffff);
-static _DELPHI_CONST System::Word POINT_ARRAY_ENTRY = System::Word(0xf110);
-static _DELPHI_CONST System::Word POINT_FLAG_ARRAY_ENTRY = System::Word(0xf111);
-static _DELPHI_CONST System::Word FACE_ARRAY_ENTRY = System::Word(0xf120);
-static _DELPHI_CONST System::Word MSH_MAT_GROUP_ENTRY = System::Word(0xf130);
-static _DELPHI_CONST System::Word TEX_VERTS_ENTRY = System::Word(0xf140);
-static _DELPHI_CONST System::Word SMOOTH_GROUP_ENTRY = System::Word(0xf150);
-static _DELPHI_CONST System::Word POS_TRACK_TAG_KEY = System::Word(0xf020);
-static _DELPHI_CONST System::Word ROT_TRACK_TAG_KEY = System::Word(0xf021);
-static _DELPHI_CONST System::Word SCL_TRACK_TAG_KEY = System::Word(0xf022);
-static _DELPHI_CONST System::Word FOV_TRACK_TAG_KEY = System::Word(0xf023);
-static _DELPHI_CONST System::Word ROLL_TRACK_TAG_KEY = System::Word(0xf024);
-static _DELPHI_CONST System::Word COL_TRACK_TAG_KEY = System::Word(0xf025);
-static _DELPHI_CONST System::Word MORPH_TRACK_TAG_KEY = System::Word(0xf026);
-static _DELPHI_CONST System::Word HOT_TRACK_TAG_KEY = System::Word(0xf027);
-static _DELPHI_CONST System::Word FALL_TRACK_TAG_KEY = System::Word(0xf028);
-static _DELPHI_CONST System::Word M3DMAGIC = System::Word(0x4d4d);
-static _DELPHI_CONST System::Word SMAGIC = System::Word(0x2d2d);
-static _DELPHI_CONST System::Word LMAGIC = System::Word(0x2d3d);
-static _DELPHI_CONST System::Word MLIBMAGIC = System::Word(0x3daa);
-static _DELPHI_CONST System::Word MATMAGIC = System::Word(0x3dff);
-static _DELPHI_CONST System::Int8 M3D_VERSION = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 M3D_KFVERSION = System::Int8(0x5);
-static _DELPHI_CONST System::Word MDATA = System::Word(0x3d3d);
-static _DELPHI_CONST System::Word MESH_VERSION = System::Word(0x3d3e);
-static _DELPHI_CONST System::Int8 COLOR_F = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 COLOR_24 = System::Int8(0x11);
-static _DELPHI_CONST System::Int8 LIN_COLOR_24 = System::Int8(0x12);
-static _DELPHI_CONST System::Int8 LIN_COLOR_F = System::Int8(0x13);
-static _DELPHI_CONST System::Int8 INT_PERCENTAGE = System::Int8(0x30);
-static _DELPHI_CONST System::Int8 FLOAT_PERCENTAGE = System::Int8(0x31);
-static _DELPHI_CONST System::Word MASTER_SCALE = System::Word(0x100);
-static _DELPHI_CONST System::Word BIT_MAP = System::Word(0x1100);
-static _DELPHI_CONST System::Word USE_BIT_MAP = System::Word(0x1101);
-static _DELPHI_CONST System::Word SOLID_BGND = System::Word(0x1200);
-static _DELPHI_CONST System::Word USE_SOLID_BGND = System::Word(0x1201);
-static _DELPHI_CONST System::Word V_GRADIENT = System::Word(0x1300);
-static _DELPHI_CONST System::Word USE_V_GRADIENT = System::Word(0x1301);
-static _DELPHI_CONST System::Word LO_SHADOW_BIAS = System::Word(0x1400);
-static _DELPHI_CONST System::Word HI_SHADOW_BIAS = System::Word(0x1410);
-static _DELPHI_CONST System::Word SHADOW_MAP_SIZE = System::Word(0x1420);
-static _DELPHI_CONST System::Word SHADOW_SAMPLES = System::Word(0x1430);
-static _DELPHI_CONST System::Word SHADOW_RANGE = System::Word(0x1440);
-static _DELPHI_CONST System::Word SHADOW_FILTER = System::Word(0x1450);
-static _DELPHI_CONST System::Word RAY_BIAS = System::Word(0x1460);
-static _DELPHI_CONST System::Word O_CONSTS = System::Word(0x1500);
-static _DELPHI_CONST System::Word AMBIENT_LIGHT = System::Word(0x2100);
-static _DELPHI_CONST System::Word FOG = System::Word(0x2200);
-static _DELPHI_CONST System::Word USE_FOG = System::Word(0x2201);
-static _DELPHI_CONST System::Word FOG_BGND = System::Word(0x2210);
-static _DELPHI_CONST System::Word DISTANCE_CUE = System::Word(0x2300);
-static _DELPHI_CONST System::Word USE_DISTANCE_CUE = System::Word(0x2301);
-static _DELPHI_CONST System::Word LAYER_FOG = System::Word(0x2302);
-static _DELPHI_CONST System::Word USE_LAYER_FOG = System::Word(0x2303);
-static _DELPHI_CONST System::Word DCUE_BGND = System::Word(0x2310);
-static _DELPHI_CONST System::Word DEFAULT_VIEW = System::Word(0x3000);
-static _DELPHI_CONST System::Word VIEW_TOP = System::Word(0x3010);
-static _DELPHI_CONST System::Word VIEW_BOTTOM = System::Word(0x3020);
-static _DELPHI_CONST System::Word VIEW_LEFT = System::Word(0x3030);
-static _DELPHI_CONST System::Word VIEW_RIGHT = System::Word(0x3040);
-static _DELPHI_CONST System::Word VIEW_FRONT = System::Word(0x3050);
-static _DELPHI_CONST System::Word VIEW_BACK = System::Word(0x3060);
-static _DELPHI_CONST System::Word VIEW_USER = System::Word(0x3070);
-static _DELPHI_CONST System::Word VIEW_CAMERA = System::Word(0x3080);
-static _DELPHI_CONST System::Word VIEW_WINDOW = System::Word(0x3090);
-static _DELPHI_CONST System::Word NAMED_OBJECT = System::Word(0x4000);
-static _DELPHI_CONST System::Word OBJ_HIDDEN = System::Word(0x4010);
-static _DELPHI_CONST System::Word OBJ_VIS_LOFTER = System::Word(0x4011);
-static _DELPHI_CONST System::Word OBJ_DOESNT_CAST = System::Word(0x4012);
-static _DELPHI_CONST System::Word OBJ_MATTE = System::Word(0x4013);
-static _DELPHI_CONST System::Word OBJ_FAST = System::Word(0x4014);
-static _DELPHI_CONST System::Word OBJ_PROCEDURAL = System::Word(0x4015);
-static _DELPHI_CONST System::Word OBJ_FROZEN = System::Word(0x4016);
-static _DELPHI_CONST System::Word OBJ_DONT_RCVSHADOW = System::Word(0x4017);
-static _DELPHI_CONST System::Word N_TRI_OBJECT = System::Word(0x4100);
-static _DELPHI_CONST System::Word POINT_ARRAY = System::Word(0x4110);
-static _DELPHI_CONST System::Word POINT_FLAG_ARRAY = System::Word(0x4111);
-static _DELPHI_CONST System::Word FACE_ARRAY = System::Word(0x4120);
-static _DELPHI_CONST System::Word MSH_MAT_GROUP = System::Word(0x4130);
-static _DELPHI_CONST System::Word OLD_MAT_GROUP = System::Word(0x4131);
-static _DELPHI_CONST System::Word TEX_VERTS = System::Word(0x4140);
-static _DELPHI_CONST System::Word SMOOTH_GROUP = System::Word(0x4150);
-static _DELPHI_CONST System::Word MESH_MATRIX = System::Word(0x4160);
-static _DELPHI_CONST System::Word MESH_COLOR = System::Word(0x4165);
-static _DELPHI_CONST System::Word MESH_TEXTURE_INFO = System::Word(0x4170);
-static _DELPHI_CONST System::Word PROC_NAME = System::Word(0x4181);
-static _DELPHI_CONST System::Word PROC_DATA = System::Word(0x4182);
-static _DELPHI_CONST System::Word MSH_BOXMAP = System::Word(0x4190);
-static _DELPHI_CONST System::Word N_D_L_OLD = System::Word(0x4400);
-static _DELPHI_CONST System::Word N_CAM_OLD = System::Word(0x4500);
-static _DELPHI_CONST System::Word N_DIRECT_LIGHT = System::Word(0x4600);
-static _DELPHI_CONST System::Word DL_SPOTLIGHT = System::Word(0x4610);
-static _DELPHI_CONST System::Word DL_OFF = System::Word(0x4620);
-static _DELPHI_CONST System::Word DL_ATTENUATE = System::Word(0x4625);
-static _DELPHI_CONST System::Word DL_RAYSHAD = System::Word(0x4627);
-static _DELPHI_CONST System::Word DL_SHADOWED = System::Word(0x4630);
-static _DELPHI_CONST System::Word DL_LOCAL_SHADOW = System::Word(0x4640);
-static _DELPHI_CONST System::Word DL_LOCAL_SHADOW2 = System::Word(0x4641);
-static _DELPHI_CONST System::Word DL_SEE_CONE = System::Word(0x4650);
-static _DELPHI_CONST System::Word DL_SPOT_RECTANGULAR = System::Word(0x4651);
-static _DELPHI_CONST System::Word DL_SPOT_OVERSHOOT = System::Word(0x4652);
-static _DELPHI_CONST System::Word DL_SPOT_PROJECTOR = System::Word(0x4653);
-static _DELPHI_CONST System::Word DL_EXCLUDE = System::Word(0x4654);
-static _DELPHI_CONST System::Word DL_RANGE = System::Word(0x4655);
-static _DELPHI_CONST System::Word DL_SPOT_ROLL = System::Word(0x4656);
-static _DELPHI_CONST System::Word DL_SPOT_ASPECT = System::Word(0x4657);
-static _DELPHI_CONST System::Word DL_RAY_BIAS = System::Word(0x4658);
-static _DELPHI_CONST System::Word DL_INNER_RANGE = System::Word(0x4659);
-static _DELPHI_CONST System::Word DL_OUTER_RANGE = System::Word(0x465a);
-static _DELPHI_CONST System::Word DL_MULTIPLIER = System::Word(0x465b);
-static _DELPHI_CONST System::Word N_AMBIENT_LIGHT = System::Word(0x4680);
-static _DELPHI_CONST System::Word N_CAMERA = System::Word(0x4700);
-static _DELPHI_CONST System::Word CAM_SEE_CONE = System::Word(0x4710);
-static _DELPHI_CONST System::Word CAM_RANGES = System::Word(0x4720);
-static _DELPHI_CONST System::Word HIERARCHY = System::Word(0x4f00);
-static _DELPHI_CONST System::Word PARENT_OBJECT = System::Word(0x4f10);
-static _DELPHI_CONST System::Word PIVOT_OBJECT = System::Word(0x4f20);
-static _DELPHI_CONST System::Word PIVOT_LIMITS = System::Word(0x4f30);
-static _DELPHI_CONST System::Word PIVOT_ORDER = System::Word(0x4f40);
-static _DELPHI_CONST System::Word XLATE_RANGE = System::Word(0x4f50);
-static _DELPHI_CONST System::Word POLY_2D = System::Word(0x5000);
-static _DELPHI_CONST System::Word SHAPE_OK = System::Word(0x5010);
-static _DELPHI_CONST System::Word SHAPE_NOT_OK = System::Word(0x5011);
-static _DELPHI_CONST System::Word SHAPE_HOOK = System::Word(0x5020);
-static _DELPHI_CONST System::Word PATH_3D = System::Word(0x6000);
-static _DELPHI_CONST System::Word PATH_MATRIX = System::Word(0x6005);
-static _DELPHI_CONST System::Word SHAPE_2D = System::Word(0x6010);
-static _DELPHI_CONST System::Word M_SCALE = System::Word(0x6020);
-static _DELPHI_CONST System::Word M_TWIST = System::Word(0x6030);
-static _DELPHI_CONST System::Word M_TEETER = System::Word(0x6040);
-static _DELPHI_CONST System::Word M_FIT = System::Word(0x6050);
-static _DELPHI_CONST System::Word M_BEVEL = System::Word(0x6060);
-static _DELPHI_CONST System::Word XZ_CURVE = System::Word(0x6070);
-static _DELPHI_CONST System::Word YZ_CURVE = System::Word(0x6080);
-static _DELPHI_CONST System::Word INTERPCT = System::Word(0x6090);
-static _DELPHI_CONST System::Word DEFORM_LIMIT = System::Word(0x60a0);
-static _DELPHI_CONST System::Word USE_CONTOUR = System::Word(0x6100);
-static _DELPHI_CONST System::Word USE_TWEEN = System::Word(0x6110);
-static _DELPHI_CONST System::Word USE_SCALE = System::Word(0x6120);
-static _DELPHI_CONST System::Word USE_TWIST = System::Word(0x6130);
-static _DELPHI_CONST System::Word USE_TEETER = System::Word(0x6140);
-static _DELPHI_CONST System::Word USE_FIT = System::Word(0x6150);
-static _DELPHI_CONST System::Word USE_BEVEL = System::Word(0x6160);
-static _DELPHI_CONST System::Word VIEWPORT_LAYOUT_OLD = System::Word(0x7000);
-static _DELPHI_CONST System::Word VIEWPORT_DATA_OLD = System::Word(0x7010);
-static _DELPHI_CONST System::Word VIEWPORT_LAYOUT = System::Word(0x7001);
-static _DELPHI_CONST System::Word VIEWPORT_DATA = System::Word(0x7011);
-static _DELPHI_CONST System::Word VIEWPORT_DATA_3 = System::Word(0x7012);
-static _DELPHI_CONST System::Word VIEWPORT_SIZE = System::Word(0x7020);
-static _DELPHI_CONST System::Word NETWORK_VIEW = System::Word(0x7030);
-static _DELPHI_CONST System::Word XDATA_SECTION = System::Word(0x8000);
-static _DELPHI_CONST System::Word XDATA_ENTRY = System::Word(0x8001);
-static _DELPHI_CONST System::Word XDATA_APPNAME = System::Word(0x8002);
-static _DELPHI_CONST System::Word XDATA_STRING = System::Word(0x8003);
-static _DELPHI_CONST System::Word XDATA_FLOAT = System::Word(0x8004);
-static _DELPHI_CONST System::Word XDATA_DOUBLE = System::Word(0x8005);
-static _DELPHI_CONST System::Word XDATA_SHORT = System::Word(0x8006);
-static _DELPHI_CONST System::Word XDATA_LONG = System::Word(0x8007);
-static _DELPHI_CONST System::Word XDATA_VOID = System::Word(0x8008);
-static _DELPHI_CONST System::Word XDATA_GROUP = System::Word(0x8009);
-static _DELPHI_CONST System::Word XDATA_RFU6 = System::Word(0x800a);
-static _DELPHI_CONST System::Word XDATA_RFU5 = System::Word(0x800b);
-static _DELPHI_CONST System::Word XDATA_RFU4 = System::Word(0x800c);
-static _DELPHI_CONST System::Word XDATA_RFU3 = System::Word(0x800d);
-static _DELPHI_CONST System::Word XDATA_RFU2 = System::Word(0x800e);
-static _DELPHI_CONST System::Word XDATA_RFU1 = System::Word(0x800f);
-static _DELPHI_CONST System::Word PARENT_NAME = System::Word(0x80f0);
-static _DELPHI_CONST System::Word MAT_ENTRY = System::Word(0xafff);
-static _DELPHI_CONST System::Word MAT_NAME = System::Word(0xa000);
-static _DELPHI_CONST System::Word MAT_AMBIENT = System::Word(0xa010);
-static _DELPHI_CONST System::Word MAT_DIFFUSE = System::Word(0xa020);
-static _DELPHI_CONST System::Word MAT_SPECULAR = System::Word(0xa030);
-static _DELPHI_CONST System::Word MAT_SHININESS = System::Word(0xa040);
-static _DELPHI_CONST System::Word MAT_SHIN2PCT = System::Word(0xa041);
-static _DELPHI_CONST System::Word MAT_SHIN3PCT = System::Word(0xa042);
-static _DELPHI_CONST System::Word MAT_TRANSPARENCY = System::Word(0xa050);
-static _DELPHI_CONST System::Word MAT_XPFALL = System::Word(0xa052);
-static _DELPHI_CONST System::Word MAT_REFBLUR = System::Word(0xa053);
-static _DELPHI_CONST System::Word MAT_SELF_ILLUM = System::Word(0xa080);
-static _DELPHI_CONST System::Word MAT_TWO_SIDE = System::Word(0xa081);
-static _DELPHI_CONST System::Word MAT_DECAL = System::Word(0xa082);
-static _DELPHI_CONST System::Word MAT_ADDITIVE = System::Word(0xa083);
-static _DELPHI_CONST System::Word MAT_SELF_ILPCT = System::Word(0xa084);
-static _DELPHI_CONST System::Word MAT_WIRE = System::Word(0xa085);
-static _DELPHI_CONST System::Word MAT_SUPERSMP = System::Word(0xa086);
-static _DELPHI_CONST System::Word MAT_WIRESIZE = System::Word(0xa087);
-static _DELPHI_CONST System::Word MAT_FACEMAP = System::Word(0xa088);
-static _DELPHI_CONST System::Word MAT_XPFALLIN = System::Word(0xa08a);
-static _DELPHI_CONST System::Word MAT_PHONGSOFT = System::Word(0xa08c);
-static _DELPHI_CONST System::Word MAT_WIREABS = System::Word(0xa08e);
-static _DELPHI_CONST System::Word MAT_SHADING = System::Word(0xa100);
-static _DELPHI_CONST System::Word MAT_TEXMAP = System::Word(0xa200);
-static _DELPHI_CONST System::Word MAT_OPACMAP = System::Word(0xa210);
-static _DELPHI_CONST System::Word MAT_REFLMAP = System::Word(0xa220);
-static _DELPHI_CONST System::Word MAT_BUMPMAP = System::Word(0xa230);
-static _DELPHI_CONST System::Word MAT_SPECMAP = System::Word(0xa204);
-static _DELPHI_CONST System::Word MAT_USE_XPFALL = System::Word(0xa240);
-static _DELPHI_CONST System::Word MAT_USE_REFBLUR = System::Word(0xa250);
-static _DELPHI_CONST System::Word MAT_BUMP_PERCENT = System::Word(0xa252);
-static _DELPHI_CONST System::Word MAT_MAPNAME = System::Word(0xa300);
-static _DELPHI_CONST System::Word MAT_ACUBIC = System::Word(0xa310);
-static _DELPHI_CONST System::Word MAT_SXP_TEXT_DATA = System::Word(0xa320);
-static _DELPHI_CONST System::Word MAT_SXP_TEXT2_DATA = System::Word(0xa321);
-static _DELPHI_CONST System::Word MAT_SXP_OPAC_DATA = System::Word(0xa322);
-static _DELPHI_CONST System::Word MAT_SXP_BUMP_DATA = System::Word(0xa324);
-static _DELPHI_CONST System::Word MAT_SXP_SPEC_DATA = System::Word(0xa325);
-static _DELPHI_CONST System::Word MAT_SXP_SHIN_DATA = System::Word(0xa326);
-static _DELPHI_CONST System::Word MAT_SXP_SELFI_DATA = System::Word(0xa328);
-static _DELPHI_CONST System::Word MAT_SXP_TEXT_MASKDATA = System::Word(0xa32a);
-static _DELPHI_CONST System::Word MAT_SXP_TEXT2_MASKDATA = System::Word(0xa32c);
-static _DELPHI_CONST System::Word MAT_SXP_OPAC_MASKDATA = System::Word(0xa32e);
-static _DELPHI_CONST System::Word MAT_SXP_BUMP_MASKDATA = System::Word(0xa330);
-static _DELPHI_CONST System::Word MAT_SXP_SPEC_MASKDATA = System::Word(0xa332);
-static _DELPHI_CONST System::Word MAT_SXP_SHIN_MASKDATA = System::Word(0xa334);
-static _DELPHI_CONST System::Word MAT_SXP_SELFI_MASKDATA = System::Word(0xa336);
-static _DELPHI_CONST System::Word MAT_SXP_REFL_MASKDATA = System::Word(0xa338);
-static _DELPHI_CONST System::Word MAT_TEX2MAP = System::Word(0xa33a);
-static _DELPHI_CONST System::Word MAT_SHINMAP = System::Word(0xa33c);
-static _DELPHI_CONST System::Word MAT_SELFIMAP = System::Word(0xa33d);
-static _DELPHI_CONST System::Word MAT_TEXMASK = System::Word(0xa33e);
-static _DELPHI_CONST System::Word MAT_TEX2MASK = System::Word(0xa340);
-static _DELPHI_CONST System::Word MAT_OPACMASK = System::Word(0xa342);
-static _DELPHI_CONST System::Word MAT_BUMPMASK = System::Word(0xa344);
-static _DELPHI_CONST System::Word MAT_SHINMASK = System::Word(0xa346);
-static _DELPHI_CONST System::Word MAT_SPECMASK = System::Word(0xa348);
-static _DELPHI_CONST System::Word MAT_SELFIMASK = System::Word(0xa34a);
-static _DELPHI_CONST System::Word MAT_REFLMASK = System::Word(0xa34c);
-static _DELPHI_CONST System::Word MAT_MAP_TILINGOLD = System::Word(0xa350);
-static _DELPHI_CONST System::Word MAT_MAP_TILING = System::Word(0xa351);
-static _DELPHI_CONST System::Word MAT_MAP_TEXBLUR_OLD = System::Word(0xa352);
-static _DELPHI_CONST System::Word MAT_MAP_TEXBLUR = System::Word(0xa353);
-static _DELPHI_CONST System::Word MAT_MAP_USCALE = System::Word(0xa354);
-static _DELPHI_CONST System::Word MAT_MAP_VSCALE = System::Word(0xa356);
-static _DELPHI_CONST System::Word MAT_MAP_UOFFSET = System::Word(0xa358);
-static _DELPHI_CONST System::Word MAT_MAP_VOFFSET = System::Word(0xa35a);
-static _DELPHI_CONST System::Word MAT_MAP_ANG = System::Word(0xa35c);
-static _DELPHI_CONST System::Word MAT_MAP_COL1 = System::Word(0xa360);
-static _DELPHI_CONST System::Word MAT_MAP_COL2 = System::Word(0xa362);
-static _DELPHI_CONST System::Word MAT_MAP_RCOL = System::Word(0xa364);
-static _DELPHI_CONST System::Word MAT_MAP_GCOL = System::Word(0xa366);
-static _DELPHI_CONST System::Word MAT_MAP_BCOL = System::Word(0xa368);
-static _DELPHI_CONST System::Word KFDATA = System::Word(0xb000);
-static _DELPHI_CONST System::Word KFHDR = System::Word(0xb00a);
-static _DELPHI_CONST System::Word AMBIENT_NODE_TAG = System::Word(0xb001);
-static _DELPHI_CONST System::Word OBJECT_NODE_TAG = System::Word(0xb002);
-static _DELPHI_CONST System::Word CAMERA_NODE_TAG = System::Word(0xb003);
-static _DELPHI_CONST System::Word TARGET_NODE_TAG = System::Word(0xb004);
-static _DELPHI_CONST System::Word LIGHT_NODE_TAG = System::Word(0xb005);
-static _DELPHI_CONST System::Word L_TARGET_NODE_TAG = System::Word(0xb006);
-static _DELPHI_CONST System::Word SPOTLIGHT_NODE_TAG = System::Word(0xb007);
-static _DELPHI_CONST System::Word KFSEG = System::Word(0xb008);
-static _DELPHI_CONST System::Word KFCURTIME = System::Word(0xb009);
-static _DELPHI_CONST System::Word NODE_HDR = System::Word(0xb010);
-static _DELPHI_CONST System::Word INSTANCE_NAME = System::Word(0xb011);
-static _DELPHI_CONST System::Word PRESCALE = System::Word(0xb012);
-static _DELPHI_CONST System::Word PIVOT = System::Word(0xb013);
-static _DELPHI_CONST System::Word BOUNDBOX = System::Word(0xb014);
-static _DELPHI_CONST System::Word MORPH_SMOOTH = System::Word(0xb015);
-static _DELPHI_CONST System::Word POS_TRACK_TAG = System::Word(0xb020);
-static _DELPHI_CONST System::Word ROT_TRACK_TAG = System::Word(0xb021);
-static _DELPHI_CONST System::Word SCL_TRACK_TAG = System::Word(0xb022);
-static _DELPHI_CONST System::Word FOV_TRACK_TAG = System::Word(0xb023);
-static _DELPHI_CONST System::Word ROLL_TRACK_TAG = System::Word(0xb024);
-static _DELPHI_CONST System::Word COL_TRACK_TAG = System::Word(0xb025);
-static _DELPHI_CONST System::Word MORPH_TRACK_TAG = System::Word(0xb026);
-static _DELPHI_CONST System::Word HOT_TRACK_TAG = System::Word(0xb027);
-static _DELPHI_CONST System::Word FALL_TRACK_TAG = System::Word(0xb028);
-static _DELPHI_CONST System::Word HIDE_TRACK_TAG = System::Word(0xb029);
-static _DELPHI_CONST System::Word NODE_ID = System::Word(0xb030);
-static _DELPHI_CONST System::Word CMAGIC = System::Word(0xc23d);
-static _DELPHI_CONST System::Word C_MDRAWER = System::Word(0xc010);
-static _DELPHI_CONST System::Word C_TDRAWER = System::Word(0xc020);
-static _DELPHI_CONST System::Word C_SHPDRAWER = System::Word(0xc030);
-static _DELPHI_CONST System::Word C_MODDRAWER = System::Word(0xc040);
-static _DELPHI_CONST System::Word C_RIPDRAWER = System::Word(0xc050);
-static _DELPHI_CONST System::Word C_TXDRAWER = System::Word(0xc060);
-static _DELPHI_CONST System::Word C_PDRAWER = System::Word(0xc062);
-static _DELPHI_CONST System::Word C_MTLDRAWER = System::Word(0xc064);
-static _DELPHI_CONST System::Word C_FLIDRAWER = System::Word(0xc066);
-static _DELPHI_CONST System::Word C_CUBDRAWER = System::Word(0xc067);
-static _DELPHI_CONST System::Word C_MFILE = System::Word(0xc070);
-static _DELPHI_CONST System::Word C_SHPFILE = System::Word(0xc080);
-static _DELPHI_CONST System::Word C_MODFILE = System::Word(0xc090);
-static _DELPHI_CONST System::Word C_RIPFILE = System::Word(0xc0a0);
-static _DELPHI_CONST System::Word C_TXFILE = System::Word(0xc0b0);
-static _DELPHI_CONST System::Word C_PFILE = System::Word(0xc0b2);
-static _DELPHI_CONST System::Word C_MTLFILE = System::Word(0xc0b4);
-static _DELPHI_CONST System::Word C_FLIFILE = System::Word(0xc0b6);
-static _DELPHI_CONST System::Word C_PALFILE = System::Word(0xc0b8);
-static _DELPHI_CONST System::Word C_TX_STRING = System::Word(0xc0c0);
-static _DELPHI_CONST System::Word C_CONSTS = System::Word(0xc0d0);
-static _DELPHI_CONST System::Word C_SNAPS = System::Word(0xc0e0);
-static _DELPHI_CONST System::Word C_GRIDS = System::Word(0xc0f0);
-static _DELPHI_CONST System::Word C_ASNAPS = System::Word(0xc100);
-static _DELPHI_CONST System::Word C_GRID_RANGE = System::Word(0xc110);
-static _DELPHI_CONST System::Word C_RENDTYPE = System::Word(0xc120);
-static _DELPHI_CONST System::Word C_PROGMODE = System::Word(0xc130);
-static _DELPHI_CONST System::Word C_PREVMODE = System::Word(0xc140);
-static _DELPHI_CONST System::Word C_MODWMODE = System::Word(0xc150);
-static _DELPHI_CONST System::Word C_MODMODEL = System::Word(0xc160);
-static _DELPHI_CONST System::Word C_ALL_LINES = System::Word(0xc170);
-static _DELPHI_CONST System::Word C_BACK_TYPE = System::Word(0xc180);
-static _DELPHI_CONST System::Word C_MD_CS = System::Word(0xc190);
-static _DELPHI_CONST System::Word C_MD_CE = System::Word(0xc1a0);
-static _DELPHI_CONST System::Word C_MD_SML = System::Word(0xc1b0);
-static _DELPHI_CONST System::Word C_MD_SMW = System::Word(0xc1c0);
-static _DELPHI_CONST System::Word C_LOFT_WITH_TEXTURE = System::Word(0xc1c3);
-static _DELPHI_CONST System::Word C_LOFT_L_REPEAT = System::Word(0xc1c4);
-static _DELPHI_CONST System::Word C_LOFT_W_REPEAT = System::Word(0xc1c5);
-static _DELPHI_CONST System::Word C_LOFT_UV_NORMALIZE = System::Word(0xc1c6);
-static _DELPHI_CONST System::Word C_WELD_LOFT = System::Word(0xc1c7);
-static _DELPHI_CONST System::Word C_MD_PDET = System::Word(0xc1d0);
-static _DELPHI_CONST System::Word C_MD_SDET = System::Word(0xc1e0);
-static _DELPHI_CONST System::Word C_RGB_RMODE = System::Word(0xc1f0);
-static _DELPHI_CONST System::Word C_RGB_HIDE = System::Word(0xc200);
-static _DELPHI_CONST System::Word C_RGB_MAPSW = System::Word(0xc202);
-static _DELPHI_CONST System::Word C_RGB_TWOSIDE = System::Word(0xc204);
-static _DELPHI_CONST System::Word C_RGB_SHADOW = System::Word(0xc208);
-static _DELPHI_CONST System::Word C_RGB_AA = System::Word(0xc210);
-static _DELPHI_CONST System::Word C_RGB_OVW = System::Word(0xc220);
-static _DELPHI_CONST System::Word C_RGB_OVH = System::Word(0xc230);
-static _DELPHI_CONST System::Word C_RGB_PICTYPE = System::Word(0xc240);
-static _DELPHI_CONST System::Word C_RGB_OUTPUT = System::Word(0xc250);
-static _DELPHI_CONST System::Word C_RGB_TODISK = System::Word(0xc253);
-static _DELPHI_CONST System::Word C_RGB_COMPRESS = System::Word(0xc254);
-static _DELPHI_CONST System::Word C_JPEG_COMPRESSION = System::Word(0xc255);
-static _DELPHI_CONST System::Word C_RGB_DISPDEV = System::Word(0xc256);
-static _DELPHI_CONST System::Word C_RGB_HARDDEV = System::Word(0xc259);
-static _DELPHI_CONST System::Word C_RGB_PATH = System::Word(0xc25a);
-static _DELPHI_CONST System::Word C_BITMAP_DRAWER = System::Word(0xc25b);
-static _DELPHI_CONST System::Word C_RGB_FILE = System::Word(0xc260);
-static _DELPHI_CONST System::Word C_RGB_OVASPECT = System::Word(0xc270);
-static _DELPHI_CONST System::Word C_RGB_ANIMTYPE = System::Word(0xc271);
-static _DELPHI_CONST System::Word C_RENDER_ALL = System::Word(0xc272);
-static _DELPHI_CONST System::Word C_REND_FROM = System::Word(0xc273);
-static _DELPHI_CONST System::Word C_REND_TO = System::Word(0xc274);
-static _DELPHI_CONST System::Word C_REND_NTH = System::Word(0xc275);
-static _DELPHI_CONST System::Word C_PAL_TYPE = System::Word(0xc276);
-static _DELPHI_CONST System::Word C_RND_TURBO = System::Word(0xc277);
-static _DELPHI_CONST System::Word C_RND_MIP = System::Word(0xc278);
-static _DELPHI_CONST System::Word C_BGND_METHOD = System::Word(0xc279);
-static _DELPHI_CONST System::Word C_AUTO_REFLECT = System::Word(0xc27a);
-static _DELPHI_CONST System::Word C_VP_FROM = System::Word(0xc27b);
-static _DELPHI_CONST System::Word C_VP_TO = System::Word(0xc27c);
-static _DELPHI_CONST System::Word C_VP_NTH = System::Word(0xc27d);
-static _DELPHI_CONST System::Word C_REND_TSTEP = System::Word(0xc27e);
-static _DELPHI_CONST System::Word C_VP_TSTEP = System::Word(0xc27f);
-static _DELPHI_CONST System::Word C_SRDIAM = System::Word(0xc280);
-static _DELPHI_CONST System::Word C_SRDEG = System::Word(0xc290);
-static _DELPHI_CONST System::Word C_SRSEG = System::Word(0xc2a0);
-static _DELPHI_CONST System::Word C_SRDIR = System::Word(0xc2b0);
-static _DELPHI_CONST System::Word C_HETOP = System::Word(0xc2c0);
-static _DELPHI_CONST System::Word C_HEBOT = System::Word(0xc2d0);
-static _DELPHI_CONST System::Word C_HEHT = System::Word(0xc2e0);
-static _DELPHI_CONST System::Word C_HETURNS = System::Word(0xc2f0);
-static _DELPHI_CONST System::Word C_HEDEG = System::Word(0xc300);
-static _DELPHI_CONST System::Word C_HESEG = System::Word(0xc310);
-static _DELPHI_CONST System::Word C_HEDIR = System::Word(0xc320);
-static _DELPHI_CONST System::Word C_QUIKSTUFF = System::Word(0xc330);
-static _DELPHI_CONST System::Word C_SEE_LIGHTS = System::Word(0xc340);
-static _DELPHI_CONST System::Word C_SEE_CAMERAS = System::Word(0xc350);
-static _DELPHI_CONST System::Word C_SEE_3D = System::Word(0xc360);
-static _DELPHI_CONST System::Word C_MESHSEL = System::Word(0xc370);
-static _DELPHI_CONST System::Word C_MESHUNSEL = System::Word(0xc380);
-static _DELPHI_CONST System::Word C_POLYSEL = System::Word(0xc390);
-static _DELPHI_CONST System::Word C_POLYUNSEL = System::Word(0xc3a0);
-static _DELPHI_CONST System::Word C_SHPLOCAL = System::Word(0xc3a2);
-static _DELPHI_CONST System::Word C_MSHLOCAL = System::Word(0xc3a4);
-static _DELPHI_CONST System::Word C_NUM_FORMAT = System::Word(0xc3b0);
-static _DELPHI_CONST System::Word C_ARCH_DENOM = System::Word(0xc3c0);
-static _DELPHI_CONST System::Word C_IN_DEVICE = System::Word(0xc3d0);
-static _DELPHI_CONST System::Word C_MSCALE = System::Word(0xc3e0);
-static _DELPHI_CONST System::Word C_COMM_PORT = System::Word(0xc3f0);
-static _DELPHI_CONST System::Word C_TAB_BASES = System::Word(0xc400);
-static _DELPHI_CONST System::Word C_TAB_DIVS = System::Word(0xc410);
-static _DELPHI_CONST System::Word C_MASTER_SCALES = System::Word(0xc420);
-static _DELPHI_CONST System::Word C_SHOW_1STVERT = System::Word(0xc430);
-static _DELPHI_CONST System::Word C_SHAPER_OK = System::Word(0xc440);
-static _DELPHI_CONST System::Word C_LOFTER_OK = System::Word(0xc450);
-static _DELPHI_CONST System::Word C_EDITOR_OK = System::Word(0xc460);
-static _DELPHI_CONST System::Word C_KEYFRAMER_OK = System::Word(0xc470);
-static _DELPHI_CONST System::Word C_PICKSIZE = System::Word(0xc480);
-static _DELPHI_CONST System::Word C_MAPTYPE = System::Word(0xc490);
-static _DELPHI_CONST System::Word C_MAP_DISPLAY = System::Word(0xc4a0);
-static _DELPHI_CONST System::Word C_TILE_XY = System::Word(0xc4b0);
-static _DELPHI_CONST System::Word C_MAP_XYZ = System::Word(0xc4c0);
-static _DELPHI_CONST System::Word C_MAP_SCALE = System::Word(0xc4d0);
-static _DELPHI_CONST System::Word C_MAP_MATRIX_OLD = System::Word(0xc4e0);
-static _DELPHI_CONST System::Word C_MAP_MATRIX = System::Word(0xc4e1);
-static _DELPHI_CONST System::Word C_MAP_WID_HT = System::Word(0xc4f0);
-static _DELPHI_CONST System::Word C_OBNAME = System::Word(0xc500);
-static _DELPHI_CONST System::Word C_CAMNAME = System::Word(0xc510);
-static _DELPHI_CONST System::Word C_LTNAME = System::Word(0xc520);
-static _DELPHI_CONST System::Word C_CUR_MNAME = System::Word(0xc525);
-static _DELPHI_CONST System::Word C_CURMTL_FROM_MESH = System::Word(0xc526);
-static _DELPHI_CONST System::Word C_GET_SHAPE_MAKE_FACES = System::Word(0xc527);
-static _DELPHI_CONST System::Word C_DETAIL = System::Word(0xc530);
-static _DELPHI_CONST System::Word C_VERTMARK = System::Word(0xc540);
-static _DELPHI_CONST System::Word C_MSHAX = System::Word(0xc550);
-static _DELPHI_CONST System::Word C_MSHCP = System::Word(0xc560);
-static _DELPHI_CONST System::Word C_USERAX = System::Word(0xc570);
-static _DELPHI_CONST System::Word C_SHOOK = System::Word(0xc580);
-static _DELPHI_CONST System::Word C_RAX = System::Word(0xc590);
-static _DELPHI_CONST System::Word C_STAPE = System::Word(0xc5a0);
-static _DELPHI_CONST System::Word C_LTAPE = System::Word(0xc5b0);
-static _DELPHI_CONST System::Word C_ETAPE = System::Word(0xc5c0);
-static _DELPHI_CONST System::Word C_KTAPE = System::Word(0xc5c8);
-static _DELPHI_CONST System::Word C_SPHSEGS = System::Word(0xc5d0);
-static _DELPHI_CONST System::Word C_GEOSMOOTH = System::Word(0xc5e0);
-static _DELPHI_CONST System::Word C_HEMISEGS = System::Word(0xc5f0);
-static _DELPHI_CONST System::Word C_PRISMSEGS = System::Word(0xc600);
-static _DELPHI_CONST System::Word C_PRISMSIDES = System::Word(0xc610);
-static _DELPHI_CONST System::Word C_TUBESEGS = System::Word(0xc620);
-static _DELPHI_CONST System::Word C_TUBESIDES = System::Word(0xc630);
-static _DELPHI_CONST System::Word C_TORSEGS = System::Word(0xc640);
-static _DELPHI_CONST System::Word C_TORSIDES = System::Word(0xc650);
-static _DELPHI_CONST System::Word C_CONESIDES = System::Word(0xc660);
-static _DELPHI_CONST System::Word C_CONESEGS = System::Word(0xc661);
-static _DELPHI_CONST System::Word C_NGPARMS = System::Word(0xc670);
-static _DELPHI_CONST System::Word C_PTHLEVEL = System::Word(0xc680);
-static _DELPHI_CONST System::Word C_MSCSYM = System::Word(0xc690);
-static _DELPHI_CONST System::Word C_MFTSYM = System::Word(0xc6a0);
-static _DELPHI_CONST System::Word C_MTTSYM = System::Word(0xc6b0);
-static _DELPHI_CONST System::Word C_SMOOTHING = System::Word(0xc6c0);
-static _DELPHI_CONST System::Word C_MODICOUNT = System::Word(0xc6d0);
-static _DELPHI_CONST System::Word C_FONTSEL = System::Word(0xc6e0);
-static _DELPHI_CONST System::Word C_TESS_TYPE = System::Word(0xc6f0);
-static _DELPHI_CONST System::Word C_TESS_TENSION = System::Word(0xc6f1);
-static _DELPHI_CONST System::Word C_SEG_START = System::Word(0xc700);
-static _DELPHI_CONST System::Word C_SEG_END = System::Word(0xc705);
-static _DELPHI_CONST System::Word C_CURTIME = System::Word(0xc710);
-static _DELPHI_CONST System::Word C_ANIMLENGTH = System::Word(0xc715);
-static _DELPHI_CONST System::Word C_PV_FROM = System::Word(0xc720);
-static _DELPHI_CONST System::Word C_PV_TO = System::Word(0xc725);
-static _DELPHI_CONST System::Word C_PV_DOFNUM = System::Word(0xc730);
-static _DELPHI_CONST System::Word C_PV_RNG = System::Word(0xc735);
-static _DELPHI_CONST System::Word C_PV_NTH = System::Word(0xc740);
-static _DELPHI_CONST System::Word C_PV_TYPE = System::Word(0xc745);
-static _DELPHI_CONST System::Word C_PV_METHOD = System::Word(0xc750);
-static _DELPHI_CONST System::Word C_PV_FPS = System::Word(0xc755);
-static _DELPHI_CONST System::Word C_VTR_FRAMES = System::Word(0xc765);
-static _DELPHI_CONST System::Word C_VTR_HDTL = System::Word(0xc770);
-static _DELPHI_CONST System::Word C_VTR_HD = System::Word(0xc771);
-static _DELPHI_CONST System::Word C_VTR_TL = System::Word(0xc772);
-static _DELPHI_CONST System::Word C_VTR_IN = System::Word(0xc775);
-static _DELPHI_CONST System::Word C_VTR_PK = System::Word(0xc780);
-static _DELPHI_CONST System::Word C_VTR_SH = System::Word(0xc785);
-static _DELPHI_CONST System::Word C_WORK_MTLS = System::Word(0xc790);
-static _DELPHI_CONST System::Word C_WORK_MTLS_2 = System::Word(0xc792);
-static _DELPHI_CONST System::Word C_WORK_MTLS_3 = System::Word(0xc793);
-static _DELPHI_CONST System::Word C_WORK_MTLS_4 = System::Word(0xc794);
-static _DELPHI_CONST System::Word C_WORK_MTLS_5 = System::Word(0xcb00);
-static _DELPHI_CONST System::Word C_WORK_MTLS_6 = System::Word(0xcb01);
-static _DELPHI_CONST System::Word C_WORK_MTLS_7 = System::Word(0xcb02);
-static _DELPHI_CONST System::Word C_WORK_MTLS_8 = System::Word(0xcb03);
-static _DELPHI_CONST System::Word C_WORKMTL = System::Word(0xcb04);
-static _DELPHI_CONST System::Word C_SXP_TEXT_DATA = System::Word(0xcb10);
-static _DELPHI_CONST System::Word C_SXP_TEXT2_DATA = System::Word(0xcb20);
-static _DELPHI_CONST System::Word C_SXP_OPAC_DATA = System::Word(0xcb11);
-static _DELPHI_CONST System::Word C_SXP_BUMP_DATA = System::Word(0xcb12);
-static _DELPHI_CONST System::Word C_SXP_SPEC_DATA = System::Word(0xcb24);
-static _DELPHI_CONST System::Word C_SXP_SHIN_DATA = System::Word(0xcb13);
-static _DELPHI_CONST System::Word C_SXP_SELFI_DATA = System::Word(0xcb28);
-static _DELPHI_CONST System::Word C_SXP_TEXT_MASKDATA = System::Word(0xcb30);
-static _DELPHI_CONST System::Word C_SXP_TEXT2_MASKDATA = System::Word(0xcb32);
-static _DELPHI_CONST System::Word C_SXP_OPAC_MASKDATA = System::Word(0xcb34);
-static _DELPHI_CONST System::Word C_SXP_BUMP_MASKDATA = System::Word(0xcb36);
-static _DELPHI_CONST System::Word C_SXP_SPEC_MASKDATA = System::Word(0xcb38);
-static _DELPHI_CONST System::Word C_SXP_SHIN_MASKDATA = System::Word(0xcb3a);
-static _DELPHI_CONST System::Word C_SXP_SELFI_MASKDATA = System::Word(0xc3cb);
-static _DELPHI_CONST System::Word C_SXP_REFL_MASKDATA = System::Word(0xcb3e);
-static _DELPHI_CONST System::Word C_BGTYPE = System::Word(0xc7a1);
-static _DELPHI_CONST System::Word C_MEDTILE = System::Word(0xc7b0);
-static _DELPHI_CONST System::Word C_LO_CONTRAST = System::Word(0xc7d0);
-static _DELPHI_CONST System::Word C_HI_CONTRAST = System::Word(0xc7d1);
-static _DELPHI_CONST System::Word C_FROZ_DISPLAY = System::Word(0xc7e0);
-static _DELPHI_CONST System::Word C_BOOLWELD = System::Word(0xc7f0);
-static _DELPHI_CONST System::Word C_BOOLTYPE = System::Word(0xc7f1);
-static _DELPHI_CONST System::Word C_ANG_THRESH = System::Word(0xc900);
-static _DELPHI_CONST System::Word C_SS_THRESH = System::Word(0xc901);
-static _DELPHI_CONST System::Word C_TEXTURE_BLUR_DEFAULT = System::Word(0xc903);
-static _DELPHI_CONST System::Word C_MAPDRAWER = System::Word(0xca00);
-static _DELPHI_CONST System::Word C_MAPDRAWER1 = System::Word(0xca01);
-static _DELPHI_CONST System::Word C_MAPDRAWER2 = System::Word(0xca02);
-static _DELPHI_CONST System::Word C_MAPDRAWER3 = System::Word(0xca03);
-static _DELPHI_CONST System::Word C_MAPDRAWER4 = System::Word(0xca04);
-static _DELPHI_CONST System::Word C_MAPDRAWER5 = System::Word(0xca05);
-static _DELPHI_CONST System::Word C_MAPDRAWER6 = System::Word(0xca06);
-static _DELPHI_CONST System::Word C_MAPDRAWER7 = System::Word(0xca07);
-static _DELPHI_CONST System::Word C_MAPDRAWER8 = System::Word(0xca08);
-static _DELPHI_CONST System::Word C_MAPDRAWER9 = System::Word(0xca09);
-static _DELPHI_CONST System::Word C_MAPDRAWER_ENTRY = System::Word(0xca10);
-static _DELPHI_CONST System::Word C_BACKUP_FILE = System::Word(0xca20);
-static _DELPHI_CONST System::Word C_DITHER_256 = System::Word(0xca21);
-static _DELPHI_CONST System::Word C_SAVE_LAST = System::Word(0xca22);
-static _DELPHI_CONST System::Word C_USE_ALPHA = System::Word(0xca23);
-static _DELPHI_CONST System::Word C_TGA_DEPTH = System::Word(0xca24);
-static _DELPHI_CONST System::Word C_REND_FIELDS = System::Word(0xca25);
-static _DELPHI_CONST System::Word C_REFLIP = System::Word(0xca26);
-static _DELPHI_CONST System::Word C_SEL_ITEMTOG = System::Word(0xca27);
-static _DELPHI_CONST System::Word C_SEL_RESET = System::Word(0xca28);
-static _DELPHI_CONST System::Word C_STICKY_KEYINF = System::Word(0xca29);
-static _DELPHI_CONST System::Word C_WELD_THRESHOLD = System::Word(0xca2a);
-static _DELPHI_CONST System::Word C_ZCLIP_POINT = System::Word(0xca2b);
-static _DELPHI_CONST System::Word C_ALPHA_SPLIT = System::Word(0xca2c);
-static _DELPHI_CONST System::Word C_KF_SHOW_BACKFACE = System::Word(0xca30);
-static _DELPHI_CONST System::Word C_OPTIMIZE_LOFT = System::Word(0xca40);
-static _DELPHI_CONST System::Word C_TENS_DEFAULT = System::Word(0xca42);
-static _DELPHI_CONST System::Word C_CONT_DEFAULT = System::Word(0xca44);
-static _DELPHI_CONST System::Word C_BIAS_DEFAULT = System::Word(0xca46);
-static _DELPHI_CONST System::Word C_DXFNAME_SRC = System::Word(0xca50);
-static _DELPHI_CONST System::Word C_AUTO_WELD = System::Word(0xca60);
-static _DELPHI_CONST System::Word C_AUTO_UNIFY = System::Word(0xca70);
-static _DELPHI_CONST System::Word C_AUTO_SMOOTH = System::Word(0xca80);
-static _DELPHI_CONST System::Word C_DXF_SMOOTH_ANG = System::Word(0xca90);
-static _DELPHI_CONST System::Word C_SMOOTH_ANG = System::Word(0xcaa0);
-static _DELPHI_CONST System::Word C_NET_USE_VPOST = System::Word(0xcc00);
-static _DELPHI_CONST System::Word C_NET_USE_GAMMA = System::Word(0xcc10);
-static _DELPHI_CONST System::Word C_NET_FIELD_ORDER = System::Word(0xcc20);
-static _DELPHI_CONST System::Word C_BLUR_FRAMES = System::Word(0xcd00);
-static _DELPHI_CONST System::Word C_BLUR_SAMPLES = System::Word(0xcd10);
-static _DELPHI_CONST System::Word C_BLUR_DUR = System::Word(0xcd20);
-static _DELPHI_CONST System::Word C_HOT_METHOD = System::Word(0xcd30);
-static _DELPHI_CONST System::Word C_HOT_CHECK = System::Word(0xcd40);
-static _DELPHI_CONST System::Word C_PIXEL_SIZE = System::Word(0xcd50);
-static _DELPHI_CONST System::Word C_DISP_GAMMA = System::Word(0xcd60);
-static _DELPHI_CONST System::Word C_FBUF_GAMMA = System::Word(0xcd70);
-static _DELPHI_CONST System::Word C_FILE_OUT_GAMMA = System::Word(0xcd80);
-static _DELPHI_CONST System::Word C_FILE_IN_GAMMA = System::Word(0xcd82);
-static _DELPHI_CONST System::Word C_GAMMA_CORRECT = System::Word(0xcd84);
-static _DELPHI_CONST System::Word C_APPLY_DISP_GAMMA = System::Word(0xcd90);
-static _DELPHI_CONST System::Word C_APPLY_FBUF_GAMMA = System::Word(0xcda0);
-static _DELPHI_CONST System::Word C_APPLY_FILE_GAMMA = System::Word(0xcdb0);
-static _DELPHI_CONST System::Word C_FORCE_WIRE = System::Word(0xcdc0);
-static _DELPHI_CONST System::Word C_RAY_SHADOWS = System::Word(0xcdd0);
-static _DELPHI_CONST System::Word C_MASTER_AMBIENT = System::Word(0xcde0);
-static _DELPHI_CONST System::Word C_SUPER_SAMPLE = System::Word(0xcdf0);
-static _DELPHI_CONST System::Word C_OBJECT_MBLUR = System::Word(0xce00);
-static _DELPHI_CONST System::Word C_MBLUR_DITHER = System::Word(0xce10);
-static _DELPHI_CONST System::Word C_DITHER_24 = System::Word(0xce20);
-static _DELPHI_CONST System::Word C_SUPER_BLACK = System::Word(0xce30);
-static _DELPHI_CONST System::Word C_SAFE_FRAME = System::Word(0xce40);
-static _DELPHI_CONST System::Word C_VIEW_PRES_RATIO = System::Word(0xce50);
-static _DELPHI_CONST System::Word C_BGND_PRES_RATIO = System::Word(0xce60);
-static _DELPHI_CONST System::Word C_NTH_SERIAL_NUM = System::Word(0xce70);
-static _DELPHI_CONST System::Word VPDATA = System::Word(0xd000);
-static _DELPHI_CONST System::Word P_QUEUE_ENTRY = System::Word(0xd100);
-static _DELPHI_CONST System::Word P_QUEUE_IMAGE = System::Word(0xd110);
-static _DELPHI_CONST System::Word P_QUEUE_USEIGAMMA = System::Word(0xd114);
-static _DELPHI_CONST System::Word P_QUEUE_PROC = System::Word(0xd120);
-static _DELPHI_CONST System::Word P_QUEUE_SOLID = System::Word(0xd130);
-static _DELPHI_CONST System::Word P_QUEUE_GRADIENT = System::Word(0xd140);
-static _DELPHI_CONST System::Word P_QUEUE_KF = System::Word(0xd150);
-static _DELPHI_CONST System::Word P_QUEUE_MOTBLUR = System::Word(0xd152);
-static _DELPHI_CONST System::Word P_QUEUE_MB_REPEAT = System::Word(0xd153);
-static _DELPHI_CONST System::Word P_QUEUE_NONE = System::Word(0xd160);
-static _DELPHI_CONST System::Word P_QUEUE_RESIZE = System::Word(0xd180);
-static _DELPHI_CONST System::Word P_QUEUE_OFFSET = System::Word(0xd185);
-static _DELPHI_CONST System::Word P_QUEUE_ALIGN = System::Word(0xd190);
-static _DELPHI_CONST System::Word P_CUSTOM_SIZE = System::Word(0xd1a0);
-static _DELPHI_CONST System::Word P_ALPH_NONE = System::Word(0xd210);
-static _DELPHI_CONST System::Word P_ALPH_PSEUDO = System::Word(0xd220);
-static _DELPHI_CONST System::Word P_ALPH_OP_PSEUDO = System::Word(0xd221);
-static _DELPHI_CONST System::Word P_ALPH_BLUR = System::Word(0xd222);
-static _DELPHI_CONST System::Word P_ALPH_PCOL = System::Word(0xd225);
-static _DELPHI_CONST System::Word P_ALPH_C0 = System::Word(0xd230);
-static _DELPHI_CONST System::Word P_ALPH_OP_KEY = System::Word(0xd231);
-static _DELPHI_CONST System::Word P_ALPH_KCOL = System::Word(0xd235);
-static _DELPHI_CONST System::Word P_ALPH_OP_NOCONV = System::Word(0xd238);
-static _DELPHI_CONST System::Word P_ALPH_IMAGE = System::Word(0xd240);
-static _DELPHI_CONST System::Word P_ALPH_ALPHA = System::Word(0xd250);
-static _DELPHI_CONST System::Word P_ALPH_QUES = System::Word(0xd260);
-static _DELPHI_CONST System::Word P_ALPH_QUEIMG = System::Word(0xd265);
-static _DELPHI_CONST System::Word P_ALPH_CUTOFF = System::Word(0xd270);
-static _DELPHI_CONST System::Word P_ALPHANEG = System::Word(0xd280);
-static _DELPHI_CONST System::Word P_TRAN_NONE = System::Word(0xd300);
-static _DELPHI_CONST System::Word P_TRAN_IMAGE = System::Word(0xd310);
-static _DELPHI_CONST System::Word P_TRAN_FRAMES = System::Word(0xd312);
-static _DELPHI_CONST System::Word P_TRAN_FADEIN = System::Word(0xd320);
-static _DELPHI_CONST System::Word P_TRAN_FADEOUT = System::Word(0xd330);
-static _DELPHI_CONST System::Word P_TRANNEG = System::Word(0xd340);
-static _DELPHI_CONST System::Word P_RANGES = System::Word(0xd400);
-static _DELPHI_CONST System::Word P_PROC_DATA = System::Word(0xd500);
-static _DELPHI_CONST System::Int8 NodeTagCount = System::Int8(0x6);
-extern DELPHI_PACKAGE System::StaticArray<System::Word, 6> NodeTags;
-}	/* namespace M3dsconst */
-}	/* namespace Formats */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS_M3DSCONST)
-using namespace Formats::M3dsconst;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS)
-using namespace Formats;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// Formats_m3DSConstHPP

include/Win32/Formats.m3DSTypes.hpp

@@ -1,2044 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'Formats.m3DSTypes.pas' rev: 36.00 (Windows)
-
-#ifndef Formats_m3DSTypesHPP
-#define Formats_m3DSTypesHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <System.Classes.hpp>
-#include <System.SysUtils.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Formats
-{
-namespace M3dstypes
-{
-//-- forward type declarations -----------------------------------------------
-struct TPoint3DS;
-struct TFColor3DS;
-struct TFace3DS;
-struct TTexVert3DS;
-struct TTrackHeader3DS;
-struct TKeyHeader3DS;
-struct TKFRotKey3DS;
-struct TChunkListEntry3DS;
-struct TChunkList3DS;
-struct TNodeList;
-struct TDatabase3DS;
-struct TViewSize3DS;
-struct TOrthoView3DS;
-struct TUserView3DS;
-struct TViewport3DS;
-struct TShadowSets3DS;
-struct TMeshSet3DS;
-struct TFogSettings3DS;
-struct TLayerFogSettings3DS;
-struct TDCueSettings3DS;
-struct TAtmosphere3DS;
-struct TVGradientBgnd3DS;
-struct TBackground3DS;
-struct TACubic3DS;
-struct TBitmap3DS;
-struct TMapSet3DS;
-struct TRMapSet3DS;
-struct TMaterial3DS;
-struct TMapInfo3DS;
-struct TObjMat3DS;
-struct TMesh3DS;
-struct TSpotShadow3DS;
-struct TSpotCone3DS;
-struct TSpotProjector3DS;
-struct TSpotLight3DS;
-struct TLiteAttenuate3DS;
-struct TLight3DS;
-struct TCamRanges3DS;
-struct TCamera3DS;
-struct TKFKeyInfo3DS;
-struct TKFSegment3DS;
-struct TKFSets3DS;
-struct TKFCamera3DS;
-struct TKFAmbient3DS;
-struct TKFMesh3DS;
-struct TKFOmni3DS;
-struct TKFSpot3DS;
-struct TXDataRaw3DS;
-struct TColorF;
-struct TColor24;
-struct TFog;
-struct TLayerFog;
-struct TDistanceCue;
-struct TViewStandard;
-struct TViewUser;
-struct TMatAcubic;
-struct TIpasData;
-struct TPointArray;
-struct TPointFlagArray;
-struct TFaceArray;
-struct TMshMatGroup;
-struct TSmoothGroup;
-struct TTexVerts;
-struct TMeshTextureInfo;
-struct TDlSpotlight;
-struct TDlLocalShadow2;
-struct TNCamera;
-struct TCamRanges;
-struct TViewportLayout;
-struct TViewportSize;
-struct TViewportData;
-struct TKFHdr;
-struct TKFSeg;
-struct TNodeHdr;
-struct TBoundBox;
-struct TPosTrackTag;
-struct TColTrackTag;
-struct TRotTrackTag;
-struct TScaleTrackTag;
-struct TMorphTrackTag;
-struct THideTrackTag;
-struct TFovTrackTag;
-struct TRollTrackTag;
-struct THotTrackTag;
-struct TFallTrackTag;
-struct TXDataEntry;
-struct TChunkData;
-struct TChunk3DS;
-//-- type declarations -------------------------------------------------------
-enum DECLSPEC_DENUM TDumpLevel : unsigned int { dlTerseDump, dlMediumDump, dlMaximumDump };
-
-typedef char * PChar3DS;
-
-typedef System::UTF8String String3DS;
-
-typedef System::SmallString<64> String64;
-
-typedef System::StaticArray<System::Word, 536870912> TWordList;
-
-typedef TWordList *PWordList;
-
-typedef System::StaticArray<int, 268435456> TIntegerArray;
-
-typedef TIntegerArray *PIntegerArray;
-
-typedef System::StaticArray<unsigned, 268435456> TCardinalArray;
-
-typedef TCardinalArray *PCardinalArray;
-
-typedef System::StaticArray<float, 268435456> TSingleList;
-
-typedef TSingleList *PSingleList;
-
-typedef TPoint3DS *PPoint3DS;
-
-struct DECLSPEC_DRECORD TPoint3DS
-{
-public:
-	float X;
-	float Y;
-	float Z;
-};
-
-
-typedef System::StaticArray<TPoint3DS, 89478486> TPointList;
-
-typedef TPointList *PPointList;
-
-typedef TFColor3DS *PFColor3DS;
-
-struct DECLSPEC_DRECORD TFColor3DS
-{
-public:
-	float R;
-	float G;
-	float B;
-};
-
-
-typedef System::StaticArray<TFColor3DS, 89478486> TFColorList;
-
-typedef TFColorList *PFColorList;
-
-typedef TFace3DS *PFace3DS;
-
-#pragma pack(push,1)
-struct DECLSPEC_DRECORD TFace3DS
-{
-	
-public:
-	union
-	{
-		struct 
-		{
-			System::StaticArray<System::Word, 4> FaceRec;
-		};
-		struct 
-		{
-			System::Word V1;
-			System::Word V2;
-			System::Word V3;
-			System::Word Flag;
-		};
-		
-	};
-};
-#pragma pack(pop)
-
-
-typedef System::StaticArray<TFace3DS, 134217728> TFaceList;
-
-typedef TFaceList *PFaceList;
-
-typedef TTexVert3DS *PTexVert3DS;
-
-struct DECLSPEC_DRECORD TTexVert3DS
-{
-public:
-	float U;
-	float V;
-};
-
-
-typedef System::StaticArray<TTexVert3DS, 134217728> TTexVertList;
-
-typedef TTexVertList *PTexVertList;
-
-typedef TTrackHeader3DS *PTrackHeader3DS;
-
-struct DECLSPEC_DRECORD TTrackHeader3DS
-{
-public:
-	System::Word Flags;
-	int nu1;
-	int nu2;
-	int KeyCount;
-};
-
-
-typedef TKeyHeader3DS *PKeyHeader3DS;
-
-struct DECLSPEC_DRECORD TKeyHeader3DS
-{
-public:
-	int Time;
-	System::Word RFlags;
-	float Tension;
-	float Continuity;
-	float Bias;
-	float EaseTo;
-	float EaseFrom;
-};
-
-
-typedef System::StaticArray<TKeyHeader3DS, 38347923> TKeyHeaderList;
-
-typedef TKeyHeaderList *PKeyHeaderList;
-
-typedef TKFRotKey3DS *PKFRotKey3DS;
-
-struct DECLSPEC_DRECORD TKFRotKey3DS
-{
-public:
-	float Angle;
-	float X;
-	float Y;
-	float Z;
-};
-
-
-typedef System::StaticArray<TKFRotKey3DS, 67108864> TKFRotKeyList;
-
-typedef TKFRotKeyList *PKFRotKeyList;
-
-typedef System::UnicodeString *PKFMorphKey3DS;
-
-typedef System::UnicodeString TKFMorphKey3DS;
-
-typedef System::StaticArray<System::UnicodeString, 268435456> TKFMorphKeyList;
-
-typedef TKFMorphKeyList *PKFMorphKeyList;
-
-typedef TChunk3DS *PChunk3DS;
-
-typedef TChunkListEntry3DS *PChunkListEntry3DS;
-
-struct DECLSPEC_DRECORD TChunkListEntry3DS
-{
-public:
-	System::UnicodeString NameStr;
-	PChunk3DS Chunk;
-};
-
-
-typedef System::StaticArray<TChunkListEntry3DS, 134217728> TChunkList;
-
-typedef TChunkList *PChunkList;
-
-typedef TChunkList3DS *PChunkList3DS;
-
-struct DECLSPEC_DRECORD TChunkList3DS
-{
-public:
-	int Count;
-	PChunkList List;
-};
-
-
-enum DECLSPEC_DENUM TDBType3DS : unsigned int { dbUnknown, dbMeshFile, dbProjectFile, dbMaterialFile };
-
-typedef TNodeList *PNodeList;
-
-struct DECLSPEC_DRECORD TNodeList
-{
-public:
-	short ID;
-	System::Word Tag;
-	System::UnicodeString Name;
-	System::UnicodeString InstStr;
-	short ParentID;
-	PNodeList Next;
-};
-
-
-typedef TDatabase3DS *PDatabase3DS;
-
-struct DECLSPEC_DRECORD TDatabase3DS
-{
-public:
-	PChunk3DS TopChunk;
-	bool ObjListDirty;
-	bool MatListDirty;
-	bool NodeListDirty;
-	PChunkList3DS ObjList;
-	PChunkList3DS MatList;
-	PChunkList3DS NodeList;
-};
-
-
-enum DECLSPEC_DENUM TViewType3DS : unsigned int { vtNoView3DS, vtTopView3DS, vtBottomView3DS, vtLeftView3DS, vtRightView3DS, vtFrontView3DS, vtBackView3DS, vtUserView3DS, vtCameraView3DS, vtSpotlightView3DS };
-
-typedef TViewSize3DS *PViewSize3DS;
-
-struct DECLSPEC_DRECORD TViewSize3DS
-{
-public:
-	System::Word XPos;
-	System::Word YPos;
-	System::Word Width;
-	System::Word Height;
-};
-
-
-typedef TOrthoView3DS *POrthoView3DS;
-
-struct DECLSPEC_DRECORD TOrthoView3DS
-{
-public:
-	TPoint3DS Center;
-	float Zoom;
-};
-
-
-typedef TUserView3DS *PUserView3DS;
-
-struct DECLSPEC_DRECORD TUserView3DS
-{
-public:
-	TPoint3DS Center;
-	float Zoom;
-	float HorAng;
-	float VerAng;
-};
-
-
-typedef TViewport3DS *PViewport3DS;
-
-struct DECLSPEC_DRECORD TViewport3DS
-{
-public:
-	TViewType3DS AType;
-	TViewSize3DS Size;
-	TOrthoView3DS Ortho;
-	TUserView3DS User;
-	System::UnicodeString CameraStr;
-};
-
-
-enum DECLSPEC_DENUM TShadowStyle3DS : unsigned int { ssUseShadowMap, ssUseRayTraceShadow };
-
-typedef TShadowSets3DS *PShadowSets3DS;
-
-struct DECLSPEC_DRECORD TShadowSets3DS
-{
-public:
-	TShadowStyle3DS AType;
-	float Bias;
-	float RayBias;
-	short MapSize;
-	float Filter;
-};
-
-
-typedef TMeshSet3DS *PMeshSet3DS;
-
-struct DECLSPEC_DRECORD TMeshSet3DS
-{
-public:
-	float MasterScale;
-	TShadowSets3DS Shadow;
-	TFColor3DS AmbientLight;
-	TPoint3DS OConsts;
-};
-
-
-enum DECLSPEC_DENUM TAtmosphereType3DS : unsigned int { atNoAtmo, atUseFog, atUseLayerFog, atUseDistanceCue };
-
-enum DECLSPEC_DENUM TLayerFogFalloff3DS : unsigned int { lfNoFall, lfTopFall, lfBottomFall };
-
-typedef TFogSettings3DS *PFogSettings3DS;
-
-struct DECLSPEC_DRECORD TFogSettings3DS
-{
-public:
-	float NearPlane;
-	float NearDensity;
-	float FarPlane;
-	float FarDensity;
-	TFColor3DS FogColor;
-	bool FogBgnd;
-};
-
-
-typedef TLayerFogSettings3DS *PLayerFogSettings3DS;
-
-struct DECLSPEC_DRECORD TLayerFogSettings3DS
-{
-public:
-	float ZMin;
-	float ZMax;
-	float Density;
-	TFColor3DS FogColor;
-	TLayerFogFalloff3DS FallOff;
-	bool FogBgnd;
-};
-
-
-typedef TDCueSettings3DS *PDCueSettings3DS;
-
-struct DECLSPEC_DRECORD TDCueSettings3DS
-{
-public:
-	float NearPlane;
-	float NearDim;
-	float FarPlane;
-	float FarDim;
-	bool DCueBgnd;
-};
-
-
-typedef TAtmosphere3DS *PAtmosphere3DS;
-
-struct DECLSPEC_DRECORD TAtmosphere3DS
-{
-public:
-	TFogSettings3DS Fog;
-	TLayerFogSettings3DS LayerFog;
-	TDCueSettings3DS DCue;
-	TAtmosphereType3DS ActiveAtmo;
-};
-
-
-enum DECLSPEC_DENUM TBackgroundType3DS : unsigned int { btNoBgnd, btUseSolidBgnd, btUseVGradientBgnd, btUseBitmapBgnd };
-
-typedef System::AnsiString *PBitmapBgnd3DS;
-
-typedef System::AnsiString TBitmapBgnd3DS;
-
-typedef TFColor3DS TSolidBgnd3DS;
-
-typedef TVGradientBgnd3DS *PVGradientBgnd3DS;
-
-struct DECLSPEC_DRECORD TVGradientBgnd3DS
-{
-public:
-	float GradPercent;
-	TFColor3DS Top;
-	TFColor3DS Mid;
-	TFColor3DS Bottom;
-};
-
-
-typedef TBackground3DS *PBackground3DS;
-
-struct DECLSPEC_DRECORD TBackground3DS
-{
-public:
-	TBitmapBgnd3DS Bitmap;
-	TSolidBgnd3DS Solid;
-	TVGradientBgnd3DS VGradient;
-	TBackgroundType3DS BgndUsed;
-};
-
-
-enum DECLSPEC_DENUM TShadeType3DS : unsigned int { stWire, stFlat, stGouraud, stPhong, stMetal };
-
-enum DECLSPEC_DENUM TTileType3DS : unsigned int { ttTile, ttDecal, ttBoth };
-
-enum DECLSPEC_DENUM TFilterType3DS : unsigned int { ftPyramidal, ftSummedArea };
-
-enum DECLSPEC_DENUM TTintType3DS : unsigned int { ttRGB, ttAlpha, ttRGBLumaTint, ttAlphaTint, ttRGBTint };
-
-typedef TACubic3DS *PACubic3DS;
-
-struct DECLSPEC_DRECORD TACubic3DS
-{
-public:
-	bool FirstFrame;
-	bool Flat;
-	int Size;
-	int nthFrame;
-};
-
-
-typedef TBitmap3DS *PBitmap3DS;
-
-struct DECLSPEC_DRECORD TBitmap3DS
-{
-public:
-	System::AnsiString NameStr;
-	float Percent;
-	TTileType3DS Tiling;
-	bool IgnoreAlpha;
-	TFilterType3DS Filter;
-	float Blur;
-	bool Mirror;
-	bool Negative;
-	float UScale;
-	float VScale;
-	float UOffset;
-	float VOffset;
-	float Rotation;
-	TTintType3DS Source;
-	TFColor3DS Tint1;
-	TFColor3DS Tint2;
-	TFColor3DS RedTint;
-	TFColor3DS GreenTint;
-	TFColor3DS BlueTint;
-	int DataSize;
-	void *Data;
-};
-
-
-typedef TMapSet3DS *PMapSet3DS;
-
-struct DECLSPEC_DRECORD TMapSet3DS
-{
-public:
-	TBitmap3DS Map;
-	TBitmap3DS Mask;
-};
-
-
-struct DECLSPEC_DRECORD TRMapSet3DS
-{
-public:
-	TBitmap3DS Map;
-	bool UseAuto;
-	TACubic3DS AutoMap;
-	TBitmap3DS Mask;
-};
-
-
-typedef TMaterial3DS *PMaterial3DS;
-
-struct DECLSPEC_DRECORD TMaterial3DS
-{
-public:
-	System::AnsiString NameStr;
-	TFColor3DS Ambient;
-	TFColor3DS Diffuse;
-	TFColor3DS Specular;
-	float Shininess;
-	float ShinStrength;
-	float Blur;
-	float Transparency;
-	float TransFallOff;
-	float SelfIllumPct;
-	float WireSize;
-	TShadeType3DS Shading;
-	bool UseBlur;
-	bool UseFall;
-	bool TwoSided;
-	bool SelFillum;
-	bool Additive;
-	bool UseWire;
-	bool UseWireAbs;
-	bool FaceMap;
-	bool Soften;
-	TMapSet3DS Texture;
-	TMapSet3DS Texture2;
-	TMapSet3DS Opacity;
-	TMapSet3DS Bump;
-	TMapSet3DS SpecMap;
-	TMapSet3DS ShinMap;
-	TMapSet3DS IllumMap;
-	TRMapSet3DS Reflect;
-};
-
-
-typedef System::StaticArray<float, 12> TMeshMatrix;
-
-typedef TMeshMatrix *PMeshMatrix;
-
-typedef TMapInfo3DS *PMapInfo3DS;
-
-struct DECLSPEC_DRECORD TMapInfo3DS
-{
-public:
-	System::Word MapType;
-	float TileX;
-	float TileY;
-	float CenX;
-	float CenY;
-	float CenZ;
-	float Scale;
-	TMeshMatrix Matrix;
-	float PW;
-	float PH;
-	float CH;
-};
-
-
-typedef TObjMat3DS *PObjMat3DS;
-
-struct DECLSPEC_DRECORD TObjMat3DS
-{
-public:
-	System::AnsiString NameStr;
-	System::Word NFaces;
-	PWordList FaceIndex;
-};
-
-
-typedef System::StaticArray<TObjMat3DS, 89478486> TObjMatList;
-
-typedef TObjMatList *PObjMatList;
-
-typedef TMesh3DS *PMesh3DS;
-
-struct DECLSPEC_DRECORD TMesh3DS
-{
-	
-private:
-	typedef System::StaticArray<System::UnicodeString, 6> _TMesh3DS__1;
-	
-	
-public:
-	System::AnsiString NameStr;
-	bool IsHidden;
-	bool IsvisLofter;
-	bool IsMatte;
-	bool IsNoCast;
-	bool IsFast;
-	bool IsNorcvShad;
-	bool IsFrozen;
-	System::Word NVertices;
-	PPointList VertexArray;
-	System::Word NVFlags;
-	PWordList VFlagArray;
-	System::Word NTextVerts;
-	PTexVertList TextArray;
-	bool UseMapInfo;
-	TMapInfo3DS Map;
-	TMeshMatrix LocMatrix;
-	System::Word NFaces;
-	PFaceList FaceArray;
-	PCardinalArray SmoothArray;
-	bool UseBoxMap;
-	_TMesh3DS__1 BoxMapStr;
-	System::Byte MeshColor;
-	System::Word NMats;
-	PObjMatList MatArray;
-	bool UseProc;
-	int ProcSize;
-	System::UnicodeString ProcNameStr;
-	void *ProcData;
-};
-
-
-enum DECLSPEC_DENUM TConeStyle3DS : unsigned int { csCircular, csRectangular };
-
-typedef TSpotShadow3DS *PSpotShadow3DS;
-
-struct DECLSPEC_DRECORD TSpotShadow3DS
-{
-public:
-	bool Cast;
-	TShadowStyle3DS AType;
-	bool Local;
-	float Bias;
-	float Filter;
-	System::Word MapSize;
-	float RayBias;
-};
-
-
-typedef TSpotCone3DS *PSpotCone3DS;
-
-struct DECLSPEC_DRECORD TSpotCone3DS
-{
-public:
-	TConeStyle3DS AType;
-	bool Show;
-	bool Overshoot;
-};
-
-
-typedef TSpotProjector3DS *PSpotProjector3DS;
-
-struct DECLSPEC_DRECORD TSpotProjector3DS
-{
-public:
-	bool Use;
-	System::UnicodeString BitmapStr;
-};
-
-
-typedef TSpotLight3DS *PSpotLight3DS;
-
-struct DECLSPEC_DRECORD TSpotLight3DS
-{
-public:
-	TPoint3DS Target;
-	float Hotspot;
-	float FallOff;
-	float Roll;
-	float Aspect;
-	TSpotShadow3DS Shadows;
-	TSpotCone3DS Cone;
-	TSpotProjector3DS Projector;
-};
-
-
-typedef TLiteAttenuate3DS *PLiteAttenuate3DS;
-
-struct DECLSPEC_DRECORD TLiteAttenuate3DS
-{
-public:
-	bool IsOn;
-	float Inner;
-	float Outer;
-};
-
-
-typedef TLight3DS *PLight3DS;
-
-struct DECLSPEC_DRECORD TLight3DS
-{
-public:
-	System::AnsiString NameStr;
-	TPoint3DS Pos;
-	TFColor3DS Color;
-	float Multiplier;
-	bool DLOff;
-	TLiteAttenuate3DS Attenuation;
-	System::Classes::TStringList* Exclude;
-	PSpotLight3DS Spot;
-};
-
-
-typedef TCamRanges3DS *PCamRanges3DS;
-
-struct DECLSPEC_DRECORD TCamRanges3DS
-{
-public:
-	float CamNear;
-	float CamFar;
-};
-
-
-typedef TCamera3DS *PCamera3DS;
-
-struct DECLSPEC_DRECORD TCamera3DS
-{
-public:
-	System::AnsiString NameStr;
-	TPoint3DS Position;
-	TPoint3DS Target;
-	float Roll;
-	float FOV;
-	bool ShowCone;
-	TCamRanges3DS Ranges;
-};
-
-
-typedef TKFKeyInfo3DS *PKFKeyInfo3DS;
-
-struct DECLSPEC_DRECORD TKFKeyInfo3DS
-{
-public:
-	int Length;
-	int CurFrame;
-};
-
-
-typedef TKFSegment3DS *PKFSegment3DS;
-
-struct DECLSPEC_DRECORD TKFSegment3DS
-{
-public:
-	bool Use;
-	int SegBegin;
-	int SegEnd;
-};
-
-
-typedef TKFSets3DS *PKFSets3DS;
-
-struct DECLSPEC_DRECORD TKFSets3DS
-{
-public:
-	TKFKeyInfo3DS Anim;
-	TKFSegment3DS Seg;
-};
-
-
-typedef TKFCamera3DS *PKFCamera3DS;
-
-struct DECLSPEC_DRECORD TKFCamera3DS
-{
-public:
-	System::AnsiString NameStr;
-	System::AnsiString ParentStr;
-	System::Word Flags1;
-	System::Word Flags2;
-	int NPKeys;
-	System::Word NPFlag;
-	PKeyHeaderList PKeys;
-	PPointList Pos;
-	int NFKeys;
-	System::Word NFFlag;
-	PKeyHeaderList FKeys;
-	PSingleList FOV;
-	int NRKeys;
-	System::Word NRFlag;
-	PKeyHeaderList RKeys;
-	PSingleList Roll;
-	System::UnicodeString TParentStr;
-	int NTKeys;
-	System::Word NTFlag;
-	PKeyHeaderList TKeys;
-	PPointList TPos;
-	System::Word TFlags1;
-	System::Word TFlags2;
-};
-
-
-typedef TKFAmbient3DS *PKFAmbient3DS;
-
-struct DECLSPEC_DRECORD TKFAmbient3DS
-{
-public:
-	System::Word Flags1;
-	System::Word Flags2;
-	int NCKeys;
-	System::Word NCFlag;
-	PKeyHeaderList CKeys;
-	PFColorList Color;
-};
-
-
-typedef TKFMesh3DS *PKFMesh3DS;
-
-struct DECLSPEC_DRECORD TKFMesh3DS
-{
-public:
-	System::AnsiString NameStr;
-	System::AnsiString ParentStr;
-	System::Word Flags1;
-	System::Word Flags2;
-	TPoint3DS Pivot;
-	System::AnsiString InstanceStr;
-	TPoint3DS BoundMin;
-	TPoint3DS BoundMax;
-	int NPKeys;
-	short NPFlag;
-	PKeyHeaderList PKeys;
-	PPointList Pos;
-	int NRKeys;
-	short NRFlag;
-	PKeyHeaderList RKeys;
-	PKFRotKeyList Rot;
-	int NSKeys;
-	short NSFlag;
-	PKeyHeaderList SKeys;
-	PPointList Scale;
-	int NMKeys;
-	short NMFlag;
-	PKeyHeaderList MKeys;
-	PKFMorphKeyList Morph;
-	int NHKeys;
-	short NHFlag;
-	PKeyHeaderList HKeys;
-	float MSAngle;
-};
-
-
-typedef TKFOmni3DS *PKFOmni3DS;
-
-struct DECLSPEC_DRECORD TKFOmni3DS
-{
-public:
-	System::AnsiString Name;
-	System::AnsiString Parent;
-	System::Word Flags1;
-	System::Word Flags2;
-	int NPKeys;
-	System::Word NPFlag;
-	PKeyHeaderList PKeys;
-	PPointList Pos;
-	int NCKeys;
-	System::Word NCFlag;
-	PKeyHeaderList CKeys;
-	PFColorList Color;
-};
-
-
-typedef TKFSpot3DS *PKFSpot3DS;
-
-struct DECLSPEC_DRECORD TKFSpot3DS
-{
-public:
-	System::AnsiString Name;
-	System::AnsiString Parent;
-	System::Word Flags1;
-	System::Word Flags2;
-	int NPKeys;
-	System::Word NPFlag;
-	PKeyHeaderList PKeys;
-	PPointList Pos;
-	int NCKeys;
-	System::Word NCFlag;
-	PKeyHeaderList CKeys;
-	PFColorList Color;
-	int NHKeys;
-	System::Word NHFlag;
-	PKeyHeaderList HKeys;
-	PSingleList Hot;
-	int NFKeys;
-	System::Word NFFlag;
-	PKeyHeaderList FKeys;
-	PSingleList Fall;
-	int NRKeys;
-	System::Word NRFlag;
-	PKeyHeaderList RKeys;
-	PSingleList Roll;
-	System::AnsiString TParent;
-	int NTKeys;
-	System::Word NTFlag;
-	PKeyHeaderList TKeys;
-	PPointList TPos;
-	System::Word TFlags1;
-	System::Word TFlags2;
-};
-
-
-typedef TXDataRaw3DS *PXDataRaw3DS;
-
-struct DECLSPEC_DRECORD TXDataRaw3DS
-{
-public:
-	int Size;
-	void *Data;
-};
-
-
-enum DECLSPEC_DENUM TTargetType3DS : unsigned int { ttLightTarget, ttCameraTarget };
-
-typedef unsigned *PM3dVersion;
-
-typedef unsigned TM3dVersion;
-
-typedef TColorF *PColorF;
-
-struct DECLSPEC_DRECORD TColorF
-{
-public:
-	float Red;
-	float Green;
-	float Blue;
-};
-
-
-typedef TColorF *PLinColorF;
-
-typedef TColorF TLinColorF;
-
-typedef TColor24 *PColor24;
-
-struct DECLSPEC_DRECORD TColor24
-{
-public:
-	System::Byte Red;
-	System::Byte Green;
-	System::Byte Blue;
-};
-
-
-typedef TColor24 *PLinColor24;
-
-typedef TColor24 TLinColor24;
-
-typedef TColor24 *PMatMapRCol;
-
-typedef TColor24 TMatMapRCol;
-
-typedef TColor24 *PMatMapGCol;
-
-typedef TColor24 TMatMapGCol;
-
-typedef TColor24 *PMatMapBCol;
-
-typedef TColor24 TMatMapBCol;
-
-typedef TColor24 *PMatMapCol1;
-
-typedef TColor24 TMatMapCol1;
-
-typedef TColor24 *PMatMapCol2;
-
-typedef TColor24 TMatMapCol2;
-
-typedef short *PIntPercentage;
-
-typedef short TIntPercentage;
-
-typedef short *PMatBumpPercent;
-
-typedef TIntPercentage TMatBumpPercent;
-
-typedef float *PFloatPercentage;
-
-typedef float TFloatPercentage;
-
-typedef PChar3DS PMatMapname;
-
-typedef int *PMeshVersion;
-
-typedef int TMeshVersion;
-
-typedef float *PMasterScale;
-
-typedef float TMasterScale;
-
-typedef float *PLoShadowBias;
-
-typedef float TLoShadowBias;
-
-typedef float *PHiShadowBias;
-
-typedef TLoShadowBias THiShadowBias;
-
-typedef float *PRayBias;
-
-typedef THiShadowBias TRayBias;
-
-typedef short *PShadowMapSize;
-
-typedef short TShadowMapSize;
-
-typedef short *PShadowSamples;
-
-typedef short TShadowSamples;
-
-typedef int *PShadowRange;
-
-typedef int TShadowRange;
-
-typedef float *PShadowFilter;
-
-typedef float TShadowFilter;
-
-typedef TPoint3DS *POConsts;
-
-typedef TPoint3DS TOConsts;
-
-typedef PChar3DS PBitMapName;
-
-typedef float *PVGradient;
-
-typedef float TVGradient;
-
-typedef TFog *PFog;
-
-struct DECLSPEC_DRECORD TFog
-{
-public:
-	float NearPlaneDist;
-	float NearPlaneDensity;
-	float FarPlaneDist;
-	float FarPlaneDensity;
-};
-
-
-typedef TLayerFog *PLayerFog;
-
-struct DECLSPEC_DRECORD TLayerFog
-{
-public:
-	float ZMin;
-	float ZMax;
-	float Density;
-	unsigned AType;
-};
-
-
-typedef TDistanceCue *PDistanceCue;
-
-struct DECLSPEC_DRECORD TDistanceCue
-{
-public:
-	float NearPlaneDist;
-	float NearPlaneDimming;
-	float FarPlaneDist;
-	float FarPlaneDimming;
-};
-
-
-typedef TViewStandard *PViewStandard;
-
-struct DECLSPEC_DRECORD TViewStandard
-{
-public:
-	TPoint3DS ViewTargetCoord;
-	float ViewWidth;
-};
-
-
-typedef TViewUser *PViewUser;
-
-struct DECLSPEC_DRECORD TViewUser
-{
-public:
-	TPoint3DS ViewTargetCoord;
-	float ViewWidth;
-	float XYViewangle;
-	float YZViewangle;
-	float BankAngle;
-};
-
-
-typedef PChar3DS PViewCamera;
-
-typedef PChar3DS PMatName;
-
-typedef short *PMatShading;
-
-typedef short TMatShading;
-
-typedef TMatAcubic *PMatAcubic;
-
-struct DECLSPEC_DRECORD TMatAcubic
-{
-public:
-	System::Byte ShadeLevel;
-	System::Byte Antialias;
-	short Flags;
-	unsigned MapSize;
-	unsigned FrameInterval;
-};
-
-
-typedef TIpasData *PIpasData;
-
-struct DECLSPEC_DRECORD TIpasData
-{
-public:
-	int Size;
-	void *Data;
-};
-
-
-typedef float *PMatWireSize;
-
-typedef float TMatWireSize;
-
-typedef System::Word *PMatMapTiling;
-
-typedef System::Word TMatMapTiling;
-
-typedef float *PMatMapTexblur;
-
-typedef float TMatMapTexblur;
-
-typedef float *PMatMapUScale;
-
-typedef float TMatMapUScale;
-
-typedef float *PMatMapVScale;
-
-typedef TMatMapUScale TMatMapVScale;
-
-typedef float *PMatMapUOffset;
-
-typedef float TMatMapUOffset;
-
-typedef float *PMatMapVOffset;
-
-typedef TMatMapUOffset TMatMapVOffset;
-
-typedef float *PMatMapAng;
-
-typedef float TMatMapAng;
-
-typedef PChar3DS PNamedObject;
-
-typedef TPointArray *PPointArray;
-
-struct DECLSPEC_DRECORD TPointArray
-{
-public:
-	System::Word Vertices;
-	PPointList PointList;
-};
-
-
-typedef TPointFlagArray *PPointFlagArray;
-
-struct DECLSPEC_DRECORD TPointFlagArray
-{
-public:
-	System::Word Flags;
-	PWordList FlagList;
-};
-
-
-typedef TFaceArray *PFaceArray;
-
-struct DECLSPEC_DRECORD TFaceArray
-{
-public:
-	System::Word Faces;
-	PFaceList FaceList;
-};
-
-
-typedef TMshMatGroup *PMshMatGroup;
-
-struct DECLSPEC_DRECORD TMshMatGroup
-{
-public:
-	System::AnsiString MatNameStr;
-	System::Word Faces;
-	PWordList FaceList;
-};
-
-
-typedef System::StaticArray<System::AnsiString, 6> TMshBoxmap;
-
-typedef TMshBoxmap *PMshBoxmap;
-
-typedef TSmoothGroup *PSmoothGroup;
-
-struct DECLSPEC_DRECORD TSmoothGroup
-{
-public:
-	System::Word Groups;
-	PCardinalArray GroupList;
-};
-
-
-typedef TTexVerts *PTexVerts;
-
-struct DECLSPEC_DRECORD TTexVerts
-{
-public:
-	System::Word NumCoords;
-	PTexVertList TextVertList;
-};
-
-
-typedef System::Byte *PMeshColor;
-
-typedef System::Byte TMeshColor;
-
-typedef TMeshTextureInfo *PMeshTextureInfo;
-
-struct DECLSPEC_DRECORD TMeshTextureInfo
-{
-public:
-	System::Word MapType;
-	float XTiling;
-	float YTiling;
-	TPoint3DS IconPos;
-	float IconScaling;
-	TMeshMatrix XMatrix;
-	float IconWidth;
-	float IconHeight;
-	float CylIconHeight;
-};
-
-
-typedef PChar3DS PProcName;
-
-typedef TPoint3DS *PNDirectLight;
-
-typedef TPoint3DS TNDirectLight;
-
-typedef PChar3DS PDlExclude;
-
-typedef TDlSpotlight *PDlSpotlight;
-
-struct DECLSPEC_DRECORD TDlSpotlight
-{
-public:
-	TPoint3DS SpotLightTarg;
-	float HotspotAngle;
-	float FalloffAngle;
-};
-
-
-typedef float *PDlOuterRange;
-
-typedef float TDlOuterRange;
-
-typedef float *PDlInnerRange;
-
-typedef TDlOuterRange TDlInnerRange;
-
-typedef float *PDlMultiplier;
-
-typedef float TDlMultiplier;
-
-typedef float *PDlSpotRoll;
-
-typedef float TDlSpotRoll;
-
-typedef float *PDlSpotAspect;
-
-typedef float TDlSpotAspect;
-
-typedef PChar3DS PDlSpotProjector;
-
-typedef float *PDlRayBias;
-
-typedef float TDlRayBias;
-
-typedef TDlLocalShadow2 *PDlLocalShadow2;
-
-struct DECLSPEC_DRECORD TDlLocalShadow2
-{
-public:
-	float LocalShadowBias;
-	float LocalShadowFilter;
-	short LocalShadowMapSize;
-};
-
-
-typedef TNCamera *PNCamera;
-
-struct DECLSPEC_DRECORD TNCamera
-{
-public:
-	TPoint3DS CameraPos;
-	TPoint3DS TargetPos;
-	float CameraBank;
-	float CameraFocalLength;
-};
-
-
-typedef TCamRanges *PCamRanges;
-
-struct DECLSPEC_DRECORD TCamRanges
-{
-public:
-	float NearPlane;
-	float FarPlane;
-};
-
-
-typedef TViewportLayout *PViewportLayout;
-
-struct DECLSPEC_DRECORD TViewportLayout
-{
-public:
-	short Form;
-	short Top;
-	short Ready;
-	short WState;
-	short SwapWS;
-	short SwapPort;
-	short SwapCur;
-};
-
-
-typedef TViewportSize *PViewportSize;
-
-struct DECLSPEC_DRECORD TViewportSize
-{
-public:
-	System::Word XPos;
-	System::Word YPos;
-	System::Word Width;
-	System::Word Height;
-};
-
-
-typedef TViewportData *PViewportData;
-
-struct DECLSPEC_DRECORD TViewportData
-{
-public:
-	System::Word Flags;
-	System::Word AxisLockout;
-	System::Word WinXPos;
-	System::Word WinYPos;
-	System::Word WinWidth;
-	System::Word WinHeight;
-	System::Word View;
-	float ZoomFactor;
-	TPoint3DS Center;
-	float HorizAng;
-	float VertAng;
-	System::AnsiString CamNameStr;
-};
-
-
-typedef TViewportData *PViewportData3;
-
-typedef TViewportData TViewportData3;
-
-typedef TKFHdr *PKFHdr;
-
-struct DECLSPEC_DRECORD TKFHdr
-{
-public:
-	short Revision;
-	System::UnicodeString Filename;
-	int AnimLength;
-};
-
-
-typedef short *PKFId;
-
-typedef short TKFId;
-
-typedef TKFSeg *PKFSeg;
-
-struct DECLSPEC_DRECORD TKFSeg
-{
-public:
-	int First;
-	int Last;
-};
-
-
-typedef int *PKFCurtime;
-
-typedef int TKFCurtime;
-
-typedef TNodeHdr *PNodeHdr;
-
-struct DECLSPEC_DRECORD TNodeHdr
-{
-public:
-	System::UnicodeString ObjNameStr;
-	System::Word Flags1;
-	System::Word Flags2;
-	short ParentIndex;
-};
-
-
-typedef TPoint3DS *PPivot;
-
-typedef TPoint3DS TPivot;
-
-typedef PChar3DS PInstanceName;
-
-typedef float *PMorphSmooth;
-
-typedef float TMorphSmooth;
-
-typedef TBoundBox *PBoundBox;
-
-struct DECLSPEC_DRECORD TBoundBox
-{
-public:
-	TPoint3DS Min;
-	TPoint3DS Max;
-};
-
-
-typedef TPosTrackTag *PPosTrackTag;
-
-struct DECLSPEC_DRECORD TPosTrackTag
-{
-public:
-	TTrackHeader3DS TrackHdr;
-	PKeyHeaderList KeyHdrList;
-	PPointList PositionList;
-};
-
-
-typedef TColTrackTag *PColTrackTag;
-
-struct DECLSPEC_DRECORD TColTrackTag
-{
-public:
-	TTrackHeader3DS TrackHdr;
-	PKeyHeaderList KeyHdrList;
-	PFColorList ColorList;
-};
-
-
-typedef TRotTrackTag *PRotTrackTag;
-
-struct DECLSPEC_DRECORD TRotTrackTag
-{
-public:
-	TTrackHeader3DS TrackHdr;
-	PKeyHeaderList KeyHdrList;
-	PKFRotKeyList RotationList;
-};
-
-
-typedef TScaleTrackTag *PScaleTrackTag;
-
-struct DECLSPEC_DRECORD TScaleTrackTag
-{
-public:
-	TTrackHeader3DS TrackHdr;
-	PKeyHeaderList KeyHdrList;
-	PPointList ScaleList;
-};
-
-
-typedef TMorphTrackTag *PMorphTrackTag;
-
-struct DECLSPEC_DRECORD TMorphTrackTag
-{
-public:
-	TTrackHeader3DS TrackHdr;
-	PKeyHeaderList KeyHdrList;
-	PKFMorphKeyList MorphList;
-};
-
-
-typedef THideTrackTag *PHideTrackTag;
-
-struct DECLSPEC_DRECORD THideTrackTag
-{
-public:
-	TTrackHeader3DS TrackHdr;
-	PKeyHeaderList KeyHdrList;
-};
-
-
-typedef TFovTrackTag *PFovTrackTag;
-
-struct DECLSPEC_DRECORD TFovTrackTag
-{
-public:
-	TTrackHeader3DS TrackHdr;
-	PKeyHeaderList KeyHdrList;
-	PSingleList FOVAngleList;
-};
-
-
-typedef TRollTrackTag *PRollTrackTag;
-
-struct DECLSPEC_DRECORD TRollTrackTag
-{
-public:
-	TTrackHeader3DS TrackHdr;
-	PKeyHeaderList KeyHdrList;
-	PSingleList RollAngleList;
-};
-
-
-typedef THotTrackTag *PHotTrackTag;
-
-struct DECLSPEC_DRECORD THotTrackTag
-{
-public:
-	TTrackHeader3DS TrackHdr;
-	PKeyHeaderList KeyHdrList;
-	PSingleList HotspotAngleList;
-};
-
-
-typedef TFallTrackTag *PFallTrackTag;
-
-struct DECLSPEC_DRECORD TFallTrackTag
-{
-public:
-	TTrackHeader3DS TrackHdr;
-	PKeyHeaderList KeyHdrList;
-	PSingleList FalloffAngleList;
-};
-
-
-typedef TXDataEntry *PXDataEntry;
-
-struct DECLSPEC_DRECORD TXDataEntry
-{
-public:
-	int Size;
-	void *Data;
-};
-
-
-typedef PChar3DS PXDataAppName;
-
-typedef PChar3DS PXDataString;
-
-typedef float *PXDataFloat;
-
-typedef float TXDataFloat;
-
-typedef double *PXDataDouble;
-
-typedef double TXDataDouble;
-
-typedef short *PXDataShort;
-
-typedef short TXDataShort;
-
-typedef int *PXDataLong;
-
-typedef int TXDataLong;
-
-typedef void * *PXDataVoid;
-
-typedef void * TXDataVoid;
-
-enum DECLSPEC_DENUM TReleaseLevel : unsigned int { rlRelease1, rlRelease2, rlRelease3, rlReleaseNotKnown };
-
-struct DECLSPEC_DRECORD TChunkData
-{
-	
-public:
-	union
-	{
-		struct 
-		{
-			void *Dummy;
-		};
-		struct 
-		{
-			PHideTrackTag HideTrackTag;
-		};
-		struct 
-		{
-			PFallTrackTag FallTrackTag;
-		};
-		struct 
-		{
-			PHotTrackTag HotTrackTag;
-		};
-		struct 
-		{
-			PRollTrackTag RollTrackTag;
-		};
-		struct 
-		{
-			PFovTrackTag FovTrackTag;
-		};
-		struct 
-		{
-			PMorphTrackTag MorphTrackTag;
-		};
-		struct 
-		{
-			PScaleTrackTag ScaleTrackTag;
-		};
-		struct 
-		{
-			PRotTrackTag RotTrackTag;
-		};
-		struct 
-		{
-			PColTrackTag ColTrackTag;
-		};
-		struct 
-		{
-			PPosTrackTag PosTrackTag;
-		};
-		struct 
-		{
-			PBoundBox BoundBox;
-		};
-		struct 
-		{
-			PMorphSmooth MorphSmooth;
-		};
-		struct 
-		{
-			PInstanceName InstanceName;
-		};
-		struct 
-		{
-			PPivot Pivot;
-		};
-		struct 
-		{
-			PNodeHdr NodeHdr;
-		};
-		struct 
-		{
-			PKFId KFId;
-		};
-		struct 
-		{
-			PKFCurtime KFCurtime;
-		};
-		struct 
-		{
-			PKFSeg KFSeg;
-		};
-		struct 
-		{
-			PKFHdr KFHdr;
-		};
-		struct 
-		{
-			PXDataString XDataString;
-		};
-		struct 
-		{
-			PXDataAppName XDataAppName;
-		};
-		struct 
-		{
-			PXDataEntry XDataEntry;
-		};
-		struct 
-		{
-			PViewportData ViewportData;
-		};
-		struct 
-		{
-			PViewportSize ViewportSize;
-		};
-		struct 
-		{
-			PViewportLayout ViewportLayout;
-		};
-		struct 
-		{
-			PCamRanges CamRanges;
-		};
-		struct 
-		{
-			PNCamera NCamera;
-		};
-		struct 
-		{
-			PDlRayBias DlRayBias;
-		};
-		struct 
-		{
-			PDlSpotProjector DlSpotProjector;
-		};
-		struct 
-		{
-			PDlSpotAspect DlSpotAspect;
-		};
-		struct 
-		{
-			PDlSpotRoll DlSpotRoll;
-		};
-		struct 
-		{
-			PDlLocalShadow2 DlLocalShadow2;
-		};
-		struct 
-		{
-			PDlSpotlight DlSpotlight;
-		};
-		struct 
-		{
-			PDlMultiplier DlMultiplier;
-		};
-		struct 
-		{
-			PDlOuterRange DlOuterRange;
-		};
-		struct 
-		{
-			PDlInnerRange DlInnerRange;
-		};
-		struct 
-		{
-			PDlExclude DlExclude;
-		};
-		struct 
-		{
-			PNDirectLight NDirectLight;
-		};
-		struct 
-		{
-			PProcName ProcName;
-		};
-		struct 
-		{
-			PMeshTextureInfo MeshTextureInfo;
-		};
-		struct 
-		{
-			PMeshColor MeshColor;
-		};
-		struct 
-		{
-			PMeshMatrix MeshMatrix;
-		};
-		struct 
-		{
-			PTexVerts TexVerts;
-		};
-		struct 
-		{
-			PSmoothGroup SmoothGroup;
-		};
-		struct 
-		{
-			PMshBoxmap MshBoxmap;
-		};
-		struct 
-		{
-			PMshMatGroup MshMatGroup;
-		};
-		struct 
-		{
-			PFaceArray FaceArray;
-		};
-		struct 
-		{
-			PPointFlagArray PointFlagArray;
-		};
-		struct 
-		{
-			PPointArray PointArray;
-		};
-		struct 
-		{
-			PNamedObject NamedObject;
-		};
-		struct 
-		{
-			PMatBumpPercent MatBumpPercent;
-		};
-		struct 
-		{
-			PMatMapBCol MatMapBCol;
-		};
-		struct 
-		{
-			PMatMapGCol MatMapGCol;
-		};
-		struct 
-		{
-			PMatMapRCol MatMapRCol;
-		};
-		struct 
-		{
-			PMatMapCol2 MatMapCol2;
-		};
-		struct 
-		{
-			PMatMapCol1 MatMapCol1;
-		};
-		struct 
-		{
-			PMatMapAng MatMapAng;
-		};
-		struct 
-		{
-			PMatMapVOffset MatMapVOffset;
-		};
-		struct 
-		{
-			PMatMapUOffset MatMapUOffset;
-		};
-		struct 
-		{
-			PMatMapVScale MatMapVScale;
-		};
-		struct 
-		{
-			PMatMapUScale MatMapUScale;
-		};
-		struct 
-		{
-			PMatMapTexblur MatMapTexblur;
-		};
-		struct 
-		{
-			PMatMapTiling MatMapTiling;
-		};
-		struct 
-		{
-			PMatWireSize MatWireSize;
-		};
-		struct 
-		{
-			PIpasData IpasData;
-		};
-		struct 
-		{
-			PMatAcubic MatAcubic;
-		};
-		struct 
-		{
-			PMatShading MatShading;
-		};
-		struct 
-		{
-			PMatName MatName;
-		};
-		struct 
-		{
-			PViewCamera ViewCamera;
-		};
-		struct 
-		{
-			PViewUser ViewUser;
-		};
-		struct 
-		{
-			PViewStandard ViewStandard;
-		};
-		struct 
-		{
-			PDistanceCue DistanceCue;
-		};
-		struct 
-		{
-			PLayerFog LayerFog;
-		};
-		struct 
-		{
-			PFog Fog;
-		};
-		struct 
-		{
-			PVGradient VGradient;
-		};
-		struct 
-		{
-			PBitMapName BitMapName;
-		};
-		struct 
-		{
-			POConsts OConsts;
-		};
-		struct 
-		{
-			PShadowSamples ShadowSamples;
-		};
-		struct 
-		{
-			PShadowMapSize ShadowMapSize;
-		};
-		struct 
-		{
-			PRayBias RayBias;
-		};
-		struct 
-		{
-			PHiShadowBias HiShadowBias;
-		};
-		struct 
-		{
-			PShadowRange ShadowRange;
-		};
-		struct 
-		{
-			PShadowFilter ShadowFilter;
-		};
-		struct 
-		{
-			PLoShadowBias LoShadowBias;
-		};
-		struct 
-		{
-			PMasterScale MasterScale;
-		};
-		struct 
-		{
-			PMeshVersion MeshVersion;
-		};
-		struct 
-		{
-			PM3dVersion M3dVersion;
-		};
-		struct 
-		{
-			PMatMapname MatMapname;
-		};
-		struct 
-		{
-			PFloatPercentage FloatPercentage;
-		};
-		struct 
-		{
-			PIntPercentage IntPercentage;
-		};
-		struct 
-		{
-			PLinColor24 LinColor24;
-		};
-		struct 
-		{
-			PColor24 Color24;
-		};
-		struct 
-		{
-			PLinColorF LinColorF;
-		};
-		struct 
-		{
-			PColorF ColorF;
-		};
-		
-	};
-};
-
-
-struct DECLSPEC_DRECORD TChunk3DS
-{
-public:
-	System::Word Tag;
-	unsigned Size;
-	unsigned Position;
-	TChunkData Data;
-	PChunk3DS Sibling;
-	PChunk3DS Children;
-};
-
-
-//-- var, const, procedure ---------------------------------------------------
-}	/* namespace M3dstypes */
-}	/* namespace Formats */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS_M3DSTYPES)
-using namespace Formats::M3dstypes;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS)
-using namespace Formats;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// Formats_m3DSTypesHPP

include/Win32/Formats.m3DSUtils.hpp

@@ -1,111 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'Formats.m3DSUtils.pas' rev: 36.00 (Windows)
-
-#ifndef Formats_m3DSUtilsHPP
-#define Formats_m3DSUtilsHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <System.Classes.hpp>
-#include <System.SysUtils.hpp>
-#include <Formats.m3DS.hpp>
-#include <Formats.m3DSTypes.hpp>
-#include <Formats.m3DSConst.hpp>
-#include <Stage.Strings.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Formats
-{
-namespace M3dsutils
-{
-//-- forward type declarations -----------------------------------------------
-//-- type declarations -------------------------------------------------------
-//-- var, const, procedure ---------------------------------------------------
-extern DELPHI_PACKAGE void __fastcall ShowError(const System::UnicodeString ErrorMessage);
-extern DELPHI_PACKAGE void __fastcall ShowErrorFormatted(const System::UnicodeString ErrorMessage, const System::TVarRec *Args, const System::NativeInt Args_High);
-extern DELPHI_PACKAGE Formats::M3dstypes::TMeshSet3DS __fastcall GetMeshSet(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB);
-extern DELPHI_PACKAGE Formats::M3dstypes::TAtmosphere3DS __fastcall GetAtmosphere(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB);
-extern DELPHI_PACKAGE Formats::M3dstypes::TBackground3DS __fastcall GetBackground(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB);
-extern DELPHI_PACKAGE Formats::M3dstypes::TViewport3DS __fastcall GetViewport(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB);
-extern DELPHI_PACKAGE System::UnicodeString __fastcall ChunkTagToString(System::Word Tag);
-extern DELPHI_PACKAGE void __fastcall ChunkHeaderReport(System::Classes::TStrings* &Strings, Formats::M3dstypes::PChunk3DS Chunk, int IndentLevel);
-extern DELPHI_PACKAGE void __fastcall DumpKeyHeader(System::Classes::TStrings* Strings, const Formats::M3dstypes::TKeyHeader3DS &Key, int IndentLevel);
-extern DELPHI_PACKAGE void __fastcall DumpChunk(Formats::M3ds::TFile3DS* const Source, System::Classes::TStrings* &Strings, Formats::M3dstypes::PChunk3DS Chunk, int IndentLevel, Formats::M3dstypes::TDumpLevel DumpLevel);
-extern DELPHI_PACKAGE void __fastcall AddChild(Formats::M3dstypes::PChunk3DS Parent, Formats::M3dstypes::PChunk3DS Child);
-extern DELPHI_PACKAGE void __fastcall AddChildOrdered(Formats::M3dstypes::PChunk3DS Parent, Formats::M3dstypes::PChunk3DS Child);
-extern DELPHI_PACKAGE Formats::M3dstypes::PChunk3DS __fastcall FindChunk(Formats::M3dstypes::PChunk3DS Top, System::Word Tag);
-extern DELPHI_PACKAGE Formats::M3dstypes::PChunk3DS __fastcall FindNextChunk(Formats::M3dstypes::PChunk3DS Local, System::Word Tag);
-extern DELPHI_PACKAGE void __fastcall FreeChunkData(Formats::M3dstypes::PChunk3DS &Chunk);
-extern DELPHI_PACKAGE void __fastcall InitChunk(Formats::M3dstypes::PChunk3DS &Chunk);
-extern DELPHI_PACKAGE void __fastcall ReleaseChunk(Formats::M3dstypes::PChunk3DS &Chunk);
-extern DELPHI_PACKAGE void __fastcall ReleaseChunkList(Formats::M3dstypes::PChunkList3DS &List);
-extern DELPHI_PACKAGE int __fastcall GetMaterialCount(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB);
-extern DELPHI_PACKAGE void __fastcall ReleaseMaterial(Formats::M3dstypes::PMaterial3DS Mat);
-extern DELPHI_PACKAGE Formats::M3dstypes::PChunk3DS __fastcall FindNamedObjectByIndex(Formats::M3ds::TFile3DS* Source, const Formats::M3dstypes::TDatabase3DS &DB, System::Word AType, int Index);
-extern DELPHI_PACKAGE void __fastcall DeleteChunk(Formats::M3dstypes::PChunk3DS &Chunk);
-extern DELPHI_PACKAGE int __fastcall GetChunkValue(System::Word Tag);
-extern DELPHI_PACKAGE Formats::M3dstypes::TMaterial3DS __fastcall GetMaterialByIndex(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB, int Index);
-extern DELPHI_PACKAGE int __fastcall GetMeshCount(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB);
-extern DELPHI_PACKAGE void __fastcall ReleaseMeshObj(Formats::M3dstypes::PMesh3DS Mesh);
-extern DELPHI_PACKAGE Formats::M3dstypes::TMesh3DS __fastcall GetMeshByIndex(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB, int Index);
-extern DELPHI_PACKAGE int __fastcall GetOmnilightCount(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB);
-extern DELPHI_PACKAGE int __fastcall GetSpotlightCount(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB);
-extern DELPHI_PACKAGE void __fastcall ReleaseLight(Formats::M3dstypes::PLight3DS Light);
-extern DELPHI_PACKAGE Formats::M3dstypes::TLight3DS __fastcall GetOmnilightByIndex(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB, int Index);
-extern DELPHI_PACKAGE Formats::M3dstypes::TLight3DS __fastcall GetSpotlightByIndex(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB, int Index);
-extern DELPHI_PACKAGE void __fastcall ReleaseCamera(Formats::M3dstypes::PCamera3DS Camera);
-extern DELPHI_PACKAGE int __fastcall GetCameraCount(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB);
-extern DELPHI_PACKAGE Formats::M3dstypes::TCamera3DS __fastcall GetCameraByIndex(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB, int Index);
-extern DELPHI_PACKAGE Formats::M3dstypes::TKFSets3DS __fastcall GetKFSettings(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB);
-extern DELPHI_PACKAGE void __fastcall ReleaseCameraMotion(Formats::M3dstypes::PKFCamera3DS Camera);
-extern DELPHI_PACKAGE void __fastcall GetCameraNodeNameList(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB, System::Classes::TStringList* List);
-extern DELPHI_PACKAGE int __fastcall GetCameraNodeCount(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB);
-extern DELPHI_PACKAGE Formats::M3dstypes::TKFCamera3DS __fastcall GetCameraMotion(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::PChunk3DS CamChunk, Formats::M3dstypes::PChunk3DS TargetChunk);
-extern DELPHI_PACKAGE Formats::M3dstypes::TKFCamera3DS __fastcall GetCameraMotionByIndex(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB, int Index);
-extern DELPHI_PACKAGE void __fastcall ReleaseAmbientLightMotion(Formats::M3dstypes::PKFAmbient3DS Light);
-extern DELPHI_PACKAGE Formats::M3dstypes::TKFAmbient3DS __fastcall GetAmbientLightMotion(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB);
-extern DELPHI_PACKAGE void __fastcall InitObjectMotion(Formats::M3dstypes::TKFMesh3DS &Obj, unsigned NewNPKeys, unsigned NewNRKeys, unsigned NewNSKeys, unsigned NewNMKeys, unsigned NewNHKeys);
-extern DELPHI_PACKAGE void __fastcall ReleaseObjectMotion(Formats::M3dstypes::PKFMesh3DS Obj);
-extern DELPHI_PACKAGE int __fastcall GetObjectNodeCount(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB);
-extern DELPHI_PACKAGE void __fastcall GetObjectNodeNameList(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB, System::Classes::TStringList* List);
-extern DELPHI_PACKAGE Formats::M3dstypes::TKFMesh3DS __fastcall GetObjectMotionByName(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB, const System::UnicodeString Name);
-extern DELPHI_PACKAGE Formats::M3dstypes::TKFMesh3DS __fastcall GetObjectMotionByIndex(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB, unsigned Index);
-extern DELPHI_PACKAGE void __fastcall ReleaseOmnilightMotion(Formats::M3dstypes::PKFOmni3DS Light);
-extern DELPHI_PACKAGE unsigned __fastcall GetOmnilightNodeCount(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB);
-extern DELPHI_PACKAGE void __fastcall GetOmnilightNodeNameList(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB, System::Classes::TStringList* List);
-extern DELPHI_PACKAGE Formats::M3dstypes::TKFOmni3DS __fastcall GetOmnilightMotionByName(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB, const System::UnicodeString Name);
-extern DELPHI_PACKAGE Formats::M3dstypes::TKFOmni3DS __fastcall GetOmnilightMotionByIndex(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB, unsigned Index);
-extern DELPHI_PACKAGE void __fastcall ReleaseSpotlightMotion(Formats::M3dstypes::PKFSpot3DS Spot);
-extern DELPHI_PACKAGE unsigned __fastcall GetSpotlightNodeCount(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB);
-extern DELPHI_PACKAGE void __fastcall GetSpotlightNodeNameList(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB, System::Classes::TStringList* List);
-extern DELPHI_PACKAGE Formats::M3dstypes::TKFSpot3DS __fastcall GetSpotlightMotionByName(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB, const System::UnicodeString Name);
-extern DELPHI_PACKAGE Formats::M3dstypes::TKFSpot3DS __fastcall GetSpotlightMotionByIndex(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB, unsigned Index);
-extern DELPHI_PACKAGE Formats::M3dstypes::TReleaseLevel __fastcall GetM3dMagicRelease(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB);
-extern DELPHI_PACKAGE Formats::M3dstypes::TReleaseLevel __fastcall GetMeshRelease(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB);
-extern DELPHI_PACKAGE Formats::M3dstypes::TReleaseLevel __fastcall GetKfRelease(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB);
-extern DELPHI_PACKAGE Formats::M3dstypes::TReleaseLevel __fastcall GetDatabaseRelease(Formats::M3ds::TFile3DS* const Source, Formats::M3dstypes::TDatabase3DS &DB);
-}	/* namespace M3dsutils */
-}	/* namespace Formats */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS_M3DSUTILS)
-using namespace Formats::M3dsutils;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATS)
-using namespace Formats;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// Formats_m3DSUtilsHPP

include/Win32/Formatx.B3D.hpp

@@ -1,314 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'Formatx.B3D.pas' rev: 36.00 (Windows)
-
-#ifndef Formatx_B3DHPP
-#define Formatx_B3DHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <System.Classes.hpp>
-#include <System.SysUtils.hpp>
-#include <Stage.VectorGeometry.hpp>
-#include <Stage.VectorTypes.hpp>
-#include <GXS.VectorLists.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Formatx
-{
-namespace B3d
-{
-//-- forward type declarations -----------------------------------------------
-struct TB3DChunk;
-struct TBB3DChunk;
-struct TTEXSChunk;
-struct TBRUSChunk;
-struct TVertexData;
-struct TVRTSChunk;
-struct TTRISChunk;
-struct TMESHChunk;
-struct TBONEChunk;
-struct TKEYSChunk;
-struct TANIMChunk;
-struct TNODEChunk;
-class DELPHICLASS TB3DMaterial;
-class DELPHICLASS TB3DTexture;
-class DELPHICLASS TB3DNode;
-class DELPHICLASS TFileB3D;
-//-- type declarations -------------------------------------------------------
-enum DECLSPEC_DENUM TB3DChunkType : unsigned char { bctUnknown, bctHeader, bctTexture, bctBrush, bctNode, bctVertex, bctTriangle, bctMesh, bctBone, bctKeyFrame, bctAnimation };
-
-typedef TB3DChunk *PB3DChunk;
-
-struct DECLSPEC_DRECORD TB3DChunk
-{
-public:
-	System::StaticArray<System::WideChar, 4> chunk;
-	int length;
-};
-
-
-typedef TBB3DChunk *PBB3DChunk;
-
-struct DECLSPEC_DRECORD TBB3DChunk
-{
-public:
-	int Version;
-};
-
-
-typedef TTEXSChunk *PTEXSChunk;
-
-struct DECLSPEC_DRECORD TTEXSChunk
-{
-public:
-	System::StaticArray<System::WideChar, 256> fileName;
-	int flags;
-	int blend;
-	float x_pos;
-	float y_pos;
-	float x_scale;
-	float y_scale;
-	float rotation;
-};
-
-
-typedef TBRUSChunk *PBRUSChunk;
-
-struct DECLSPEC_DRECORD TBRUSChunk
-{
-	
-private:
-	typedef System::DynamicArray<int> _TBRUSChunk__1;
-	
-	
-public:
-	int n_texs;
-	System::StaticArray<System::WideChar, 256> name;
-	float red;
-	float green;
-	float blue;
-	float alpha;
-	float shininess;
-	int blend;
-	int fx;
-	_TBRUSChunk__1 texture_id;
-};
-
-
-typedef TVertexData *PVertexData;
-
-struct DECLSPEC_DRECORD TVertexData
-{
-	
-private:
-	typedef System::DynamicArray<float> _TVertexData__1;
-	
-	
-public:
-	PVertexData next;
-	float x;
-	float y;
-	float z;
-	float nx;
-	float ny;
-	float nz;
-	float red;
-	float green;
-	float blue;
-	float alpha;
-	_TVertexData__1 tex_coords;
-};
-
-
-typedef TVRTSChunk *PVRTSChunk;
-
-struct DECLSPEC_DRECORD TVRTSChunk
-{
-public:
-	int flags;
-	int tex_coord_sets;
-	int tex_coord_set_size;
-	PVertexData vertices;
-};
-
-
-typedef TTRISChunk *PTRISChunk;
-
-struct DECLSPEC_DRECORD TTRISChunk
-{
-	
-private:
-	typedef System::DynamicArray<int> _TTRISChunk__1;
-	
-	
-public:
-	PTRISChunk next;
-	int brush_id;
-	_TTRISChunk__1 vertex_id;
-};
-
-
-typedef TMESHChunk *PMESHChunk;
-
-struct DECLSPEC_DRECORD TMESHChunk
-{
-public:
-	int brush_id;
-	TVRTSChunk vertices;
-	PTRISChunk triangles;
-};
-
-
-typedef TBONEChunk *PBONEChunk;
-
-struct DECLSPEC_DRECORD TBONEChunk
-{
-public:
-	int vertex_id;
-	float weight;
-};
-
-
-typedef TKEYSChunk *PKEYSChunk;
-
-struct DECLSPEC_DRECORD TKEYSChunk
-{
-public:
-	PKEYSChunk next;
-	int flags;
-	int frame;
-	Stage::Vectorgeometry::TAffineVector position;
-	Stage::Vectorgeometry::TAffineVector scale;
-	Stage::Vectortypes::TGLVector rotation;
-};
-
-
-typedef TANIMChunk *PANIMChunk;
-
-struct DECLSPEC_DRECORD TANIMChunk
-{
-public:
-	int flags;
-	int frames;
-	float fps;
-};
-
-
-typedef TNODEChunk *PNODEChunk;
-
-struct DECLSPEC_DRECORD TNODEChunk
-{
-public:
-	System::StaticArray<System::WideChar, 256> name;
-	Stage::Vectorgeometry::TAffineVector position;
-	Stage::Vectorgeometry::TAffineVector scale;
-	Stage::Vectortypes::TGLVector rotation;
-	PMESHChunk meshes;
-	PKEYSChunk keys;
-	PNODEChunk nodes;
-	TANIMChunk animation;
-	PNODEChunk next;
-	int level;
-};
-
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TB3DMaterial : public System::TObject
-{
-	typedef System::TObject inherited;
-	
-public:
-	TBRUSChunk MaterialData;
-	__fastcall TB3DMaterial();
-	__fastcall virtual ~TB3DMaterial();
-	System::UnicodeString __fastcall GetMaterialName();
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TB3DTexture : public System::TObject
-{
-	typedef System::TObject inherited;
-	
-public:
-	TTEXSChunk TextureData;
-	__fastcall TB3DTexture();
-	__fastcall virtual ~TB3DTexture();
-	System::UnicodeString __fastcall GetTextureName();
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TB3DNode : public System::TObject
-{
-	typedef System::TObject inherited;
-	
-public:
-	PNODEChunk NodeData;
-	__fastcall TB3DNode();
-	__fastcall virtual ~TB3DNode();
-	System::UnicodeString __fastcall GetNodeName();
-	void __fastcall DestroyNodeData(PNODEChunk Node);
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TFileB3D : public System::TObject
-{
-	typedef System::TObject inherited;
-	
-private:
-	System::Classes::TStringList* fTextures;
-	System::Classes::TStringList* fMaterials;
-	TB3DNode* fNodes;
-	void __fastcall FreeLists();
-	TB3DChunkType __fastcall GetChunkType(const TB3DChunk &aChunk);
-	int __fastcall SkipChunk(System::Classes::TStream* aStream, const TB3DChunk &aChunk);
-	int __fastcall ReadTextureChunk(System::Classes::TStream* aStream, const TB3DChunk &aChunk);
-	int __fastcall ReadMaterialChunk(System::Classes::TStream* aStream, const TB3DChunk &aChunk);
-	int __fastcall ReadNodeChunk(System::Classes::TStream* aStream, const TB3DChunk &aChunk, PNODEChunk Node, int level);
-	int __fastcall ReadMeshChunk(System::Classes::TStream* aStream, const TB3DChunk &aChunk, PMESHChunk Mesh);
-	int __fastcall ReadVerticesChunk(System::Classes::TStream* aStream, const TB3DChunk &aChunk, PVRTSChunk Vertices);
-	int __fastcall ReadTrianglesChunk(System::Classes::TStream* aStream, const TB3DChunk &aChunk, PTRISChunk Triangle);
-	
-public:
-	__fastcall virtual TFileB3D();
-	__fastcall virtual ~TFileB3D();
-	void __fastcall LoadFromStream(System::Classes::TStream* aStream);
-	void __fastcall Check();
-	__property System::Classes::TStringList* Textures = {read=fTextures};
-	__property System::Classes::TStringList* Materials = {read=fMaterials};
-	__property TB3DNode* Nodes = {read=fNodes};
-};
-
-#pragma pack(pop)
-
-//-- var, const, procedure ---------------------------------------------------
-}	/* namespace B3d */
-}	/* namespace Formatx */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATX_B3D)
-using namespace Formatx::B3d;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATX)
-using namespace Formatx;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// Formatx_B3DHPP

include/Win32/Formatx.DDSImage.hpp

@@ -1,98 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'Formatx.DDSImage.pas' rev: 36.00 (Windows)
-
-#ifndef Formatx_DDSImageHPP
-#define Formatx_DDSImageHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <Winapi.OpenGL.hpp>
-#include <Winapi.Windows.hpp>
-#include <System.Classes.hpp>
-#include <System.SysUtils.hpp>
-#include <FMX.Graphics.hpp>
-#include <FMX.Types.hpp>
-#include <Stage.VectorGeometry.hpp>
-#include <Stage.TextureFormat.hpp>
-#include <GXS.Graphics.hpp>
-#include <GXS.Context.hpp>
-#include <GXS.FileDDS.hpp>
-#include <Formatx.DXTC.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Formatx
-{
-namespace Ddsimage
-{
-//-- forward type declarations -----------------------------------------------
-class DELPHICLASS TDDSImage;
-class DELPHICLASS EDDSException;
-//-- type declarations -------------------------------------------------------
-class PASCALIMPLEMENTATION TDDSImage : public Fmx::Graphics::TBitmap
-{
-	typedef Fmx::Graphics::TBitmap inherited;
-	
-public:
-	HIDESBASE void __fastcall LoadFromStream(System::Classes::TStream* stream);
-	HIDESBASE void __fastcall SaveToStream(System::Classes::TStream* stream);
-public:
-	/* TBitmap.Create */ inline __fastcall virtual TDDSImage()/* overload */ : Fmx::Graphics::TBitmap() { }
-	/* TBitmap.Create */ inline __fastcall virtual TDDSImage(const int AWidth, const int AHeight)/* overload */ : Fmx::Graphics::TBitmap(AWidth, AHeight) { }
-	/* TBitmap.CreateFromStream */ inline __fastcall virtual TDDSImage(System::Classes::TStream* const AStream) : Fmx::Graphics::TBitmap(AStream) { }
-	/* TBitmap.CreateFromFile */ inline __fastcall virtual TDDSImage(const System::UnicodeString AFileName) : Fmx::Graphics::TBitmap(AFileName) { }
-	/* TBitmap.CreateFromBitmapAndMask */ inline __fastcall TDDSImage(Fmx::Graphics::TBitmap* const Bitmap, Fmx::Graphics::TBitmap* const Mask) : Fmx::Graphics::TBitmap(Bitmap, Mask) { }
-	/* TBitmap.Destroy */ inline __fastcall virtual ~TDDSImage() { }
-	
-};
-
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION EDDSException : public System::Sysutils::Exception
-{
-	typedef System::Sysutils::Exception inherited;
-	
-public:
-	/* Exception.Create */ inline __fastcall EDDSException(const System::UnicodeString Msg) : System::Sysutils::Exception(Msg) { }
-	/* Exception.CreateFmt */ inline __fastcall EDDSException(const System::UnicodeString Msg, const System::TVarRec *Args, const System::NativeInt Args_High) : System::Sysutils::Exception(Msg, Args, Args_High) { }
-	/* Exception.CreateRes */ inline __fastcall EDDSException(System::NativeUInt Ident)/* overload */ : System::Sysutils::Exception(Ident) { }
-	/* Exception.CreateRes */ inline __fastcall EDDSException(System::PResStringRec ResStringRec)/* overload */ : System::Sysutils::Exception(ResStringRec) { }
-	/* Exception.CreateResFmt */ inline __fastcall EDDSException(System::NativeUInt Ident, const System::TVarRec *Args, const System::NativeInt Args_High)/* overload */ : System::Sysutils::Exception(Ident, Args, Args_High) { }
-	/* Exception.CreateResFmt */ inline __fastcall EDDSException(System::PResStringRec ResStringRec, const System::TVarRec *Args, const System::NativeInt Args_High)/* overload */ : System::Sysutils::Exception(ResStringRec, Args, Args_High) { }
-	/* Exception.CreateHelp */ inline __fastcall EDDSException(const System::UnicodeString Msg, int AHelpContext) : System::Sysutils::Exception(Msg, AHelpContext) { }
-	/* Exception.CreateFmtHelp */ inline __fastcall EDDSException(const System::UnicodeString Msg, const System::TVarRec *Args, const System::NativeInt Args_High, int AHelpContext) : System::Sysutils::Exception(Msg, Args, Args_High, AHelpContext) { }
-	/* Exception.CreateResHelp */ inline __fastcall EDDSException(System::NativeUInt Ident, int AHelpContext)/* overload */ : System::Sysutils::Exception(Ident, AHelpContext) { }
-	/* Exception.CreateResHelp */ inline __fastcall EDDSException(System::PResStringRec ResStringRec, int AHelpContext)/* overload */ : System::Sysutils::Exception(ResStringRec, AHelpContext) { }
-	/* Exception.CreateResFmtHelp */ inline __fastcall EDDSException(System::PResStringRec ResStringRec, const System::TVarRec *Args, const System::NativeInt Args_High, int AHelpContext)/* overload */ : System::Sysutils::Exception(ResStringRec, Args, Args_High, AHelpContext) { }
-	/* Exception.CreateResFmtHelp */ inline __fastcall EDDSException(System::NativeUInt Ident, const System::TVarRec *Args, const System::NativeInt Args_High, int AHelpContext)/* overload */ : System::Sysutils::Exception(Ident, Args, Args_High, AHelpContext) { }
-	/* Exception.Destroy */ inline __fastcall virtual ~EDDSException() { }
-	
-};
-
-#pragma pack(pop)
-
-//-- var, const, procedure ---------------------------------------------------
-}	/* namespace Ddsimage */
-}	/* namespace Formatx */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATX_DDSIMAGE)
-using namespace Formatx::Ddsimage;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATX)
-using namespace Formatx;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// Formatx_DDSImageHPP

include/Win32/Formatx.DXTC.hpp

@@ -1,341 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'Formatx.DXTC.pas' rev: 36.00 (Windows)
-
-#ifndef Formatx_DXTCHPP
-#define Formatx_DXTCHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <Winapi.OpenGL.hpp>
-#include <Winapi.OpenGLext.hpp>
-#include <System.SysUtils.hpp>
-#include <Stage.TextureFormat.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Formatx
-{
-namespace Dxtc
-{
-//-- forward type declarations -----------------------------------------------
-struct TDDPIXELFORMAT;
-struct TDDSURFACEDESC2;
-struct TDDSHeader;
-struct DXTColBlock;
-struct DXT3AlphaBlock;
-struct DXT5AlphaBlock;
-struct TDDS_HEADER_DXT10;
-struct TGLImageDataFormat;
-//-- type declarations -------------------------------------------------------
-struct DECLSPEC_DRECORD TDDPIXELFORMAT
-{
-public:
-	unsigned dwSize;
-	unsigned dwFlags;
-	unsigned dwFourCC;
-	unsigned dwRGBBitCount;
-	unsigned dwRBitMask;
-	unsigned dwGBitMask;
-	unsigned dwBBitMask;
-	unsigned dwRGBAlphaBitMask;
-};
-
-
-struct DECLSPEC_DRECORD TDDSURFACEDESC2
-{
-public:
-	unsigned dwSize;
-	unsigned dwFlags;
-	unsigned dwHeight;
-	unsigned dwWidth;
-	unsigned dwPitchOrLinearSize;
-	unsigned dwDepth;
-	unsigned dwMipMapCount;
-	System::StaticArray<unsigned, 11> dwReserved1;
-	TDDPIXELFORMAT ddpf;
-	unsigned dwCaps;
-	unsigned dwCaps2;
-	unsigned dwCaps3;
-	unsigned dwCaps4;
-	unsigned dwReserved2;
-};
-
-
-struct DECLSPEC_DRECORD TDDSHeader
-{
-public:
-	unsigned Magic;
-	TDDSURFACEDESC2 SurfaceFormat;
-};
-
-
-struct DECLSPEC_DRECORD DXTColBlock
-{
-public:
-	System::Word col0;
-	System::Word col1;
-	System::StaticArray<System::Byte, 4> row;
-};
-
-
-typedef DXTColBlock *PDXTColBlock;
-
-struct DECLSPEC_DRECORD DXT3AlphaBlock
-{
-public:
-	System::StaticArray<System::Word, 4> row;
-};
-
-
-typedef DXT3AlphaBlock *PDXT3AlphaBlock;
-
-struct DECLSPEC_DRECORD DXT5AlphaBlock
-{
-public:
-	System::Byte alpha0;
-	System::Byte alpha1;
-	System::StaticArray<System::Byte, 6> row;
-};
-
-
-typedef DXT5AlphaBlock *PDXT5AlphaBlock;
-
-struct DECLSPEC_DRECORD TDDS_HEADER_DXT10
-{
-public:
-	int dxgiFormat;
-	int resourceDimension;
-	unsigned miscFlag;
-	unsigned arraySize;
-	unsigned reserved;
-};
-
-
-typedef System::StaticArray<char, 4> TFOURCC;
-
-struct DECLSPEC_DRECORD TGLImageDataFormat
-{
-public:
-	unsigned ColorFlag;
-	unsigned RBits;
-	unsigned GBits;
-	unsigned BBits;
-	unsigned ABits;
-	unsigned colorFormat;
-	Stage::Textureformat::TglInternalFormat TexFormat;
-	unsigned dType;
-};
-
-
-//-- var, const, procedure ---------------------------------------------------
-static _DELPHI_CONST System::Int8 DDSD_CAPS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 DDSD_HEIGHT = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 DDSD_WIDTH = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 DDSD_PITCH = System::Int8(0x8);
-static _DELPHI_CONST System::Word DDSD_PIXELFORMAT = System::Word(0x1000);
-static _DELPHI_CONST int DDSD_MIPMAPCOUNT = int(0x20000);
-static _DELPHI_CONST int DDSD_LINEARSIZE = int(0x80000);
-static _DELPHI_CONST int DDSD_DEPTH = int(0x800000);
-static _DELPHI_CONST System::Int8 DDPF_ALPHAPIXELS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 DDPF_A = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 DDPF_FOURCC = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 DDPF_RGB = System::Int8(0x40);
-static _DELPHI_CONST System::Int8 DDPF_RGBA = System::Int8(0x41);
-static _DELPHI_CONST int DDPF_L = int(0x20000);
-static _DELPHI_CONST int DDPF_LA = int(0x20001);
-static _DELPHI_CONST System::Int8 DDSCAPS_COMPLEX = System::Int8(0x8);
-static _DELPHI_CONST System::Word DDSCAPS_TEXTURE = System::Word(0x1000);
-static _DELPHI_CONST int DDSCAPS_MIPMAP = int(0x400000);
-static _DELPHI_CONST System::Word DDSCAPS2_CUBEMAP = System::Word(0x200);
-static _DELPHI_CONST System::Word DDSCAPS2_CUBEMAP_POSITIVEX = System::Word(0x400);
-static _DELPHI_CONST System::Word DDSCAPS2_CUBEMAP_NEGATIVEX = System::Word(0x800);
-static _DELPHI_CONST System::Word DDSCAPS2_CUBEMAP_POSITIVEY = System::Word(0x1000);
-static _DELPHI_CONST System::Word DDSCAPS2_CUBEMAP_NEGATIVEY = System::Word(0x2000);
-static _DELPHI_CONST System::Word DDSCAPS2_CUBEMAP_POSITIVEZ = System::Word(0x4000);
-static _DELPHI_CONST System::Word DDSCAPS2_CUBEMAP_NEGATIVEZ = System::Word(0x8000);
-static _DELPHI_CONST int DDSCAPS2_VOLUME = int(0x200000);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_FORCE_UINT = System::Int8(-1);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_UNKNOWN = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32G32B32A32_TYPELESS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32G32B32A32_FLOAT = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32G32B32A32_UINT = System::Int8(0x3);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32G32B32A32_SINT = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32G32B32_TYPELESS = System::Int8(0x5);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32G32B32_FLOAT = System::Int8(0x6);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32G32B32_UINT = System::Int8(0x7);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32G32B32_SINT = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16G16B16A16_TYPELESS = System::Int8(0x9);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16G16B16A16_FLOAT = System::Int8(0xa);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16G16B16A16_UNORM = System::Int8(0xb);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16G16B16A16_UINT = System::Int8(0xc);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16G16B16A16_SNORM = System::Int8(0xd);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16G16B16A16_SINT = System::Int8(0xe);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32G32_TYPELESS = System::Int8(0xf);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32G32_FLOAT = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32G32_UINT = System::Int8(0x11);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32G32_SINT = System::Int8(0x12);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32G8X24_TYPELESS = System::Int8(0x13);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_D32_FLOAT_S8X24_UINT = System::Int8(0x14);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32_FLOAT_X8X24_TYPELESS = System::Int8(0x15);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_X32_TYPELESS_G8X24_UINT = System::Int8(0x16);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R10G10B10A2_TYPELESS = System::Int8(0x17);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R10G10B10A2_UNORM = System::Int8(0x18);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R10G10B10A2_UINT = System::Int8(0x19);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R11G11B10_FLOAT = System::Int8(0x1a);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8G8B8A8_TYPELESS = System::Int8(0x1b);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8G8B8A8_UNORM = System::Int8(0x1c);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8G8B8A8_UNORM_SRGB = System::Int8(0x1d);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8G8B8A8_UINT = System::Int8(0x1e);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8G8B8A8_SNORM = System::Int8(0x1f);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8G8B8A8_SINT = System::Int8(0x20);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16G16_TYPELESS = System::Int8(0x21);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16G16_FLOAT = System::Int8(0x22);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16G16_UNORM = System::Int8(0x23);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16G16_UINT = System::Int8(0x24);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16G16_SNORM = System::Int8(0x25);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16G16_SINT = System::Int8(0x26);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32_TYPELESS = System::Int8(0x27);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_D32_FLOAT = System::Int8(0x28);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32_FLOAT = System::Int8(0x29);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32_UINT = System::Int8(0x2a);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R32_SINT = System::Int8(0x2b);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R24G8_TYPELESS = System::Int8(0x2c);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_D24_UNORM_S8_UINT = System::Int8(0x2d);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R24_UNORM_X8_TYPELESS = System::Int8(0x2e);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_X24_TYPELESS_G8_UINT = System::Int8(0x2f);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8G8_TYPELESS = System::Int8(0x30);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8G8_UNORM = System::Int8(0x31);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8G8_UINT = System::Int8(0x32);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8G8_SNORM = System::Int8(0x33);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8G8_SINT = System::Int8(0x34);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16_TYPELESS = System::Int8(0x35);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16_FLOAT = System::Int8(0x36);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_D16_UNORM = System::Int8(0x37);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16_UNORM = System::Int8(0x38);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16_UINT = System::Int8(0x39);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16_SNORM = System::Int8(0x3a);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R16_SINT = System::Int8(0x3b);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8_TYPELESS = System::Int8(0x3c);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8_UNORM = System::Int8(0x3d);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8_UINT = System::Int8(0x3e);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8_SNORM = System::Int8(0x3f);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8_SINT = System::Int8(0x40);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_A8_UNORM = System::Int8(0x41);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R1_UNORM = System::Int8(0x42);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R9G9B9E5_SHAREDEXP = System::Int8(0x43);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R8G8_B8G8_UNORM = System::Int8(0x44);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_G8R8_G8B8_UNORM = System::Int8(0x45);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC1_TYPELESS = System::Int8(0x46);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC1_UNORM = System::Int8(0x47);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC1_UNORM_SRGB = System::Int8(0x48);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC2_TYPELESS = System::Int8(0x49);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC2_UNORM = System::Int8(0x4a);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC2_UNORM_SRGB = System::Int8(0x4b);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC3_TYPELESS = System::Int8(0x4c);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC3_UNORM = System::Int8(0x4d);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC3_UNORM_SRGB = System::Int8(0x4e);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC4_TYPELESS = System::Int8(0x4f);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC4_UNORM = System::Int8(0x50);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC4_SNORM = System::Int8(0x51);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC5_TYPELESS = System::Int8(0x52);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC5_UNORM = System::Int8(0x53);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC5_SNORM = System::Int8(0x54);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_B5G6R5_UNORM = System::Int8(0x55);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_B5G5R5A1_UNORM = System::Int8(0x56);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_B8G8R8A8_UNORM = System::Int8(0x57);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_B8G8R8X8_UNORM = System::Int8(0x58);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_R10G10B10_XR_BIAS_A2_UNORM = System::Int8(0x59);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_B8G8R8A8_TYPELESS = System::Int8(0x5a);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_B8G8R8A8_UNORM_SRGB = System::Int8(0x5b);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_B8G8R8X8_TYPELESS = System::Int8(0x5c);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_B8G8R8X8_UNORM_SRGB = System::Int8(0x5d);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC6H_TYPELESS = System::Int8(0x5e);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC6H_UF16 = System::Int8(0x5f);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC6H_SF16 = System::Int8(0x60);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC7_TYPELESS = System::Int8(0x61);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC7_UNORM = System::Int8(0x62);
-static _DELPHI_CONST System::Int8 DXGI_FORMAT_BC7_UNORM_SRGB = System::Int8(0x63);
-static _DELPHI_CONST System::Int8 D3D11_RESOURCE_DIMENSION_UNKNOWN = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 D3D11_RESOURCE_DIMENSION_BUFFER = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 D3D11_RESOURCE_DIMENSION_TEXTURE1D = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 D3D11_RESOURCE_DIMENSION_TEXTURE2D = System::Int8(0x3);
-static _DELPHI_CONST System::Int8 D3D11_RESOURCE_DIMENSION_TEXTURE3D = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 FOURCC_UNKNOWN = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 FOURCC_R8G8B8 = System::Int8(0x14);
-static _DELPHI_CONST System::Int8 FOURCC_A8R8G8B8 = System::Int8(0x15);
-static _DELPHI_CONST System::Int8 FOURCC_X8R8G8B8 = System::Int8(0x16);
-static _DELPHI_CONST System::Int8 FOURCC_R5G6B5 = System::Int8(0x17);
-static _DELPHI_CONST System::Int8 FOURCC_X1R5G5B5 = System::Int8(0x18);
-static _DELPHI_CONST System::Int8 FOURCC_A1R5G5B5 = System::Int8(0x19);
-static _DELPHI_CONST System::Int8 FOURCC_A4R4G4B4 = System::Int8(0x1a);
-static _DELPHI_CONST System::Int8 FOURCC_R3G3B2 = System::Int8(0x1b);
-static _DELPHI_CONST System::Int8 FOURCC_A8 = System::Int8(0x1c);
-static _DELPHI_CONST System::Int8 FOURCC_A8R3G3B2 = System::Int8(0x1d);
-static _DELPHI_CONST System::Int8 FOURCC_X4R4G4B4 = System::Int8(0x1e);
-static _DELPHI_CONST System::Int8 FOURCC_A2B10G10R10 = System::Int8(0x1f);
-static _DELPHI_CONST System::Int8 FOURCC_A8B8G8R8 = System::Int8(0x20);
-static _DELPHI_CONST System::Int8 FOURCC_X8B8G8R8 = System::Int8(0x21);
-static _DELPHI_CONST System::Int8 FOURCC_G16R16 = System::Int8(0x22);
-static _DELPHI_CONST System::Int8 FOURCC_A2R10G10B10 = System::Int8(0x23);
-static _DELPHI_CONST System::Int8 FOURCC_A16B16G16R16 = System::Int8(0x24);
-static _DELPHI_CONST System::Int8 FOURCC_L8 = System::Int8(0x32);
-static _DELPHI_CONST System::Int8 FOURCC_A8L8 = System::Int8(0x33);
-static _DELPHI_CONST System::Int8 FOURCC_A4L4 = System::Int8(0x34);
-static _DELPHI_CONST int FOURCC_DXT1 = int(0x31545844);
-static _DELPHI_CONST int FOURCC_DXT2 = int(0x32545844);
-static _DELPHI_CONST int FOURCC_DXT3 = int(0x33545844);
-static _DELPHI_CONST int FOURCC_DXT4 = int(0x34545844);
-static _DELPHI_CONST int FOURCC_DXT5 = int(0x35545844);
-static _DELPHI_CONST int FOURCC_ATI1 = int(0x31495441);
-static _DELPHI_CONST int FOURCC_ATI2 = int(0x32495441);
-static _DELPHI_CONST System::Int8 FOURCC_D16_LOCKABLE = System::Int8(0x46);
-static _DELPHI_CONST System::Int8 FOURCC_D32 = System::Int8(0x47);
-static _DELPHI_CONST System::Int8 FOURCC_D24X8 = System::Int8(0x4d);
-static _DELPHI_CONST System::Int8 FOURCC_D16 = System::Int8(0x50);
-static _DELPHI_CONST System::Int8 FOURCC_D32F_LOCKABLE = System::Int8(0x52);
-static _DELPHI_CONST System::Int8 FOURCC_L16 = System::Int8(0x51);
-static _DELPHI_CONST System::Int8 FOURCC_R16F = System::Int8(0x6f);
-static _DELPHI_CONST System::Int8 FOURCC_G16R16F = System::Int8(0x70);
-static _DELPHI_CONST System::Int8 FOURCC_A16B16G16R16F = System::Int8(0x71);
-static _DELPHI_CONST System::Int8 FOURCC_R32F = System::Int8(0x72);
-static _DELPHI_CONST System::Int8 FOURCC_G32R32F = System::Int8(0x73);
-static _DELPHI_CONST System::Int8 FOURCC_A32B32G32R32F = System::Int8(0x74);
-static _DELPHI_CONST int FOURCC_DX10 = int(0x47495844);
-extern DELPHI_PACKAGE System::StaticArray<TGLImageDataFormat, 4> cImageDataFormat8bits;
-extern DELPHI_PACKAGE System::StaticArray<TGLImageDataFormat, 5> cImageDataFormat16bits;
-extern DELPHI_PACKAGE System::StaticArray<TGLImageDataFormat, 1> cImageDataFormat24bits;
-extern DELPHI_PACKAGE System::StaticArray<TGLImageDataFormat, 7> cImageDataFormat32bits;
-extern DELPHI_PACKAGE void __fastcall DecodeDXT1toBitmap32(System::Sysutils::PByteArray encData, System::Sysutils::PByteArray decData, int w, int h, bool &trans);
-extern DELPHI_PACKAGE void __fastcall DecodeDXT3toBitmap32(System::Sysutils::PByteArray encData, System::Sysutils::PByteArray decData, int w, int h);
-extern DELPHI_PACKAGE void __fastcall DecodeDXT5toBitmap32(System::Sysutils::PByteArray encData, System::Sysutils::PByteArray decData, int w, int h);
-extern DELPHI_PACKAGE void __fastcall flip_blocks_dxtc1(Winapi::Opengl::PGLubyte data, int numBlocks);
-extern DELPHI_PACKAGE void __fastcall flip_blocks_dxtc3(Winapi::Opengl::PGLubyte data, int numBlocks);
-extern DELPHI_PACKAGE void __fastcall flip_dxt5_alpha(PDXT5AlphaBlock block);
-extern DELPHI_PACKAGE void __fastcall flip_blocks_dxtc5(Winapi::Opengl::PGLubyte data, int numBlocks);
-extern DELPHI_PACKAGE bool __fastcall DDSHeaderToGLEnum(const TDDSHeader &DX9header, const TDDS_HEADER_DXT10 &DX11header, const bool useDX11, /* out */ Stage::Textureformat::TglInternalFormat &iFormat, /* out */ unsigned &colorFormat, /* out */ unsigned &dataType, /* out */ int &bpe);
-extern DELPHI_PACKAGE bool __fastcall GLEnumToDDSHeader(TDDSHeader &DX9header, TDDS_HEADER_DXT10 &DX11header, const bool useDX11, const Stage::Textureformat::TglInternalFormat iFormat, const unsigned colorFormat, const unsigned dataType, const int bpe);
-extern DELPHI_PACKAGE bool __fastcall FindDDSCompatibleDataFormat(const Stage::Textureformat::TglInternalFormat iFormat, /* out */ unsigned &colorFormat, /* out */ unsigned &dataType);
-}	/* namespace Dxtc */
-}	/* namespace Formatx */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATX_DXTC)
-using namespace Formatx::Dxtc;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATX)
-using namespace Formatx;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// Formatx_DXTCHPP

include/Win32/Formatx.HDRImage.hpp

@@ -1,68 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'Formatx.HDRImage.pas' rev: 36.00 (Windows)
-
-#ifndef Formatx_HDRImageHPP
-#define Formatx_HDRImageHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <Winapi.OpenGL.hpp>
-#include <Winapi.Windows.hpp>
-#include <System.Classes.hpp>
-#include <System.SysUtils.hpp>
-#include <FMX.Graphics.hpp>
-#include <Stage.VectorGeometry.hpp>
-#include <GXS.Graphics.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Formatx
-{
-namespace Hdrimage
-{
-//-- forward type declarations -----------------------------------------------
-class DELPHICLASS THDRImage;
-//-- type declarations -------------------------------------------------------
-class PASCALIMPLEMENTATION THDRImage : public Fmx::Graphics::TBitmap
-{
-	typedef Fmx::Graphics::TBitmap inherited;
-	
-public:
-	HIDESBASE void __fastcall LoadFromStream(System::Classes::TStream* stream);
-	HIDESBASE void __fastcall SaveToStream(System::Classes::TStream* stream);
-public:
-	/* TBitmap.Create */ inline __fastcall virtual THDRImage()/* overload */ : Fmx::Graphics::TBitmap() { }
-	/* TBitmap.Create */ inline __fastcall virtual THDRImage(const int AWidth, const int AHeight)/* overload */ : Fmx::Graphics::TBitmap(AWidth, AHeight) { }
-	/* TBitmap.CreateFromStream */ inline __fastcall virtual THDRImage(System::Classes::TStream* const AStream) : Fmx::Graphics::TBitmap(AStream) { }
-	/* TBitmap.CreateFromFile */ inline __fastcall virtual THDRImage(const System::UnicodeString AFileName) : Fmx::Graphics::TBitmap(AFileName) { }
-	/* TBitmap.CreateFromBitmapAndMask */ inline __fastcall THDRImage(Fmx::Graphics::TBitmap* const Bitmap, Fmx::Graphics::TBitmap* const Mask) : Fmx::Graphics::TBitmap(Bitmap, Mask) { }
-	/* TBitmap.Destroy */ inline __fastcall virtual ~THDRImage() { }
-	
-};
-
-
-//-- var, const, procedure ---------------------------------------------------
-}	/* namespace Hdrimage */
-}	/* namespace Formatx */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATX_HDRIMAGE)
-using namespace Formatx::Hdrimage;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATX)
-using namespace Formatx;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// Formatx_HDRImageHPP

include/Win32/Formatx.LWO.hpp

@@ -1,808 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'Formatx.LWO.pas' rev: 36.00 (Windows)
-
-#ifndef Formatx_LWOHPP
-#define Formatx_LWOHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <System.Classes.hpp>
-#include <System.SysUtils.hpp>
-#include <System.IOUtils.hpp>
-#include <System.Math.hpp>
-#include <Stage.VectorGeometry.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Formatx
-{
-namespace Lwo
-{
-//-- forward type declarations -----------------------------------------------
-struct TLWChunkRec;
-struct TLWSubChunkRec;
-struct TLWPolsInfo;
-struct TLWPntsInfo;
-struct TLWPolyTagMap;
-struct TLWVertexMap;
-class DELPHICLASS TLWChunk;
-class DELPHICLASS TLWSubChunk;
-class DELPHICLASS TLWChunkList;
-class DELPHICLASS TLWParentChunk;
-class DELPHICLASS TLWPnts;
-class DELPHICLASS TLWPols;
-class DELPHICLASS TLWVMap;
-class DELPHICLASS TLWTags;
-class DELPHICLASS TLWSurf;
-class DELPHICLASS TLWLayr;
-class DELPHICLASS TLWPTag;
-class DELPHICLASS TLWObjectFile;
-class DELPHICLASS TLWClip;
-class DELPHICLASS TLWContentDir;
-//-- type declarations -------------------------------------------------------
-typedef System::StaticArray<char, 4> TID4;
-
-typedef TID4 *PID4;
-
-typedef System::DynamicArray<TID4> TID4DynArray;
-
-typedef System::Int8 TI1;
-
-typedef System::Int8 *PI1;
-
-typedef short TI2;
-
-typedef short *PI2;
-
-typedef System::LongInt TI4;
-
-typedef int *PI4;
-
-typedef System::Byte TU1;
-
-typedef System::Byte *PU1;
-
-typedef System::DynamicArray<System::Byte> TU1DynArray;
-
-typedef System::Word TU2;
-
-typedef System::Word *PU2;
-
-typedef System::StaticArray<System::Word, 65535> TU2Array;
-
-typedef TU2Array *PU2Array;
-
-typedef System::DynamicArray<System::Word> TU2DynArray;
-
-typedef System::LongWord TU4;
-
-typedef unsigned *PU4;
-
-typedef System::StaticArray<unsigned, 65535> TU4Array;
-
-typedef TU4Array *PU4Array;
-
-typedef System::DynamicArray<unsigned> TU4DynArray;
-
-typedef float TF4;
-
-typedef float *PF4;
-
-typedef System::StaticArray<float, 65535> TF4Array;
-
-typedef TF4Array *PF4Array;
-
-typedef System::DynamicArray<float> TF4DynArray;
-
-typedef TF4 TANG4;
-
-typedef float *PANG4;
-
-typedef System::StaticArray<float, 3> TVec12;
-
-typedef TVec12 *PVec12;
-
-typedef System::StaticArray<System::StaticArray<float, 3>, 65535> TVec12Array;
-
-typedef TVec12Array *PVec12Array;
-
-typedef System::DynamicArray<TVec12> TVec12DynArray;
-
-typedef TVec12 TColr12;
-
-typedef TVec12 *PColr12;
-
-typedef System::DynamicArray<TVec12> TColr12DynArray;
-
-typedef System::StaticArray<System::Byte, 4> TColr4;
-
-typedef TColr4 *PColr4;
-
-typedef TLWChunkRec *PLWChunkRec;
-
-struct DECLSPEC_DRECORD TLWChunkRec
-{
-public:
-	TID4 id;
-	TU4 size;
-	void *data;
-};
-
-
-typedef TLWSubChunkRec *PLWSubChunkRec;
-
-struct DECLSPEC_DRECORD TLWSubChunkRec
-{
-public:
-	TID4 id;
-	TU2 size;
-	void *data;
-};
-
-
-struct DECLSPEC_DRECORD TLWPolsInfo
-{
-public:
-	TVec12 norm;
-	TVec12DynArray vnorms;
-	TU2 surfid;
-};
-
-
-typedef System::DynamicArray<TLWPolsInfo> TLWPolsInfoDynArray;
-
-struct DECLSPEC_DRECORD TLWPntsInfo
-{
-public:
-	TU2 npols;
-	TU2DynArray pols;
-};
-
-
-typedef System::DynamicArray<TLWPntsInfo> TLWPntsInfoDynArray;
-
-typedef TU2DynArray TLWPolsDynArray;
-
-typedef TU2DynArray TLWPolyTagMapDynArray;
-
-struct DECLSPEC_DRECORD TLWPolyTagMap
-{
-public:
-	TU2 poly;
-	TU2 tag;
-};
-
-
-typedef TLWPolyTagMap *PLWPolyTagMap;
-
-struct DECLSPEC_DRECORD TLWVertexMap
-{
-public:
-	TU2 vert;
-	TF4DynArray values;
-};
-
-
-typedef System::DynamicArray<TLWVertexMap> TLWVertexMapDynArray;
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TLWChunk : public System::Classes::TPersistent
-{
-	typedef System::Classes::TPersistent inherited;
-	
-private:
-	void *FData;
-	TID4 FID;
-	TU4 FSize;
-	TLWParentChunk* FParentChunk;
-	TLWChunkList* FOwner;
-	TLWChunkList* __fastcall GetRootChunks();
-	int __fastcall GetIndex();
-	
-protected:
-	virtual void __fastcall Clear();
-	virtual void __fastcall LoadData(System::Classes::TStream* AStream, System::LongWord DataStart, System::LongWord DataSize);
-	virtual void __fastcall Loaded();
-	
-public:
-	__fastcall virtual ~TLWChunk();
-	__classmethod virtual TID4 __fastcall GetID();
-	virtual void __fastcall LoadFromStream(System::Classes::TStream* AStream);
-	__property void * data = {read=FData};
-	__property TID4 id = {read=FID};
-	__property TU4 size = {read=FSize, nodefault};
-	__property TLWParentChunk* ParentChunk = {read=FParentChunk};
-	__property TLWChunkList* RootChunks = {read=GetRootChunks};
-	__property int Index = {read=GetIndex, nodefault};
-	__property TLWChunkList* Owner = {read=FOwner};
-public:
-	/* TObject.Create */ inline __fastcall TLWChunk() : System::Classes::TPersistent() { }
-	
-};
-
-#pragma pack(pop)
-
-typedef System::TMetaClass* TLWChunkClass;
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TLWSubChunk : public TLWChunk
-{
-	typedef TLWChunk inherited;
-	
-public:
-	virtual void __fastcall LoadFromStream(System::Classes::TStream* AStream);
-public:
-	/* TLWChunk.Destroy */ inline __fastcall virtual ~TLWSubChunk() { }
-	
-public:
-	/* TObject.Create */ inline __fastcall TLWSubChunk() : TLWChunk() { }
-	
-};
-
-#pragma pack(pop)
-
-typedef void __fastcall (*TLWChunkFind)(TLWChunk* AChunk, void * Criteria, bool &Found);
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TLWChunkList : public System::Classes::TList
-{
-	typedef System::Classes::TList inherited;
-	
-public:
-	TLWChunk* operator[](int Index) { return this->Items[Index]; }
-	
-private:
-	bool FOwnsItems;
-	System::TObject* FOwner;
-	TLWChunk* __fastcall GetItem(int Index);
-	
-protected:
-	virtual void __fastcall Loaded();
-	
-public:
-	__fastcall TLWChunkList(bool AOwnsItems, System::TObject* AOwner);
-	__fastcall virtual ~TLWChunkList();
-	HIDESBASE int __fastcall Add(TLWChunk* AChunk);
-	virtual void __fastcall Clear();
-	HIDESBASE void __fastcall Delete(int Index);
-	int __fastcall FindChunk(TLWChunkFind ChunkFind, void * Criteria, int StartIndex = 0x0);
-	__property TLWChunk* Items[int Index] = {read=GetItem/*, default*/};
-	__property bool OwnsItems = {read=FOwnsItems, nodefault};
-	__property System::TObject* Owner = {read=FOwner};
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TLWParentChunk : public TLWChunk
-{
-	typedef TLWChunk inherited;
-	
-private:
-	TLWChunkList* FItems;
-	TLWChunkList* __fastcall GetItems();
-	float __fastcall GetFloatParam(TID4 Param);
-	System::Word __fastcall GetWordParam(TID4 Param);
-	TVec12 __fastcall GetVec3Param(TID4 Param);
-	System::LongWord __fastcall GetLongParam(TID4 Param);
-	System::Word __fastcall GetVXParam(TID4 Param);
-	
-protected:
-	virtual void * __fastcall GetParamAddr(TID4 Param);
-	virtual void __fastcall Clear();
-	virtual void __fastcall Loaded();
-	
-public:
-	__property TLWChunkList* Items = {read=GetItems};
-	__property void * ParamAddr[TID4 Param] = {read=GetParamAddr};
-	__property float FloatParam[TID4 Param] = {read=GetFloatParam};
-	__property System::Word WordParam[TID4 Param] = {read=GetWordParam};
-	__property System::LongWord LongParam[TID4 Param] = {read=GetLongParam};
-	__property TVec12 Vec3Param[TID4 Param] = {read=GetVec3Param};
-	__property System::Word VXParam[TID4 Param] = {read=GetVXParam};
-public:
-	/* TLWChunk.Destroy */ inline __fastcall virtual ~TLWParentChunk() { }
-	
-public:
-	/* TObject.Create */ inline __fastcall TLWParentChunk() : TLWChunk() { }
-	
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TLWPnts : public TLWParentChunk
-{
-	typedef TLWParentChunk inherited;
-	
-private:
-	TVec12DynArray FPnts;
-	TLWPntsInfoDynArray FPntsInfo;
-	System::LongWord __fastcall GetPntsCount();
-	int __fastcall AddPoly(int PntIdx, int PolyIdx);
-	
-protected:
-	virtual void __fastcall Clear();
-	virtual void __fastcall LoadData(System::Classes::TStream* AStream, System::LongWord DataStart, System::LongWord DataSize);
-	
-public:
-	__classmethod virtual TID4 __fastcall GetID();
-	bool __fastcall GetVMap(TID4 VMapID, /* out */ TLWVMap* &VMap);
-	__property System::LongWord PntsCount = {read=GetPntsCount, nodefault};
-	__property TVec12DynArray Pnts = {read=FPnts};
-	__property TLWPntsInfoDynArray PntsInfo = {read=FPntsInfo};
-public:
-	/* TLWChunk.Destroy */ inline __fastcall virtual ~TLWPnts() { }
-	
-public:
-	/* TObject.Create */ inline __fastcall TLWPnts() : TLWParentChunk() { }
-	
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TLWPols : public TLWParentChunk
-{
-	typedef TLWParentChunk inherited;
-	
-private:
-	TID4 FPolsType;
-	TLWPolsDynArray FPols;
-	TLWPolsInfoDynArray FPolsInfo;
-	int FPolsCount;
-	int __fastcall GetPolsByIndex(TU2 AIndex);
-	TU4 __fastcall GetIndiceCount();
-	TU2 __fastcall GetIndice(int AIndex);
-	int __fastcall GetPolsCount();
-	void __fastcall CalcPolsNormals();
-	void __fastcall CalcPntsNormals();
-	
-protected:
-	virtual void __fastcall Clear();
-	virtual void __fastcall LoadData(System::Classes::TStream* AStream, System::LongWord DataStart, System::LongWord DataSize);
-	virtual void __fastcall Loaded();
-	
-public:
-	__classmethod virtual TID4 __fastcall GetID();
-	int __fastcall GetPolsByPntIdx(TU2 VertIdx, TU2DynArray &VertPolys);
-	__property int PolsByIndex[TU2 AIndex] = {read=GetPolsByIndex};
-	__property TU4 IndiceCount = {read=GetIndiceCount, nodefault};
-	__property TU2 Indices[int AIndex] = {read=GetIndice};
-	__property TID4 PolsType = {read=FPolsType};
-	__property int PolsCount = {read=GetPolsCount, nodefault};
-	__property TLWPolsInfoDynArray PolsInfo = {read=FPolsInfo};
-public:
-	/* TLWChunk.Destroy */ inline __fastcall virtual ~TLWPols() { }
-	
-public:
-	/* TObject.Create */ inline __fastcall TLWPols() : TLWParentChunk() { }
-	
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TLWVMap : public TLWChunk
-{
-	typedef TLWChunk inherited;
-	
-private:
-	TU2 FDimensions;
-	System::UnicodeString FName;
-	TLWVertexMapDynArray FValues;
-	TID4 FVMapType;
-	TLWVertexMap __fastcall GetValue(TU2 AIndex);
-	int __fastcall GetValueCount();
-	
-protected:
-	virtual void __fastcall Clear();
-	virtual void __fastcall LoadData(System::Classes::TStream* AStream, System::LongWord DataStart, System::LongWord DataSize);
-	
-public:
-	__classmethod virtual TID4 __fastcall GetID();
-	__property TU2 Dimensions = {read=FDimensions, nodefault};
-	__property System::UnicodeString Name = {read=FName};
-	__property TLWVertexMap Value[TU2 AIndex] = {read=GetValue};
-	__property int ValueCount = {read=GetValueCount, nodefault};
-	__property TID4 VMapType = {read=FVMapType};
-public:
-	/* TLWChunk.Destroy */ inline __fastcall virtual ~TLWVMap() { }
-	
-public:
-	/* TObject.Create */ inline __fastcall TLWVMap() : TLWChunk() { }
-	
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TLWTags : public TLWChunk
-{
-	typedef TLWChunk inherited;
-	
-private:
-	System::Classes::TStrings* FTags;
-	System::Classes::TStrings* __fastcall GetTags();
-	
-protected:
-	virtual void __fastcall Clear();
-	virtual void __fastcall LoadData(System::Classes::TStream* AStream, System::LongWord DataStart, System::LongWord DataSize);
-	
-public:
-	__fastcall virtual ~TLWTags();
-	__classmethod virtual TID4 __fastcall GetID();
-	System::UnicodeString __fastcall TagToName(TU2 tag);
-	__property System::Classes::TStrings* Tags = {read=GetTags};
-public:
-	/* TObject.Create */ inline __fastcall TLWTags() : TLWChunk() { }
-	
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TLWSurf : public TLWParentChunk
-{
-	typedef TLWParentChunk inherited;
-	
-private:
-	System::UnicodeString FName;
-	System::UnicodeString FSource;
-	int __fastcall GetSurfId();
-	
-protected:
-	virtual void * __fastcall GetParamAddr(TID4 Param);
-	virtual void __fastcall LoadData(System::Classes::TStream* AStream, System::LongWord DataStart, System::LongWord DataSize);
-	
-public:
-	__fastcall virtual ~TLWSurf();
-	__classmethod virtual TID4 __fastcall GetID();
-	__property int surfid = {read=GetSurfId, nodefault};
-	__property System::UnicodeString Name = {read=FName};
-	__property System::UnicodeString Source = {read=FSource};
-public:
-	/* TObject.Create */ inline __fastcall TLWSurf() : TLWParentChunk() { }
-	
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TLWLayr : public TLWParentChunk
-{
-	typedef TLWParentChunk inherited;
-	
-private:
-	TU2 FFlags;
-	System::UnicodeString FName;
-	TU2 FNumber;
-	TU2 FParent;
-	TVec12 FPivot;
-	
-protected:
-	virtual void __fastcall LoadData(System::Classes::TStream* AStream, System::LongWord DataStart, System::LongWord DataSize);
-	
-public:
-	__fastcall virtual ~TLWLayr();
-	__classmethod virtual TID4 __fastcall GetID();
-	__property TU2 Flags = {read=FFlags, nodefault};
-	__property System::UnicodeString Name = {read=FName};
-	__property TU2 Number = {read=FNumber, nodefault};
-	__property TU2 Parent = {read=FParent, nodefault};
-	__property TVec12 Pivot = {read=FPivot};
-public:
-	/* TObject.Create */ inline __fastcall TLWLayr() : TLWParentChunk() { }
-	
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TLWPTag : public TLWChunk
-{
-	typedef TLWChunk inherited;
-	
-public:
-	TLWPolyTagMap operator[](int AIndex) { return this->TagMaps[AIndex]; }
-	
-private:
-	TID4 FMapType;
-	TLWPolyTagMapDynArray FTagMaps;
-	TU2DynArray FTags;
-	int __fastcall AddTag(TU2 Value);
-	TU2 __fastcall GetTag(int AIndex);
-	int __fastcall GetTagCount();
-	int __fastcall GetTagMapCount();
-	TLWPolyTagMap __fastcall GetTagMaps(int AIndex);
-	void __fastcall ValidateTagInfo();
-	
-protected:
-	virtual void __fastcall Clear();
-	virtual void __fastcall LoadData(System::Classes::TStream* AStream, System::LongWord DataStart, System::LongWord DataSize);
-	
-public:
-	__fastcall TLWPTag();
-	int __fastcall GetPolsByTag(TU2 tag, TU2DynArray &PolyIndices);
-	__classmethod virtual TID4 __fastcall GetID();
-	__property TID4 MapType = {read=FMapType};
-	__property int TagCount = {read=GetTagCount, nodefault};
-	__property int TagMapCount = {read=GetTagMapCount, nodefault};
-	__property TLWPolyTagMap TagMaps[int AIndex] = {read=GetTagMaps/*, default*/};
-	__property TU2 Tags[int AIndex] = {read=GetTag};
-public:
-	/* TLWChunk.Destroy */ inline __fastcall virtual ~TLWPTag() { }
-	
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TLWObjectFile : public System::TObject
-{
-	typedef System::TObject inherited;
-	
-private:
-	TLWChunkList* FChunks;
-	System::UnicodeString FFileName;
-	TLWChunkList* __fastcall GetChunks();
-	int __fastcall GetCount();
-	TLWSurf* __fastcall GetSurfaceByName(System::UnicodeString Index);
-	TLWSurf* __fastcall GetSurfaceByTag(TU2 Index);
-	
-public:
-	__fastcall TLWObjectFile();
-	__fastcall virtual ~TLWObjectFile();
-	System::UnicodeString __fastcall TagToName(TU2 tag);
-	void __fastcall LoadFromFile(const System::UnicodeString AFilename);
-	void __fastcall LoadFromStream(System::Classes::TStream* AStream);
-	__property int ChunkCount = {read=GetCount, nodefault};
-	__property TLWChunkList* Chunks = {read=GetChunks};
-	__property System::UnicodeString FileName = {read=FFileName};
-	__property TLWSurf* SurfaceByName[System::UnicodeString Index] = {read=GetSurfaceByName};
-	__property TLWSurf* SurfaceByTag[TU2 Index] = {read=GetSurfaceByTag};
-};
-
-#pragma pack(pop)
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TLWClip : public TLWParentChunk
-{
-	typedef TLWParentChunk inherited;
-	
-private:
-	TU4 FClipIndex;
-	
-protected:
-	virtual void __fastcall LoadData(System::Classes::TStream* AStream, System::LongWord DataStart, System::LongWord DataSize);
-	
-public:
-	__classmethod virtual TID4 __fastcall GetID();
-	__property TU4 ClipIndex = {read=FClipIndex, nodefault};
-public:
-	/* TLWChunk.Destroy */ inline __fastcall virtual ~TLWClip() { }
-	
-public:
-	/* TObject.Create */ inline __fastcall TLWClip() : TLWParentChunk() { }
-	
-};
-
-#pragma pack(pop)
-
-typedef void __fastcall (__closure *TLWContentNotify)(System::TObject* Sender, System::UnicodeString &Content);
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TLWContentDir : public System::TObject
-{
-	typedef System::TObject inherited;
-	
-private:
-	System::Classes::TStrings* FSubDirs;
-	System::UnicodeString FRoot;
-	System::Classes::TStrings* __fastcall GetSubDirs();
-	void __fastcall SetRoot(const System::UnicodeString Value);
-	void __fastcall SetSubDirs(System::Classes::TStrings* const Value);
-	
-public:
-	__fastcall virtual ~TLWContentDir();
-	System::UnicodeString __fastcall FindContent(System::UnicodeString AFilename);
-	__property System::UnicodeString Root = {read=FRoot, write=SetRoot};
-	__property System::Classes::TStrings* SubDirs = {read=GetSubDirs, write=SetSubDirs};
-public:
-	/* TObject.Create */ inline __fastcall TLWContentDir() : System::TObject() { }
-	
-};
-
-#pragma pack(pop)
-
-typedef void __cdecl (*TLWOReadCallback)(TLWChunkRec Chunk, void * data);
-
-//-- var, const, procedure ---------------------------------------------------
-#define ID_NULL L"#0#0#0#0"
-extern DELPHI_PACKAGE TID4 ID_LWSC;
-extern DELPHI_PACKAGE TID4 ID_FORM;
-extern DELPHI_PACKAGE TID4 ID_LWOB;
-extern DELPHI_PACKAGE TID4 ID_LWLO;
-extern DELPHI_PACKAGE TID4 ID_LAYR;
-extern DELPHI_PACKAGE TID4 ID_PNTS;
-extern DELPHI_PACKAGE TID4 ID_SRFS;
-extern DELPHI_PACKAGE TID4 ID_POLS;
-extern DELPHI_PACKAGE TID4 ID_CRVS;
-extern DELPHI_PACKAGE TID4 ID_PCHS;
-extern DELPHI_PACKAGE TID4 ID_SURF;
-extern DELPHI_PACKAGE TID4 ID_COLR;
-extern DELPHI_PACKAGE TID4 ID_FLAG;
-extern DELPHI_PACKAGE TID4 ID_LUMI;
-extern DELPHI_PACKAGE TID4 ID_DIFF;
-extern DELPHI_PACKAGE TID4 ID_SPEC;
-extern DELPHI_PACKAGE TID4 ID_REFL;
-extern DELPHI_PACKAGE TID4 ID_TRAN;
-extern DELPHI_PACKAGE TID4 ID_VLUM;
-extern DELPHI_PACKAGE TID4 ID_VDIF;
-extern DELPHI_PACKAGE TID4 ID_VSPC;
-extern DELPHI_PACKAGE TID4 ID_VRFL;
-extern DELPHI_PACKAGE TID4 ID_VTRN;
-extern DELPHI_PACKAGE TID4 ID_GLOS;
-extern DELPHI_PACKAGE TID4 ID_SIDE;
-extern DELPHI_PACKAGE TID4 ID_RFLT;
-extern DELPHI_PACKAGE TID4 ID_RFOP;
-extern DELPHI_PACKAGE TID4 ID_RIMG;
-extern DELPHI_PACKAGE TID4 ID_RSAN;
-extern DELPHI_PACKAGE TID4 ID_RIND;
-extern DELPHI_PACKAGE TID4 ID_EDGE;
-extern DELPHI_PACKAGE TID4 ID_SMAN;
-extern DELPHI_PACKAGE TID4 ID_ALPH;
-extern DELPHI_PACKAGE TID4 ID_CTEX;
-extern DELPHI_PACKAGE TID4 ID_DTEX;
-extern DELPHI_PACKAGE TID4 ID_STEX;
-extern DELPHI_PACKAGE TID4 ID_RTEX;
-extern DELPHI_PACKAGE TID4 ID_TTEX;
-extern DELPHI_PACKAGE TID4 ID_LTEX;
-extern DELPHI_PACKAGE TID4 ID_BTEX;
-extern DELPHI_PACKAGE TID4 ID_TFLG;
-extern DELPHI_PACKAGE TID4 ID_TSIZ;
-extern DELPHI_PACKAGE TID4 ID_TCTR;
-extern DELPHI_PACKAGE TID4 ID_TFAL;
-extern DELPHI_PACKAGE TID4 ID_TVEL;
-extern DELPHI_PACKAGE TID4 ID_TREF;
-extern DELPHI_PACKAGE TID4 ID_TCLR;
-extern DELPHI_PACKAGE TID4 ID_TVAL;
-extern DELPHI_PACKAGE TID4 ID_TAMP;
-extern DELPHI_PACKAGE TID4 ID_TFP0;
-extern DELPHI_PACKAGE TID4 ID_TFP1;
-extern DELPHI_PACKAGE TID4 ID_TFP2;
-extern DELPHI_PACKAGE TID4 ID_TIP0;
-extern DELPHI_PACKAGE TID4 ID_TIP1;
-extern DELPHI_PACKAGE TID4 ID_TIP2;
-extern DELPHI_PACKAGE TID4 ID_TSP0;
-extern DELPHI_PACKAGE TID4 ID_TSP1;
-extern DELPHI_PACKAGE TID4 ID_TSP2;
-extern DELPHI_PACKAGE TID4 ID_TFRQ;
-extern DELPHI_PACKAGE TID4 ID_TIMG;
-extern DELPHI_PACKAGE TID4 ID_TALP;
-extern DELPHI_PACKAGE TID4 ID_TWRP;
-extern DELPHI_PACKAGE TID4 ID_TAAS;
-extern DELPHI_PACKAGE TID4 ID_TOPC;
-extern DELPHI_PACKAGE TID4 ID_SHDR;
-extern DELPHI_PACKAGE TID4 ID_SDAT;
-extern DELPHI_PACKAGE TID4 ID_IMSQ;
-extern DELPHI_PACKAGE TID4 ID_FLYR;
-extern DELPHI_PACKAGE TID4 ID_IMCC;
-static _DELPHI_CONST System::Int8 SURF_FLAG_LUMINOUS = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 SURF_FLAG_OUTLINE = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 SURF_FLAG_SMOOTHING = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 SURF_FLAG_COLORHIGHLIGHTS = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 SURF_FLAG_COLORFILTER = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 SURF_FLAG_OPAQUEEDGE = System::Int8(0x20);
-static _DELPHI_CONST System::Int8 SURF_FLAG_TRANSPARENTEDGE = System::Int8(0x40);
-static _DELPHI_CONST System::Byte SURF_FLAG_SHARPTERMINATOR = System::Byte(0x80);
-static _DELPHI_CONST System::Word SURF_FLAG_DOUBLESIDED = System::Word(0x100);
-static _DELPHI_CONST System::Word SURF_FLAG_ADDITIVE = System::Word(0x200);
-static _DELPHI_CONST System::Word SURF_FLAG_SHADOWALPHA = System::Word(0x400);
-static _DELPHI_CONST System::Int8 CURV_CONTINUITY_FIRST = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 CURV_CONTINUITY_LAST = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 IMSQ_FLAG_LOOP = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 IMSQ_FLAG_INTERLACE = System::Int8(0x2);
-extern DELPHI_PACKAGE TID4 ID_LWO2;
-extern DELPHI_PACKAGE TID4 ID_VMAP;
-extern DELPHI_PACKAGE TID4 ID_TAGS;
-extern DELPHI_PACKAGE TID4 ID_PTAG;
-extern DELPHI_PACKAGE TID4 ID_VMAD;
-extern DELPHI_PACKAGE TID4 ID_ENVL;
-extern DELPHI_PACKAGE TID4 ID_CLIP;
-extern DELPHI_PACKAGE TID4 ID_BBOX;
-extern DELPHI_PACKAGE TID4 ID_DESC;
-extern DELPHI_PACKAGE TID4 ID_TEXT;
-extern DELPHI_PACKAGE TID4 ID_ICON;
-extern DELPHI_PACKAGE TID4 ENVL_PRE;
-extern DELPHI_PACKAGE TID4 ENVL_POST;
-extern DELPHI_PACKAGE TID4 ENVL_KEY;
-extern DELPHI_PACKAGE TID4 ENVL_SPAN;
-extern DELPHI_PACKAGE TID4 ENVL_CHAN;
-extern DELPHI_PACKAGE TID4 ENVL_NAME;
-extern DELPHI_PACKAGE TID4 ID_STIL;
-extern DELPHI_PACKAGE TID4 ID_ISEQ;
-extern DELPHI_PACKAGE TID4 ID_ANIM;
-extern DELPHI_PACKAGE TID4 ID_STCC;
-extern DELPHI_PACKAGE TID4 ID_CONT;
-extern DELPHI_PACKAGE TID4 ID_BRIT;
-extern DELPHI_PACKAGE TID4 ID_SATR;
-extern DELPHI_PACKAGE TID4 ID_HUE;
-extern DELPHI_PACKAGE TID4 ID_GAMMA;
-extern DELPHI_PACKAGE TID4 ID_NEGA;
-extern DELPHI_PACKAGE TID4 ID_IFLT;
-extern DELPHI_PACKAGE TID4 ID_PFLT;
-extern DELPHI_PACKAGE TID4 POLS_TYPE_FACE;
-extern DELPHI_PACKAGE TID4 POLS_TYPE_CURV;
-extern DELPHI_PACKAGE TID4 POLS_TYPE_PTCH;
-extern DELPHI_PACKAGE TID4 POLS_TYPE_MBAL;
-extern DELPHI_PACKAGE TID4 POLS_TYPE_BONE;
-extern DELPHI_PACKAGE TID4 VMAP_TYPE_PICK;
-extern DELPHI_PACKAGE TID4 VMAP_TYPE_WGHT;
-extern DELPHI_PACKAGE TID4 VMAP_TYPE_MNVW;
-extern DELPHI_PACKAGE TID4 VMAP_TYPE_TXUV;
-extern DELPHI_PACKAGE TID4 VMAP_TYPE_RGB;
-extern DELPHI_PACKAGE TID4 VMAP_TYPE_RGBA;
-extern DELPHI_PACKAGE TID4 VMAP_TYPE_MORF;
-extern DELPHI_PACKAGE TID4 VMAP_TYPE_SPOT;
-extern DELPHI_PACKAGE TID4 PTAG_TYPE_SURF;
-extern DELPHI_PACKAGE TID4 PTAG_TYPE_PART;
-extern DELPHI_PACKAGE TID4 PTAG_TYPE_SMGP;
-static _DELPHI_CONST System::Int8 PRE_POST_RESET = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 PRE_POST_CONSTANT = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 PRE_POST_REPEAT = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 PRE_POST_OSCILLATE = System::Int8(0x3);
-static _DELPHI_CONST System::Int8 PRE_POST_OFFSET = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 PRE_POST_LINEAR = System::Int8(0x5);
-static _DELPHI_CONST System::Word POLS_VCOUNT_MASK = System::Word(0x3ff);
-static _DELPHI_CONST System::Word POLS_FLAGS_MASK = System::Word(0xfc00);
-static _DELPHI_CONST System::Int8 SIDE_FRONT = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 SIDE_BACK = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 SIDE_FRONT_AND_BACK = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 RFOP_BACKDROP = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 RFOP_RAYTRACEANDBACKDROP = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 RFOP_SPHERICALMAP = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 RFOP_RAYTRACEANDSPHERICALMAP = System::Int8(0x3);
-extern DELPHI_PACKAGE System::UnicodeString __fastcall ToDosPath(const System::UnicodeString Path);
-extern DELPHI_PACKAGE System::UnicodeString __fastcall ToUnixPath(const System::UnicodeString Path);
-extern DELPHI_PACKAGE TLWContentDir* __fastcall GetContentDir(void);
-extern DELPHI_PACKAGE void __fastcall FindChunkById(TLWChunk* AChunk, void * data, bool &Found);
-extern DELPHI_PACKAGE void __fastcall FindClipByClipIndex(TLWChunk* AChunk, void * AIndex, bool &Found);
-extern DELPHI_PACKAGE void __fastcall FindSurfaceByName(TLWChunk* AChunk, void * AName, bool &Found);
-extern DELPHI_PACKAGE void __fastcall FindSurfaceByTag(TLWChunk* AChunk, void * ATag, bool &Found);
-extern DELPHI_PACKAGE void __fastcall FindVMapByName(TLWChunk* AChunk, void * AName, bool &Found);
-extern DELPHI_PACKAGE void __fastcall RegisterChunkClass(TLWChunkClass ChunkClass);
-extern DELPHI_PACKAGE System::LongWord __cdecl LoadLW0FromStream(System::Classes::TStream* Stream, TLWOReadCallback ReadCallback, void * UserData);
-extern DELPHI_PACKAGE System::LongWord __fastcall LoadLWOFromFile(const System::UnicodeString AFilename, TLWOReadCallback ReadCallback, void * UserData);
-extern DELPHI_PACKAGE void __fastcall ReverseByteOrder(void * ValueIn, int size, int Count = 0x1);
-extern DELPHI_PACKAGE void __fastcall ReadMotorolaNumber(System::Classes::TStream* Stream, void * data, int ElementSize, int Count = 0x1);
-extern DELPHI_PACKAGE int __fastcall WriteMotorolaNumber(System::Classes::TStream* Stream, void * data, int ElementSize, int Count = 0x1);
-extern DELPHI_PACKAGE int __fastcall ReadS0(System::Classes::TStream* Stream, /* out */ System::UnicodeString &Str);
-extern DELPHI_PACKAGE int __fastcall ReadVXAsU4(System::Classes::TStream* Stream, void * data, int Count = 0x1);
-extern DELPHI_PACKAGE void __fastcall WriteS0(System::Classes::TStream* Stream, System::UnicodeString data);
-extern DELPHI_PACKAGE void __fastcall WriteU4AsVX(System::Classes::TStream* Stream, void * data, int Count);
-extern DELPHI_PACKAGE int __fastcall ID4ToInt(const TID4 id);
-}	/* namespace Lwo */
-}	/* namespace Formatx */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATX_LWO)
-using namespace Formatx::Lwo;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATX)
-using namespace Formatx;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// Formatx_LWOHPP

include/Win32/Formatx.MD2.hpp

@@ -1,157 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'Formatx.MD2.pas' rev: 36.00 (Windows)
-
-#ifndef Formatx_MD2HPP
-#define Formatx_MD2HPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <System.Classes.hpp>
-#include <System.SysUtils.hpp>
-#include <Stage.VectorTypes.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Formatx
-{
-namespace Md2
-{
-//-- forward type declarations -----------------------------------------------
-struct TMD2VertexIndex;
-struct TMD2Triangle;
-struct TMD2TriangleVertex;
-struct TMD2AliasFrame;
-struct TMD2Header;
-class DELPHICLASS TFileMD2;
-//-- type declarations -------------------------------------------------------
-typedef TMD2VertexIndex *PMD2VertexIndex;
-
-struct DECLSPEC_DRECORD TMD2VertexIndex
-{
-public:
-	int A;
-	int B;
-	int C;
-	float A_S;
-	float A_T;
-	float B_S;
-	float B_T;
-	float C_S;
-	float C_T;
-};
-
-
-struct DECLSPEC_DRECORD TMD2Triangle
-{
-public:
-	Stage::Vectortypes::TVector3s VertexIndex;
-	Stage::Vectortypes::TVector3s TextureCoordIndex;
-};
-
-
-struct DECLSPEC_DRECORD TMD2TriangleVertex
-{
-public:
-	System::StaticArray<System::Byte, 3> Vert;
-	System::Byte LightnormalIndex;
-};
-
-
-typedef TMD2AliasFrame *PMD2AliasFrame;
-
-struct DECLSPEC_DRECORD TMD2AliasFrame
-{
-public:
-	Stage::Vectortypes::TVector3f Scale;
-	Stage::Vectortypes::TVector3f Translate;
-	System::StaticArray<char, 16> Name;
-	System::StaticArray<TMD2TriangleVertex, 1> Vertices;
-};
-
-
-struct DECLSPEC_DRECORD TMD2Header
-{
-public:
-	int Ident;
-	int Version;
-	int SkinWidth;
-	int SkinHeight;
-	int FrameSize;
-	int Num_Skins;
-	int Num_Vertices;
-	int Num_TextureCoords;
-	int Num_VertexIndices;
-	int Num_GLCommdands;
-	int Num_Frames;
-	int Offset_skins;
-	int Offset_st;
-	int Offset_tris;
-	int Offset_frames;
-	int Offset_glcmds;
-	int Offset_end;
-};
-
-
-typedef System::DynamicArray<TMD2VertexIndex> TIndexList;
-
-typedef System::DynamicArray<Stage::Vectortypes::TVector3f> Formatx_Md2__1;
-
-typedef System::DynamicArray<System::DynamicArray<Stage::Vectortypes::TVector3f> > TGLVertexList;
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TFileMD2 : public System::TObject
-{
-	typedef System::TObject inherited;
-	
-private:
-	System::LongInt FiFrames;
-	System::LongInt FiVertices;
-	System::LongInt FiTriangles;
-	void __fastcall FreeLists();
-	
-public:
-	TIndexList fIndexList;
-	TGLVertexList fVertexList;
-	System::Classes::TStrings* FrameNames;
-	__fastcall virtual TFileMD2();
-	__fastcall virtual ~TFileMD2();
-	void __fastcall LoadFromStream(System::Classes::TStream* aStream);
-	__property System::LongInt iFrames = {read=FiFrames, nodefault};
-	__property System::LongInt iVertices = {read=FiVertices, nodefault};
-	__property System::LongInt iTriangles = {read=FiTriangles, nodefault};
-	__property TIndexList IndexList = {read=fIndexList};
-	__property TGLVertexList VertexList = {read=fVertexList};
-};
-
-#pragma pack(pop)
-
-//-- var, const, procedure ---------------------------------------------------
-static _DELPHI_CONST System::Word MAX_MD2_TRIANGLES = System::Word(0x1000);
-static _DELPHI_CONST System::Word MAX_MD2_VERTICES = System::Word(0x800);
-static _DELPHI_CONST System::Word MAX_MD2_FRAMES = System::Word(0x200);
-static _DELPHI_CONST System::Int8 MAX_MD2_SKINS = System::Int8(0x20);
-static _DELPHI_CONST System::Int8 MAX_MD2_SKINNAME = System::Int8(0x40);
-}	/* namespace Md2 */
-}	/* namespace Formatx */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATX_MD2)
-using namespace Formatx::Md2;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATX)
-using namespace Formatx;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// Formatx_MD2HPP

include/Win32/Formatx.MD3.hpp

@@ -1,190 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'Formatx.MD3.pas' rev: 36.00 (Windows)
-
-#ifndef Formatx_MD3HPP
-#define Formatx_MD3HPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <System.Classes.hpp>
-#include <Stage.VectorTypes.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Formatx
-{
-namespace Md3
-{
-//-- forward type declarations -----------------------------------------------
-struct TMD3Tag;
-struct TMD3Bone;
-struct TMD3Triangle;
-struct TMD3Face;
-struct TMD3TexCoord;
-struct TMD3Skin;
-struct TMD3Header;
-struct TMD3MeshHeader;
-struct TMD3MeshData;
-class DELPHICLASS TFileMD3;
-//-- type declarations -------------------------------------------------------
-struct DECLSPEC_DRECORD TMD3Tag
-{
-public:
-	System::StaticArray<char, 64> strName;
-	Stage::Vectortypes::TVector3f vPosition;
-	Stage::Vectortypes::TMatrix3f rotation;
-};
-
-
-struct DECLSPEC_DRECORD TMD3Bone
-{
-public:
-	Stage::Vectortypes::TVector3f mins;
-	Stage::Vectortypes::TVector3f maxs;
-	Stage::Vectortypes::TVector3f position;
-	float scale;
-	System::StaticArray<char, 16> creator;
-};
-
-
-struct DECLSPEC_DRECORD TMD3Triangle
-{
-public:
-	Stage::Vectortypes::TVector3s vertex;
-	Stage::Vectortypes::TVector2b normal;
-};
-
-
-struct DECLSPEC_DRECORD TMD3Face
-{
-public:
-	Stage::Vectortypes::TVector3i vertexIndices;
-};
-
-
-struct DECLSPEC_DRECORD TMD3TexCoord
-{
-public:
-	Stage::Vectortypes::TVector2f textureCoord;
-};
-
-
-struct DECLSPEC_DRECORD TMD3Skin
-{
-public:
-	System::StaticArray<char, 64> strName;
-	int shaderIndex;
-};
-
-
-struct DECLSPEC_DRECORD TMD3Header
-{
-public:
-	System::StaticArray<char, 4> fileID;
-	int version;
-	System::StaticArray<char, 64> strFile;
-	int flags;
-	int numFrames;
-	int numTags;
-	int numMeshes;
-	int numMaxSkins;
-	int headerSize;
-	int tagStart;
-	int tagEnd;
-	int fileSize;
-};
-
-
-struct DECLSPEC_DRECORD TMD3MeshHeader
-{
-public:
-	System::StaticArray<char, 4> meshID;
-	System::StaticArray<char, 64> strName;
-	int flags;
-	int numMeshFrames;
-	int numSkins;
-	int numVertices;
-	int numTriangles;
-	int triStart;
-	int headerSize;
-	int uvStart;
-	int vertexStart;
-	int meshSize;
-};
-
-
-struct DECLSPEC_DRECORD TMD3MeshData
-{
-	
-private:
-	typedef System::DynamicArray<TMD3Skin> _TMD3MeshData__1;
-	
-	typedef System::DynamicArray<TMD3Face> _TMD3MeshData__2;
-	
-	typedef System::DynamicArray<TMD3TexCoord> _TMD3MeshData__3;
-	
-	typedef System::DynamicArray<TMD3Triangle> _TMD3MeshData__4;
-	
-	
-public:
-	TMD3MeshHeader MeshHeader;
-	_TMD3MeshData__1 Skins;
-	_TMD3MeshData__2 Triangles;
-	_TMD3MeshData__3 TexCoords;
-	_TMD3MeshData__4 Vertices;
-};
-
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TFileMD3 : public System::TObject
-{
-	typedef System::TObject inherited;
-	
-	
-private:
-	typedef System::DynamicArray<TMD3Bone> _TFileMD3__1;
-	
-	typedef System::DynamicArray<TMD3Tag> _TFileMD3__2;
-	
-	typedef System::DynamicArray<TMD3MeshData> _TFileMD3__3;
-	
-	
-public:
-	TMD3Header ModelHeader;
-	_TFileMD3__1 Bones;
-	_TFileMD3__2 Tags;
-	_TFileMD3__3 MeshData;
-	void __fastcall LoadFromStream(System::Classes::TStream* aStream);
-public:
-	/* TObject.Create */ inline __fastcall TFileMD3() : System::TObject() { }
-	/* TObject.Destroy */ inline __fastcall virtual ~TFileMD3() { }
-	
-};
-
-#pragma pack(pop)
-
-//-- var, const, procedure ---------------------------------------------------
-}	/* namespace Md3 */
-}	/* namespace Formatx */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATX_MD3)
-using namespace Formatx::Md3;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATX)
-using namespace Formatx;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// Formatx_MD3HPP

include/Win32/Formatx.OCT.hpp

@@ -1,152 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'Formatx.OCT.pas' rev: 36.00 (Windows)
-
-#ifndef Formatx_OCTHPP
-#define Formatx_OCTHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <System.Classes.hpp>
-#include <System.SysUtils.hpp>
-#include <Stage.VectorGeometry.hpp>
-#include <Stage.VectorTypes.hpp>
-#include <GXS.VectorLists.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Formatx
-{
-namespace Oct
-{
-//-- forward type declarations -----------------------------------------------
-struct TOCTHeader;
-struct TOCTVertex;
-struct TOCTFace;
-struct TOCTTexture;
-struct TOCTLightmap;
-struct TOCTLight;
-class DELPHICLASS TOCTFile;
-//-- type declarations -------------------------------------------------------
-struct DECLSPEC_DRECORD TOCTHeader
-{
-public:
-	int numVerts;
-	int numFaces;
-	int numTextures;
-	int numLightmaps;
-	int numLights;
-};
-
-
-struct DECLSPEC_DRECORD TOCTVertex
-{
-public:
-	Stage::Vectorgeometry::TTexPoint tv;
-	Stage::Vectorgeometry::TTexPoint lv;
-	Stage::Vectorgeometry::TAffineVector pos;
-};
-
-
-struct DECLSPEC_DRECORD TOCTFace
-{
-public:
-	int start;
-	int num;
-	int id;
-	int lid;
-	Stage::Vectorgeometry::THmgPlane p;
-};
-
-
-typedef TOCTFace *POCTFace;
-
-struct DECLSPEC_DRECORD TOCTTexture
-{
-public:
-	int id;
-	System::StaticArray<char, 64> Name;
-};
-
-
-struct DECLSPEC_DRECORD TOCTLightmap
-{
-public:
-	int id;
-	System::StaticArray<System::Byte, 49152> map;
-};
-
-
-typedef TOCTLightmap *POCTLightmap;
-
-struct DECLSPEC_DRECORD TOCTLight
-{
-public:
-	Stage::Vectorgeometry::TAffineVector pos;
-	Stage::Vectorgeometry::TAffineVector color;
-	int intensity;
-};
-
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TOCTFile : public System::TObject
-{
-	typedef System::TObject inherited;
-	
-	
-private:
-	typedef System::DynamicArray<TOCTVertex> _TOCTFile__1;
-	
-	typedef System::DynamicArray<TOCTFace> _TOCTFile__2;
-	
-	typedef System::DynamicArray<TOCTTexture> _TOCTFile__3;
-	
-	typedef System::DynamicArray<TOCTLightmap> _TOCTFile__4;
-	
-	typedef System::DynamicArray<TOCTLight> _TOCTFile__5;
-	
-	
-public:
-	TOCTHeader Header;
-	_TOCTFile__1 Vertices;
-	_TOCTFile__2 Faces;
-	_TOCTFile__3 Textures;
-	_TOCTFile__4 Lightmaps;
-	_TOCTFile__5 Lights;
-	Stage::Vectorgeometry::TAffineVector PlayerPos;
-	__fastcall TOCTFile()/* overload */;
-	__fastcall TOCTFile(System::Classes::TStream* octStream)/* overload */;
-	void __fastcall SaveToStream(System::Classes::TStream* aStream);
-	void __fastcall AddTriangles(Gxs::Vectorlists::TgxAffineVectorList* vertexCoords, Gxs::Vectorlists::TgxAffineVectorList* texMapCoords, const System::UnicodeString textureName);
-	void __fastcall AddLight(const Stage::Vectorgeometry::TAffineVector &lightPos, const Stage::Vectortypes::TGLVector &lightColor, int lightIntensity);
-public:
-	/* TObject.Destroy */ inline __fastcall virtual ~TOCTFile() { }
-	
-};
-
-#pragma pack(pop)
-
-//-- var, const, procedure ---------------------------------------------------
-}	/* namespace Oct */
-}	/* namespace Formatx */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATX_OCT)
-using namespace Formatx::Oct;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATX)
-using namespace Formatx;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// Formatx_OCTHPP

include/Win32/Formatx.Q3BSP.hpp

@@ -1,246 +0,0 @@
-// CodeGear C++Builder
-// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
-// All rights reserved
-
-// (DO NOT EDIT: machine generated header) 'Formatx.Q3BSP.pas' rev: 36.00 (Windows)
-
-#ifndef Formatx_Q3BSPHPP
-#define Formatx_Q3BSPHPP
-
-#pragma delphiheader begin
-#pragma option push
-#if defined(__BORLANDC__) && !defined(__clang__)
-#pragma option -w-      // All warnings off
-#pragma option -Vx      // Zero-length empty class member 
-#endif
-#pragma pack(push,8)
-#include <System.hpp>
-#include <SysInit.hpp>
-#include <System.Classes.hpp>
-#include <System.SysUtils.hpp>
-#include <Stage.VectorTypes.hpp>
-
-//-- user supplied -----------------------------------------------------------
-
-namespace Formatx
-{
-namespace Q3bsp
-{
-//-- forward type declarations -----------------------------------------------
-struct TBSPHeader;
-struct TBSPLump;
-struct TBSPNode;
-struct TBSPLeaf;
-struct TBSPModel;
-struct TBSPVertex;
-struct TBSPFace;
-struct TBSPTexture;
-struct TBSPLightmap;
-struct TBSPVisData;
-class DELPHICLASS TQ3BSP;
-//-- type declarations -------------------------------------------------------
-struct DECLSPEC_DRECORD TBSPHeader
-{
-public:
-	System::StaticArray<char, 4> StrID;
-	int Version;
-};
-
-
-struct DECLSPEC_DRECORD TBSPLump
-{
-public:
-	int Offset;
-	int Length;
-};
-
-
-typedef System::StaticArray<int, 6> TBSPBBox;
-
-struct DECLSPEC_DRECORD TBSPNode
-{
-public:
-	int Plane;
-	System::StaticArray<int, 2> Children;
-	TBSPBBox BBox;
-};
-
-
-struct DECLSPEC_DRECORD TBSPLeaf
-{
-public:
-	int Cluster;
-	int Area;
-	TBSPBBox BBox;
-	int FirstFace;
-	int NumFaces;
-	int FirstBrush;
-	int NumBrushes;
-};
-
-
-struct DECLSPEC_DRECORD TBSPModel
-{
-public:
-	TBSPBBox BBox;
-	int FirstFace;
-	int NumFaces;
-	int FirstBrush;
-	int NumBrushes;
-};
-
-
-struct DECLSPEC_DRECORD TBSPVertex
-{
-public:
-	Stage::Vectortypes::TVector3f Position;
-	Stage::Vectortypes::TVector2f TextureCoord;
-	Stage::Vectortypes::TVector2f LightmapCoord;
-	Stage::Vectortypes::TVector3f Normal;
-	System::StaticArray<System::Byte, 4> Color;
-};
-
-
-typedef TBSPVertex *PBSPVertex;
-
-struct DECLSPEC_DRECORD TBSPFace
-{
-public:
-	int textureID;
-	int effect;
-	int FaceType;
-	int startVertIndex;
-	int numOfVerts;
-	int meshVertIndex;
-	int numMeshVerts;
-	int lightmapID;
-	System::StaticArray<int, 2> lMapCorner;
-	System::StaticArray<int, 2> lMapSize;
-	Stage::Vectortypes::TVector3f lMapPos;
-	System::StaticArray<Stage::Vectortypes::TVector3f, 2> lMapVecs;
-	Stage::Vectortypes::TVector3f vNormal;
-	System::StaticArray<int, 2> Size;
-};
-
-
-typedef TBSPFace *PBSPFace;
-
-struct DECLSPEC_DRECORD TBSPTexture
-{
-public:
-	System::StaticArray<System::WideChar, 64> TextureName;
-	int flags;
-	int contents;
-};
-
-
-typedef TBSPTexture *PBSPTexture;
-
-struct DECLSPEC_DRECORD TBSPLightmap
-{
-public:
-	System::StaticArray<System::Byte, 49152> imageBits;
-};
-
-
-typedef TBSPLightmap *PBSPLightmap;
-
-struct DECLSPEC_DRECORD TBSPVisData
-{
-	
-private:
-	typedef System::DynamicArray<System::Byte> _TBSPVisData__1;
-	
-	
-public:
-	int numOfClusters;
-	int bytesPerCluster;
-	_TBSPVisData__1 bitSets;
-};
-
-
-#pragma pack(push,4)
-class PASCALIMPLEMENTATION TQ3BSP : public System::TObject
-{
-	typedef System::TObject inherited;
-	
-	
-private:
-	typedef System::DynamicArray<TBSPLump> _TQ3BSP__1;
-	
-	typedef System::DynamicArray<TBSPVertex> _TQ3BSP__2;
-	
-	typedef System::DynamicArray<TBSPNode> _TQ3BSP__3;
-	
-	typedef System::DynamicArray<Stage::Vectortypes::TVector4f> _TQ3BSP__4;
-	
-	typedef System::DynamicArray<TBSPLeaf> _TQ3BSP__5;
-	
-	typedef System::DynamicArray<TBSPFace> _TQ3BSP__6;
-	
-	typedef System::DynamicArray<TBSPTexture> _TQ3BSP__7;
-	
-	typedef System::DynamicArray<TBSPLightmap> _TQ3BSP__8;
-	
-	
-public:
-	TBSPHeader Header;
-	_TQ3BSP__1 Lumps;
-	int numOfVerts;
-	int NumOfNodes;
-	int NumOfPlanes;
-	int NumOfLeaves;
-	int NumOfFaces;
-	int NumOfTextures;
-	int NumOfLightmaps;
-	_TQ3BSP__2 Vertices;
-	_TQ3BSP__3 Nodes;
-	_TQ3BSP__4 Planes;
-	_TQ3BSP__5 Leaves;
-	_TQ3BSP__6 Faces;
-	_TQ3BSP__7 Textures;
-	_TQ3BSP__8 Lightmaps;
-	TBSPVisData VisData;
-	__fastcall TQ3BSP(System::Classes::TStream* bspStream);
-public:
-	/* TObject.Destroy */ inline __fastcall virtual ~TQ3BSP() { }
-	
-};
-
-#pragma pack(pop)
-
-//-- var, const, procedure ---------------------------------------------------
-static _DELPHI_CONST System::Int8 FACE_POLYGON = System::Int8(0x1);
-static _DELPHI_CONST System::Word MAX_TEXTURES = System::Word(0x3e8);
-static _DELPHI_CONST System::Int8 kEntities = System::Int8(0x0);
-static _DELPHI_CONST System::Int8 kTextures = System::Int8(0x1);
-static _DELPHI_CONST System::Int8 kPlanes = System::Int8(0x2);
-static _DELPHI_CONST System::Int8 kNodes = System::Int8(0x3);
-static _DELPHI_CONST System::Int8 kLeafs = System::Int8(0x4);
-static _DELPHI_CONST System::Int8 kLeafFaces = System::Int8(0x5);
-static _DELPHI_CONST System::Int8 kLeafBrushes = System::Int8(0x6);
-static _DELPHI_CONST System::Int8 kModels = System::Int8(0x7);
-static _DELPHI_CONST System::Int8 kBrushes = System::Int8(0x8);
-static _DELPHI_CONST System::Int8 kBrushSides = System::Int8(0x9);
-static _DELPHI_CONST System::Int8 kVertices = System::Int8(0xa);
-static _DELPHI_CONST System::Int8 kMeshVerts = System::Int8(0xb);
-static _DELPHI_CONST System::Int8 kShaders = System::Int8(0xc);
-static _DELPHI_CONST System::Int8 kFaces = System::Int8(0xd);
-static _DELPHI_CONST System::Int8 kLightmaps = System::Int8(0xe);
-static _DELPHI_CONST System::Int8 kLightVolumes = System::Int8(0xf);
-static _DELPHI_CONST System::Int8 kVisData = System::Int8(0x10);
-static _DELPHI_CONST System::Int8 kMaxLumps = System::Int8(0x11);
-}	/* namespace Q3bsp */
-}	/* namespace Formatx */
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATX_Q3BSP)
-using namespace Formatx::Q3bsp;
-#endif
-#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_FORMATX)
-using namespace Formatx;
-#endif
-#pragma pack(pop)
-#pragma option pop
-
-#pragma delphiheader end.
-//-- end unit ----------------------------------------------------------------
-#endif	// Formatx_Q3BSPHPP