Initial commit

CEF4Delphi/win32/hpps/uCEFPreferenceObserver.hpp

@@ -0,0 +1,139 @@
+// CodeGear C++Builder
+// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
+// All rights reserved
+
+// (DO NOT EDIT: machine generated header) 'uCEFPreferenceObserver.pas' rev: 37.00 (Windows)
+
+#ifndef uCEFPreferenceObserverHPP
+#define uCEFPreferenceObserverHPP
+
+#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 <uCEFBaseRefCounted.hpp>
+#include <uCEFInterfaces.hpp>
+#include <uCEFTypes.hpp>
+
+//-- user supplied -----------------------------------------------------------
+
+namespace Ucefpreferenceobserver
+{
+//-- forward type declarations -----------------------------------------------
+class DELPHICLASS TCefPreferenceObserverOwn;
+class DELPHICLASS TCustomPreferenceObserver;
+class DELPHICLASS TPreferenceInfo;
+class DELPHICLASS TPreferenceInfoList;
+//-- type declarations -------------------------------------------------------
+#pragma pack(push,4)
+class PASCALIMPLEMENTATION TCefPreferenceObserverOwn : public Ucefbaserefcounted::TCefBaseRefCountedOwn
+{
+	typedef Ucefbaserefcounted::TCefBaseRefCountedOwn inherited;
+	
+protected:
+	virtual void __fastcall OnPreferenceChanged(const Uceftypes::ustring name);
+	virtual void __fastcall RemoveReferences();
+	
+public:
+	__fastcall virtual TCefPreferenceObserverOwn();
+public:
+	/* TCefBaseRefCountedOwn.CreateData */ inline __fastcall virtual TCefPreferenceObserverOwn(unsigned size, bool owned) : Ucefbaserefcounted::TCefBaseRefCountedOwn(size, owned) { }
+	/* TCefBaseRefCountedOwn.Destroy */ inline __fastcall virtual ~TCefPreferenceObserverOwn() { }
+	
+private:
+	void *__ICefPreferenceObserver;	// Ucefinterfaces::ICefPreferenceObserver 
+	
+public:
+	#if defined(MANAGED_INTERFACE_OPERATORS)
+	// {874985B5-2DA9-47E6-9E5F-4151BAF5A444}
+	operator Ucefinterfaces::_di_ICefPreferenceObserver()
+	{
+		Ucefinterfaces::_di_ICefPreferenceObserver intf;
+		this->GetInterface(intf);
+		return intf;
+	}
+	#else
+	operator Ucefinterfaces::ICefPreferenceObserver*(void) { return (Ucefinterfaces::ICefPreferenceObserver*)&__ICefPreferenceObserver; }
+	#endif
+	
+};
+
+#pragma pack(pop)
+
+#pragma pack(push,4)
+class PASCALIMPLEMENTATION TCustomPreferenceObserver : public TCefPreferenceObserverOwn
+{
+	typedef TCefPreferenceObserverOwn inherited;
+	
+protected:
+	void *FEvents;
+	virtual void __fastcall OnPreferenceChanged(const Uceftypes::ustring name);
+	virtual void __fastcall RemoveReferences();
+	
+public:
+	__fastcall virtual TCustomPreferenceObserver(const Ucefinterfaces::_di_IChromiumEvents events);
+	__fastcall virtual ~TCustomPreferenceObserver();
+public:
+	/* TCefBaseRefCountedOwn.CreateData */ inline __fastcall virtual TCustomPreferenceObserver(unsigned size, bool owned) : TCefPreferenceObserverOwn(size, owned) { }
+	
+};
+
+#pragma pack(pop)
+
+#pragma pack(push,4)
+class PASCALIMPLEMENTATION TPreferenceInfo : public System::TObject
+{
+	typedef System::TObject inherited;
+	
+protected:
+	Ucefinterfaces::_di_ICefPreferenceObserver FObserver;
+	Ucefinterfaces::_di_ICefRegistration FRegistration;
+	Uceftypes::ustring FName;
+	
+public:
+	__fastcall TPreferenceInfo(const Uceftypes::ustring aName, const Ucefinterfaces::_di_IChromiumEvents events);
+	__fastcall virtual ~TPreferenceInfo();
+	__property Uceftypes::ustring PrefName = {read=FName};
+	__property Ucefinterfaces::_di_ICefPreferenceObserver Observer = {read=FObserver};
+	__property Ucefinterfaces::_di_ICefRegistration Registration = {read=FRegistration, write=FRegistration};
+};
+
+#pragma pack(pop)
+
+#pragma pack(push,4)
+class PASCALIMPLEMENTATION TPreferenceInfoList : public System::Classes::TList
+{
+	typedef System::Classes::TList inherited;
+	
+protected:
+	int __fastcall SearchPreference(const Uceftypes::ustring aName);
+	
+public:
+	__fastcall virtual ~TPreferenceInfoList();
+	bool __fastcall HasPreference(const Uceftypes::ustring aName);
+	int __fastcall AddPreference(const Uceftypes::ustring aName, const Ucefinterfaces::_di_IChromiumEvents events);
+	void __fastcall RemovePreference(const Uceftypes::ustring aName);
+public:
+	/* TObject.Create */ inline __fastcall TPreferenceInfoList() : System::Classes::TList() { }
+	
+};
+
+#pragma pack(pop)
+
+//-- var, const, procedure ---------------------------------------------------
+}	/* namespace Ucefpreferenceobserver */
+#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_UCEFPREFERENCEOBSERVER)
+using namespace Ucefpreferenceobserver;
+#endif
+#pragma pack(pop)
+#pragma option pop
+
+#pragma delphiheader end.
+//-- end unit ----------------------------------------------------------------
+#endif	// uCEFPreferenceObserverHPP