Initial commit

2026-06-12 23:18:12 +08:00
commit 424bde1b02
249 changed files with 40338 additions and 0 deletions
@@ -0,0 +1,70 @@
+// CodeGear C++Builder
+// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
+// All rights reserved
+
+// (DO NOT EDIT: machine generated header) 'uCEFWorkSchedulerThread.pas' rev: 37.00 (Windows)
+
+#ifndef uCEFWorkSchedulerThreadHPP
+#define uCEFWorkSchedulerThreadHPP
+
+#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.SyncObjs.hpp>
+#include <uCEFConstants.hpp>
+
+//-- user supplied -----------------------------------------------------------
+
+namespace Ucefworkschedulerthread
+{
+//-- forward type declarations -----------------------------------------------
+class DELPHICLASS TCEFWorkSchedulerThread;
+//-- type declarations -------------------------------------------------------
+class PASCALIMPLEMENTATION TCEFWorkSchedulerThread : public System::Classes::TThread
+{
+	typedef System::Classes::TThread inherited;
+	
+protected:
+	System::Syncobjs::TCriticalSection* FCritSect;
+	int FInterval;
+	System::Syncobjs::TEvent* FEvent;
+	System::Classes::TNotifyEvent FOnPulse;
+	bool FPulsing;
+	bool FMustReset;
+	int FDefaultInterval;
+	bool __fastcall Lock();
+	void __fastcall Unlock();
+	bool __fastcall CanPulse(int &aInterval);
+	void __fastcall DoOnPulseEvent();
+	void __fastcall EventTimeOut();
+	void __fastcall SignaledEvent();
+	virtual void __fastcall Execute();
+	
+public:
+	__fastcall TCEFWorkSchedulerThread();
+	__fastcall virtual ~TCEFWorkSchedulerThread();
+	virtual void __fastcall AfterConstruction();
+	void __fastcall NextPulse(int aInterval);
+	__property int DefaultInterval = {read=FDefaultInterval, write=FDefaultInterval, default=33};
+	__property System::Classes::TNotifyEvent OnPulse = {read=FOnPulse, write=FOnPulse};
+};
+
+
+//-- var, const, procedure ---------------------------------------------------
+}	/* namespace Ucefworkschedulerthread */
+#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_UCEFWORKSCHEDULERTHREAD)
+using namespace Ucefworkschedulerthread;
+#endif
+#pragma pack(pop)
+#pragma option pop
+
+#pragma delphiheader end.
+//-- end unit ----------------------------------------------------------------
+#endif	// uCEFWorkSchedulerThreadHPP