diff --git a/components/tvplanit/examples/fulldemo/mormotdatamodule.lfm b/components/tvplanit/examples/mormot/fulldemo/mormotdatamodule.lfm similarity index 100% rename from components/tvplanit/examples/fulldemo/mormotdatamodule.lfm rename to components/tvplanit/examples/mormot/fulldemo/mormotdatamodule.lfm diff --git a/components/tvplanit/examples/fulldemo/mormotdatamodule.pas b/components/tvplanit/examples/mormot/fulldemo/mormotdatamodule.pas similarity index 98% rename from components/tvplanit/examples/fulldemo/mormotdatamodule.pas rename to components/tvplanit/examples/mormot/fulldemo/mormotdatamodule.pas index e0b5d5d45..df9759a4b 100644 --- a/components/tvplanit/examples/fulldemo/mormotdatamodule.pas +++ b/components/tvplanit/examples/mormot/fulldemo/mormotdatamodule.pas @@ -21,7 +21,7 @@ type public Datastore: TVpmORMotDatastore; constructor Create(AOwner: TComponent); override; - destructor Destroy; + destructor Destroy; override; end; var diff --git a/components/tvplanit/examples/fulldemo/mormotdemo.lpi b/components/tvplanit/examples/mormot/fulldemo/mormotdemo.lpi similarity index 76% rename from components/tvplanit/examples/fulldemo/mormotdemo.lpi rename to components/tvplanit/examples/mormot/fulldemo/mormotdemo.lpi index c70d57c71..e1df65da2 100644 --- a/components/tvplanit/examples/fulldemo/mormotdemo.lpi +++ b/components/tvplanit/examples/mormot/fulldemo/mormotdemo.lpi @@ -39,7 +39,7 @@ - + @@ -70,6 +70,28 @@ + + + + + + + + + + + + + + + + + + + + + + @@ -79,8 +101,8 @@ - - + + @@ -95,9 +117,6 @@ - - - diff --git a/components/tvplanit/examples/fulldemo/mormotdemo.lpr b/components/tvplanit/examples/mormot/fulldemo/mormotdemo.lpr similarity index 100% rename from components/tvplanit/examples/fulldemo/mormotdemo.lpr rename to components/tvplanit/examples/mormot/fulldemo/mormotdemo.lpr diff --git a/components/tvplanit/examples/readme.txt b/components/tvplanit/examples/readme.txt index c098eaf39..fd2403808 100644 --- a/components/tvplanit/examples/readme.txt +++ b/components/tvplanit/examples/readme.txt @@ -17,6 +17,9 @@ VisualPlanIt components can be applied. - gadgets: demonstrates usage of TVpClock and TVpLEDDisplay +- mormot: demonstrates cooperation of VisualPlanIt with mORMot. The folder + contains a dedicated mORMot datastore and a server and simple client project. + - navbar: demonstrates usage of TVpNavBar - runtime: a simple demo in which components are created at runtime. Does not diff --git a/components/tvplanit/source/vpconst.pas b/components/tvplanit/source/vpconst.pas index d0f3ddffd..5b2db2128 100644 --- a/components/tvplanit/source/vpconst.pas +++ b/components/tvplanit/source/vpconst.pas @@ -48,7 +48,7 @@ uses const BuildTime = {$I %DATE%} + {$I %TIME}; //'09/13/2002 09:25 AM'; - VpVersionStr = 'v1.04'; {Visual PlanIt library version} + VpVersionStr = 'v1.05'; {Visual PlanIt library version} VpProductName = 'Visual PlanIt'; BorderStyles : array[TBorderStyle] of LongInt =