Updated README.md

Examples/Demos/physics/ClothActor/fClothActorD.dfm

@@ -1,28 +1,37 @@
 object FormClothActor: TFormClothActor
   Left = 69
   Top = 116
+  Margins.Left = 5
+  Margins.Top = 5
+  Margins.Right = 5
+  Margins.Bottom = 5
   Caption = 'Cloth Actor'
-  ClientHeight = 432
-  ClientWidth = 626
+  ClientHeight = 756
+  ClientWidth = 1096
   Color = clBtnFace
   Font.Charset = DEFAULT_CHARSET
   Font.Color = clWindowText
-  Font.Height = -11
+  Font.Height = -19
   Font.Name = 'MS Sans Serif'
   Font.Style = []
   Position = poScreenCenter
   OnCreate = FormCreate
   OnDestroy = FormDestroy
-  TextHeight = 13
+  PixelsPerInch = 168
+  TextHeight = 24
   object GLSceneViewer1: TGLSceneViewer
     Left = 0
     Top = 0
-    Width = 626
-    Height = 432
+    Width = 1096
+    Height = 756
+    Margins.Left = 5
+    Margins.Top = 5
+    Margins.Right = 5
+    Margins.Bottom = 5
     Camera = GLCamera1
     Buffer.AmbientColor.Color = {CDCCCC3ECDCCCC3ECDCCCC3E0000803F}
     Buffer.ContextOptions = [roDoubleBuffer, roStencilBuffer, roRenderToWindow, roTwoSideLighting]
-    FieldOfView = 153.933288574218800000
+    FieldOfView = 164.929870605468800000
     PenAsTouch = False
     Align = alClient
     OnMouseDown = GLSceneViewer1MouseDown
@@ -30,19 +39,26 @@ object FormClothActor: TFormClothActor
     TabOrder = 0
   end
   object cbShowOctree: TCheckBox
-    Left = 280
-    Top = 17
-    Width = 97
-    Height = 17
+    Left = 490
+    Top = 30
+    Width = 170
+    Height = 30
+    Margins.Left = 5
+    Margins.Top = 5
+    Margins.Right = 5
+    Margins.Bottom = 5
     Caption = 'Show Octree'
     TabOrder = 1
-    Visible = False
   end
   object StaticTextFPS: TStaticText
-    Left = 16
-    Top = 17
-    Width = 24
-    Height = 17
+    Left = 28
+    Top = 30
+    Width = 40
+    Height = 28
+    Margins.Left = 5
+    Margins.Top = 5
+    Margins.Right = 5
+    Margins.Bottom = 5
     Caption = 'FPS'
     TabOrder = 2
   end

Examples/Demos/physics/ClothActor/fClothActorD.pas

@@ -145,9 +145,9 @@ end;
 procedure TFormClothActor.FormCreate(Sender: TObject);
 var
   FloorVC: TGLVerletFloor;
+  Path: TFileName;
 begin
-  var
-    Path: TFileName := GetCurrentAssetPath();
+  Path := GetCurrentAssetPath();
   Randomize;
 
   // Load dynamic models of actors with textures and/or animations

Packages/GLScene_Cg_RT.dpk

@@ -44,3 +44,4 @@ contains
 
 end.
 
+

Packages/GLScene_Cg_RT.dproj

@@ -4,7 +4,7 @@
         <MainSource>GLScene_Cg_RT.dpk</MainSource>
         <Base>True</Base>
         <Config Condition="'$(Config)'==''">Debug</Config>
-        <TargetedPlatforms>3</TargetedPlatforms>
+        <TargetedPlatforms>1048577</TargetedPlatforms>
         <AppType>Package</AppType>
         <FrameworkType>VCL</FrameworkType>
         <ProjectVersion>20.1</ProjectVersion>
@@ -176,8 +176,8 @@
             </Delphi.Personality>
             <Platforms>
                 <Platform value="Win32">True</Platform>
-                <Platform value="Win64">True</Platform>
-                <Platform value="Win64x">False</Platform>
+                <Platform value="Win64">False</Platform>
+                <Platform value="Win64x">True</Platform>
             </Platforms>
             <Deployment Version="4">
                 <DeployFile LocalName="C:\Users\Public\Documents\Embarcadero\Studio\20.0\Bpl\GLScene_Cg_RT.bpl" Configuration="Debug" Class="ProjectOutput"/>

Packages/GLScene_GPU_RT.dproj

@@ -4,7 +4,7 @@
         <MainSource>GLScene_GPU_RT.dpk</MainSource>
         <Base>True</Base>
         <Config Condition="'$(Config)'==''">Debug</Config>
-        <TargetedPlatforms>3</TargetedPlatforms>
+        <TargetedPlatforms>1048577</TargetedPlatforms>
         <AppType>Package</AppType>
         <FrameworkType>VCL</FrameworkType>
         <ProjectVersion>20.1</ProjectVersion>
@@ -179,8 +179,8 @@
             </Delphi.Personality>
             <Platforms>
                 <Platform value="Win32">True</Platform>
-                <Platform value="Win64">True</Platform>
-                <Platform value="Win64x">False</Platform>
+                <Platform value="Win64">False</Platform>
+                <Platform value="Win64x">True</Platform>
             </Platforms>
             <Deployment Version="4">
                 <DeployFile LocalName="C:\Users\Public\Documents\Embarcadero\Studio\20.0\Bpl\GLScene_GPU_RT.bpl" Configuration="Debug" Class="ProjectOutput"/>

Packages/GLScene_Physics_RT.dpk

@@ -54,3 +54,4 @@ contains
 end.
 
 
+

Packages/GLScene_Physics_RT.dproj

@@ -4,7 +4,7 @@
         <MainSource>GLScene_Physics_RT.dpk</MainSource>
         <Base>True</Base>
         <Config Condition="'$(Config)'==''">Debug</Config>
-        <TargetedPlatforms>3</TargetedPlatforms>
+        <TargetedPlatforms>1048577</TargetedPlatforms>
         <AppType>Package</AppType>
         <FrameworkType>VCL</FrameworkType>
         <ProjectVersion>20.1</ProjectVersion>
@@ -208,8 +208,8 @@
             </Delphi.Personality>
             <Platforms>
                 <Platform value="Win32">True</Platform>
-                <Platform value="Win64">True</Platform>
-                <Platform value="Win64x">False</Platform>
+                <Platform value="Win64">False</Platform>
+                <Platform value="Win64x">True</Platform>
             </Platforms>
             <Deployment Version="4">
                 <DeployFile LocalName="C:\Users\Public\Documents\Embarcadero\Studio\22.0\Bpl\GLScene_Physics_RT.bpl" Configuration="Debug" Class="ProjectOutput"/>

Packages/GLScene_Sounds_RT.dpk

@@ -49,3 +49,4 @@ contains
 end.
 
 
+

Packages/GLScene_Sounds_RT.dproj

@@ -4,7 +4,7 @@
         <MainSource>GLScene_Sounds_RT.dpk</MainSource>
         <Base>True</Base>
         <Config Condition="'$(Config)'==''">Debug</Config>
-        <TargetedPlatforms>3</TargetedPlatforms>
+        <TargetedPlatforms>1048577</TargetedPlatforms>
         <AppType>Package</AppType>
         <FrameworkType>VCL</FrameworkType>
         <ProjectVersion>20.1</ProjectVersion>
@@ -202,8 +202,8 @@
             </Delphi.Personality>
             <Platforms>
                 <Platform value="Win32">True</Platform>
-                <Platform value="Win64">True</Platform>
-                <Platform value="Win64x">False</Platform>
+                <Platform value="Win64">False</Platform>
+                <Platform value="Win64x">True</Platform>
             </Platforms>
             <Deployment Version="4">
                 <DeployFile LocalName="C:\Users\Public\Documents\Embarcadero\Studio\22.0\Bpl\GLScene_Sounds_RT.bpl" Configuration="Debug" Class="ProjectOutput"/>

README.md

@@ -1,10 +1,23 @@
 # GLScene
+GLScene is a graphics engine based on OpenGL and VCL components for Delphi and C++ Builder.
+It provides a class library and tools for rendering 3D scenes with spatial objects,
+freeforms, verlets and virtual intelligent actors 
+Includes additional components for creating mesh objects with materials, shaders, 
+animations, and developing graphics applications with physics
+```
+Requirements
 
-GLScene is a graphics engine based on OpenGL and VCL components for Delphi & C++ Builder.
-It provides the class library and tools for rendering 3D scenes with spatial objects, 
-free forms and virtual smart actors.  
-Additional components are being developed for meshing, gridding, 
-lacing with shaders, audio and physics applications
+ IDE - Embarcadero RAD Studio
+ Visual C++ Redistributable for Visual Studio 2015
+
+How to install
+
+1. Download a zip archive of the last release or clone repository:
+git clone https://github.com/glscene/GLScene.git 
+2. Run ...GLScene/External/_setupDLL.cmd as admin to include dynamic libraries
+3. Configure the IDE settings and paths to sources
+4. Open GLScene.groupproj, compile and install components
+5. Run examples for Delphi & C++Builders
 
 GLS Team
 

Source/GLS.VerletTypes.pas

@@ -2,14 +2,15 @@
 // The graphics engine GLScene https://github.com/glscene
 //
 unit GLS.VerletTypes;
-
 (*
   Base Verlet modelling/simulation classes.
-  This unit is generic, GLScene-specific sub-classes are in GLVerletClasses.
+  This unit is generic, GLScene-specific sub-classes are in GLS.VerletClothify.
 
   Note that currently, the SatisfyConstraintForEdge methods push the nodes in
   the edge uniformly - it should push the closer node more for correct physics.
   It's a matter of leverage.
+  The registered classes are:
+  [TGLVerletSkeletonCollider, TGLVerletSphere, TGLVerletCapsule]
 *)
 interface