Delphi 10.3 Rio support (package and C++ files)

andrea-magni · Nov 25, 2018 · 2b94abd · 2b94abd
1 parent cbfa1e2
commit 2b94abd
Show file tree

Hide file tree

Showing 10 changed files with 1,152 additions and 62 deletions.
diff --git a/lib/cpp/DeviceAndPlatformInfo.hpp b/lib/cpp/DeviceAndPlatformInfo.hpp
@@ -0,0 +1,64 @@
+// CodeGear C++Builder
+// Copyright (c) 1995, 2017 by Embarcadero Technologies, Inc.
+// All rights reserved
+
+// (DO NOT EDIT: machine generated header) 'DeviceAndPlatformInfo.pas' rev: 33.00 (Windows)
+
+#ifndef DeviceandplatforminfoHPP
+#define DeviceandplatforminfoHPP
+
+#pragma delphiheader begin
+#pragma option push
+#pragma option -w-      // All warnings off
+#pragma option -Vx      // Zero-length empty class member 
+#pragma pack(push,8)
+#include <System.hpp>
+#include <SysInit.hpp>
+#include <System.Classes.hpp>
+#include <System.SysUtils.hpp>
+#include <System.Types.hpp>
+#include <System.Devices.hpp>
+#include <FMX.Types.hpp>
+#include <FMX.Objects.hpp>
+#include <FMX.Forms.hpp>
+#include <FMX.Controls.hpp>
+#include <FMX.Platform.hpp>
+#include <FMX.BehaviorManager.hpp>
+
+//-- user supplied -----------------------------------------------------------
+
+namespace Deviceandplatforminfo
+{
+//-- forward type declarations -----------------------------------------------
+struct TDeviceAndPlatformInfo;
+//-- type declarations -------------------------------------------------------
+struct DECLSPEC_DRECORD TDeviceAndPlatformInfo
+{
+public:
+	Fmx::Types::TOSPlatform Platform;
+	Fmx::Types::TDeviceDisplayMetrics DisplayMetrics;
+	System::Devices::TDeviceInfo::TDeviceClass DeviceClass;
+	System::UnicodeString DeviceName;
+	System::UnicodeString __fastcall ToString();
+	bool __fastcall IsPhone();
+	bool __fastcall IsTablet();
+	bool __fastcall IsDesktop();
+	bool __fastcall IsAndroid();
+	bool __fastcall IsWindows();
+	bool __fastcall IsiOS();
+	bool __fastcall IsOSX();
+	static TDeviceAndPlatformInfo __fastcall Retrieve(Fmx::Forms::TForm* const AForm = (Fmx::Forms::TForm*)(0x0));
+};
+
+
+//-- var, const, procedure ---------------------------------------------------
+}	/* namespace Deviceandplatforminfo */
+#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_DEVICEANDPLATFORMINFO)
+using namespace Deviceandplatforminfo;
+#endif
+#pragma pack(pop)
+#pragma option pop
+
+#pragma delphiheader end.
+//-- end unit ----------------------------------------------------------------
+#endif	// DeviceandplatforminfoHPP
diff --git a/lib/cpp/FrameStand.Editors.Forms.Test.hpp b/lib/cpp/FrameStand.Editors.Forms.Test.hpp
@@ -2,7 +2,7 @@
 // Copyright (c) 1995, 2017 by Embarcadero Technologies, Inc.
 // All rights reserved
 
-// (DO NOT EDIT: machine generated header) 'FrameStand.Editors.Forms.Test.pas' rev: 32.00 (Windows)
+// (DO NOT EDIT: machine generated header) 'FrameStand.Editors.Forms.Test.pas' rev: 33.00 (Windows)
 
 #ifndef Framestand_Editors_Forms_TestHPP
 #define Framestand_Editors_Forms_TestHPP
@@ -84,20 +84,21 @@ class PASCALIMPLEMENTATION TTestForm : public Fmx::Forms::TForm
 	void __fastcall HideActionUpdate(System::TObject* Sender);
 	void __fastcall ShowActionUpdate(System::TObject* Sender);
 	void __fastcall FormCreate(System::TObject* Sender);
+	void __fastcall FormDestroy(System::TObject* Sender);
 
 private:
 	Framestand::TFrameStand* FFrameStand;
 	Framestand::TFrameInfo__1<Frames::Test::TTestFrame*>* FFrameInfo;
 	void __fastcall SetFrameStand(Framestand::TFrameStand* const Value);
-	HIDESBASE Fmx::Controls::TStyleBook* __fastcall GetStyleBook(void);
-	System::UnicodeString __fastcall GetSelectedStyleName(void);
-	Fmx::Types::TAlignLayout __fastcall GetSelectedFrameAlign(void);
+	HIDESBASE Fmx::Controls::TStyleBook* __fastcall GetStyleBook();
+	System::UnicodeString __fastcall GetSelectedStyleName();
+	Fmx::Types::TAlignLayout __fastcall GetSelectedFrameAlign();
 
 protected:
-	virtual void __fastcall Init(void);
-	virtual void __fastcall DoFrameStandChanged(void);
-	void __fastcall SetupTestBed(void);
-	void __fastcall SetupTestFrameAndTestBed(void);
+	virtual void __fastcall Init();
+	virtual void __fastcall DoFrameStandChanged();
+	void __fastcall SetupTestBed();
+	void __fastcall SetupTestFrameAndTestBed();
 	__property System::UnicodeString SelectedStyleName = {read=GetSelectedStyleName};
 	__property Fmx::Types::TAlignLayout SelectedFrameAlign = {read=GetSelectedFrameAlign, nodefault};
 
@@ -107,7 +108,7 @@ class PASCALIMPLEMENTATION TTestForm : public Fmx::Forms::TForm
 public:
 	/* TCustomForm.Create */ inline __fastcall virtual TTestForm(System::Classes::TComponent* AOwner) : Fmx::Forms::TForm(AOwner) { }
 	/* TCustomForm.CreateNew */ inline __fastcall virtual TTestForm(System::Classes::TComponent* AOwner, NativeInt Dummy) : Fmx::Forms::TForm(AOwner, Dummy) { }
-	/* TCustomForm.Destroy */ inline __fastcall virtual ~TTestForm(void) { }
+	/* TCustomForm.Destroy */ inline __fastcall virtual ~TTestForm() { }
 
 };
 

diff --git a/lib/cpp/FrameStand.Editors.hpp b/lib/cpp/FrameStand.Editors.hpp
@@ -2,7 +2,7 @@
 // Copyright (c) 1995, 2017 by Embarcadero Technologies, Inc.
 // All rights reserved
 
-// (DO NOT EDIT: machine generated header) 'FrameStand.Editors.pas' rev: 32.00 (Windows)
+// (DO NOT EDIT: machine generated header) 'FrameStand.Editors.pas' rev: 33.00 (Windows)
 
 #ifndef Framestand_EditorsHPP
 #define Framestand_EditorsHPP
@@ -34,15 +34,15 @@ class PASCALIMPLEMENTATION TFrameStandEditor : public Designeditors::TComponentE
 	typedef Designeditors::TComponentEditor inherited;
 
 private:
-	Framestand::TFrameStand* __fastcall CurrentObj(void);
+	Framestand::TFrameStand* __fastcall CurrentObj();
 
 public:
-	virtual void __fastcall Edit(void);
+	virtual void __fastcall Edit();
 public:
 	/* TComponentEditor.Create */ inline __fastcall virtual TFrameStandEditor(System::Classes::TComponent* AComponent, Designintf::_di_IDesigner ADesigner) : Designeditors::TComponentEditor(AComponent, ADesigner) { }
 
 public:
-	/* TObject.Destroy */ inline __fastcall virtual ~TFrameStandEditor(void) { }
+	/* TObject.Destroy */ inline __fastcall virtual ~TFrameStandEditor() { }
 
 };