⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 itimers.hpp

📁 Iocomp Ultra Pack v3.0.2 Sources.For.Delphi 数据显示编程插件,可用于工业控制
💻 HPP
字号:
// Borland C++ Builder
// Copyright (c) 1995, 2002 by Borland Software Corporation
// All rights reserved

// (DO NOT EDIT: machine generated header) 'iTimers.pas' rev: 6.00

#ifndef iTimersHPP
#define iTimersHPP

#pragma delphiheader begin
#pragma option push -w-
#pragma option push -Vx
#include <Menus.hpp>	// Pascal unit
#include <iMath.hpp>	// Pascal unit
#include <iGPFunctions.hpp>	// Pascal unit
#include <iTypes.hpp>	// Pascal unit
#include <ExtCtrls.hpp>	// Pascal unit
#include <StdCtrls.hpp>	// Pascal unit
#include <ComCtrls.hpp>	// Pascal unit
#include <Controls.hpp>	// Pascal unit
#include <Variants.hpp>	// Pascal unit
#include <Classes.hpp>	// Pascal unit
#include <Messages.hpp>	// Pascal unit
#include <Types.hpp>	// Pascal unit
#include <Clipbrd.hpp>	// Pascal unit
#include <Dialogs.hpp>	// Pascal unit
#include <Forms.hpp>	// Pascal unit
#include <Graphics.hpp>	// Pascal unit
#include <TypInfo.hpp>	// Pascal unit
#include <SysUtils.hpp>	// Pascal unit
#include <Windows.hpp>	// Pascal unit
#include <SysInit.hpp>	// Pascal unit
#include <System.hpp>	// Pascal unit

//-- user supplied -----------------------------------------------------------

namespace Itimers
{
//-- type declarations -------------------------------------------------------
class DELPHICLASS TiTimers;
class PASCALIMPLEMENTATION TiTimers : public Controls::TCustomControl 
{
	typedef Controls::TCustomControl inherited;
	
private:
	HWND FWindowHandle;
	int FHandle1;
	int FHandle2;
	int FHandle3;
	int FHandle4;
	int FHandle5;
	int FHandle6;
	int FHandle7;
	int FHandle8;
	int FHandle9;
	bool FEnabled1;
	bool FEnabled2;
	bool FEnabled3;
	bool FEnabled4;
	bool FEnabled5;
	bool FEnabled6;
	bool FEnabled7;
	bool FEnabled8;
	bool FEnabled9;
	int FInterval1;
	int FInterval2;
	int FInterval3;
	int FInterval4;
	int FInterval5;
	int FInterval6;
	int FInterval7;
	int FInterval8;
	int FInterval9;
	Classes::TNotifyEvent FOnTimer1;
	Classes::TNotifyEvent FOnTimer2;
	Classes::TNotifyEvent FOnTimer3;
	Classes::TNotifyEvent FOnTimer4;
	Classes::TNotifyEvent FOnTimer5;
	Classes::TNotifyEvent FOnTimer6;
	Classes::TNotifyEvent FOnTimer7;
	Classes::TNotifyEvent FOnTimer8;
	Classes::TNotifyEvent FOnTimer9;
	void __fastcall SetEnabled1(const bool Value);
	void __fastcall SetEnabled2(const bool Value);
	void __fastcall SetEnabled3(const bool Value);
	void __fastcall SetEnabled4(const bool Value);
	void __fastcall SetEnabled5(const bool Value);
	void __fastcall SetEnabled6(const bool Value);
	void __fastcall SetEnabled7(const bool Value);
	void __fastcall SetEnabled8(const bool Value);
	void __fastcall SetEnabled9(const bool Value);
	void __fastcall SetInterval1(const int Value);
	void __fastcall SetInterval2(const int Value);
	void __fastcall SetInterval3(const int Value);
	void __fastcall SetInterval4(const int Value);
	void __fastcall SetInterval5(const int Value);
	void __fastcall SetInterval6(const int Value);
	void __fastcall SetInterval7(const int Value);
	void __fastcall SetInterval8(const int Value);
	void __fastcall SetInterval9(const int Value);
	void __fastcall TimerProc(Messages::TMessage &Msg);
	
protected:
	virtual void __fastcall Paint(void);
	
public:
	__fastcall virtual TiTimers(Classes::TComponent* AOwner);
	__fastcall virtual ~TiTimers(void);
	virtual void __fastcall SetBounds(int ALeft, int ATop, int AWidth, int AHeight);
	__property OnDblClick ;
	
__published:
	__property bool Enabled1 = {read=FEnabled1, write=SetEnabled1, default=0};
	__property bool Enabled2 = {read=FEnabled2, write=SetEnabled2, default=0};
	__property bool Enabled3 = {read=FEnabled3, write=SetEnabled3, default=0};
	__property bool Enabled4 = {read=FEnabled4, write=SetEnabled4, default=0};
	__property bool Enabled5 = {read=FEnabled5, write=SetEnabled5, default=0};
	__property bool Enabled6 = {read=FEnabled6, write=SetEnabled6, default=0};
	__property bool Enabled7 = {read=FEnabled7, write=SetEnabled7, default=0};
	__property bool Enabled8 = {read=FEnabled8, write=SetEnabled8, default=0};
	__property bool Enabled9 = {read=FEnabled9, write=SetEnabled9, default=0};
	__property int Interval1 = {read=FInterval1, write=SetInterval1, default=1000};
	__property int Interval2 = {read=FInterval2, write=SetInterval2, default=1000};
	__property int Interval3 = {read=FInterval3, write=SetInterval3, default=1000};
	__property int Interval4 = {read=FInterval4, write=SetInterval4, default=1000};
	__property int Interval5 = {read=FInterval5, write=SetInterval5, default=1000};
	__property int Interval6 = {read=FInterval6, write=SetInterval6, default=1000};
	__property int Interval7 = {read=FInterval7, write=SetInterval7, default=1000};
	__property int Interval8 = {read=FInterval8, write=SetInterval8, default=1000};
	__property int Interval9 = {read=FInterval9, write=SetInterval9, default=1000};
	__property Classes::TNotifyEvent OnTimer1 = {read=FOnTimer1, write=FOnTimer1};
	__property Classes::TNotifyEvent OnTimer2 = {read=FOnTimer2, write=FOnTimer2};
	__property Classes::TNotifyEvent OnTimer3 = {read=FOnTimer3, write=FOnTimer3};
	__property Classes::TNotifyEvent OnTimer4 = {read=FOnTimer4, write=FOnTimer4};
	__property Classes::TNotifyEvent OnTimer5 = {read=FOnTimer5, write=FOnTimer5};
	__property Classes::TNotifyEvent OnTimer6 = {read=FOnTimer6, write=FOnTimer6};
	__property Classes::TNotifyEvent OnTimer7 = {read=FOnTimer7, write=FOnTimer7};
	__property Classes::TNotifyEvent OnTimer8 = {read=FOnTimer8, write=FOnTimer8};
	__property Classes::TNotifyEvent OnTimer9 = {read=FOnTimer9, write=FOnTimer9};
	__property Visible  = {default=0};
	__property PopupMenu ;
	__property Width  = {default=28};
	__property Height  = {default=28};
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TiTimers(HWND ParentWindow) : Controls::TCustomControl(ParentWindow) { }
	#pragma option pop
	
};


//-- var, const, procedure ---------------------------------------------------

}	/* namespace Itimers */
using namespace Itimers;
#pragma option pop	// -w-
#pragma option pop	// -Vx

#pragma delphiheader end.
//-- end unit ----------------------------------------------------------------
#endif	// iTimers

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -