qiswitchpanel.hpp

Iocomp Ultra Pack v3.0.2 Sources.For.Delphi 数据显示编程插件,可用于工业控制

// Borland C++ Builder
// Copyright (c) 1995, 2002 by Borland Software Corporation
// All rights reserved

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

#ifndef QiSwitchPanelHPP
#define QiSwitchPanelHPP

#pragma delphiheader begin
#pragma option push -w-
#pragma option push -Vx
#include <QiComponent.hpp>	// Pascal unit
#include <QiCLXComponent.hpp>	// Pascal unit
#include <QiCustomComponent.hpp>	// Pascal unit
#include <QiClasses.hpp>	// Pascal unit
#include <QiMath.hpp>	// Pascal unit
#include <QiGPFunctions.hpp>	// Pascal unit
#include <QiTypes.hpp>	// Pascal unit
#include <QExtCtrls.hpp>	// Pascal unit
#include <QStdCtrls.hpp>	// Pascal unit
#include <QComCtrls.hpp>	// Pascal unit
#include <QControls.hpp>	// Pascal unit
#include <Variants.hpp>	// Pascal unit
#include <Classes.hpp>	// Pascal unit
#include <Types.hpp>	// Pascal unit
#include <QTypes.hpp>	// Pascal unit
#include <QClipbrd.hpp>	// Pascal unit
#include <QDialogs.hpp>	// Pascal unit
#include <QForms.hpp>	// Pascal unit
#include <QGraphics.hpp>	// Pascal unit
#include <Qt.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 Qiswitchpanel
{
//-- type declarations -------------------------------------------------------
#pragma option push -b-
enum TiSwitchPanelMouseControlStyle { ispmcsRotate, ispmcsIncrement };
#pragma option pop

#pragma option push -b-
enum TiSwitchPanelBorderStyle { ispbsLine, ispbsRaised, ispbsLowered, ispbsTop, ispbsNone };
#pragma option pop

class DELPHICLASS TiSwitchPanel;
class PASCALIMPLEMENTATION TiSwitchPanel : public Qicustomcomponent::TiCustomComponent 
{
	typedef Qicustomcomponent::TiCustomComponent inherited;
	
private:
	Qgraphics::TFont* FPanelFontInactive;
	Qgraphics::TFont* FPanelFontActive;
	AnsiString FPositionCaption1;
	AnsiString FPositionCaption2;
	AnsiString FPositionCaption3;
	int FPosition;
	int FPositionCount;
	bool FKnobRadiusAutoSize;
	int FKnobRadius;
	int FKnobHandleWidth;
	Qgraphics::TColor FKnobHandleColor;
	Qgraphics::TColor FKnobInnerColor;
	Qgraphics::TColor FKnobOuterColor;
	#pragma pack(push, 1)
	Types::TPoint FKnobCenterPoint;
	#pragma pack(pop)
	
	#pragma pack(push, 1)
	Types::TRect FKnobOuterRect;
	#pragma pack(pop)
	
	#pragma pack(push, 1)
	Types::TRect FKnobInnerRect;
	#pragma pack(pop)
	
	#pragma pack(push, 1)
	Types::TRect FCaptionRect1;
	#pragma pack(pop)
	
	#pragma pack(push, 1)
	Types::TRect FCaptionRect2;
	#pragma pack(pop)
	
	#pragma pack(push, 1)
	Types::TRect FCaptionRect3;
	#pragma pack(pop)
	
	bool FMouseDownCaption1;
	bool FMouseDownCaption2;
	bool FMouseDownCaption3;
	bool FMouseDownKnob;
	double FMouseDownDegrees;
	bool FMouseDown;
	bool FKeyDown;
	TiSwitchPanelMouseControlStyle FMouseControlStyle;
	double FPanelMarginTop;
	double FPanelMarginRow;
	double FPanelMarginBottom;
	Qgraphics::TColor FPanelBackGroundColor;
	int FKnobSideMargin;
	TiSwitchPanelBorderStyle FBorderStyle;
	Qgraphics::TColor FBackGroundColorTop;
	Classes::TNotifyEvent FOnPositionChange;
	Classes::TNotifyEvent FOnPositionChangeUser;
	bool FUserGenerated;
	
protected:
	void __fastcall SetPositionCaption1(const AnsiString Value);
	void __fastcall SetPositionCaption2(const AnsiString Value);
	void __fastcall SetPositionCaption3(const AnsiString Value);
	void __fastcall SetPanelFontInactive(const Qgraphics::TFont* Value);
	void __fastcall SetPanelFontActive(const Qgraphics::TFont* Value);
	void __fastcall SetPosition(const int Value);
	void __fastcall SetPositionCount(const int Value);
	void __fastcall SetKnobRadiusAutoSize(const bool Value);
	void __fastcall SetKnobHandleColor(const Qgraphics::TColor Value);
	void __fastcall SetKnobInnerColor(const Qgraphics::TColor Value);
	void __fastcall SetKnobOuterColor(const Qgraphics::TColor Value);
	void __fastcall SetKnobRadius(const int Value);
	void __fastcall SetKnobHandleWidth(const int Value);
	void __fastcall SetMouseControlStyle(const TiSwitchPanelMouseControlStyle Value);
	void __fastcall SetPanelBackGroundColor(const Qgraphics::TColor Value);
	void __fastcall SetPanelMarginBottom(const double Value);
	void __fastcall SetPanelMarginRow(const double Value);
	void __fastcall SetPanelMarginTop(const double Value);
	void __fastcall SetKnobSideMargin(const int Value);
	HIDESBASE void __fastcall SetBorderStyle(const TiSwitchPanelBorderStyle Value);
	void __fastcall SetBackGroundColorTop(const Qgraphics::TColor Value);
	void __fastcall DoPositionChange(void);
	virtual void __fastcall iPaintTo(Qgraphics::TCanvas* Canvas);
	virtual void __fastcall DrawBorder(Qgraphics::TCanvas* Canvas);
	virtual void __fastcall iMouseDown(Qcontrols::TMouseButton Button, Classes::TShiftState Shift, int X, int Y);
	virtual void __fastcall iMouseUp(Qcontrols::TMouseButton Button, Classes::TShiftState Shift, int X, int Y);
	virtual void __fastcall iMouseMove(Classes::TShiftState Shift, int X, int Y);
	virtual void __fastcall iDoKillFocus(void);
	
public:
	__fastcall virtual TiSwitchPanel(Classes::TComponent* AOwner);
	__fastcall virtual ~TiSwitchPanel(void);
	
__published:
	__property AnsiString PositionCaption1 = {read=FPositionCaption1, write=SetPositionCaption1};
	__property AnsiString PositionCaption2 = {read=FPositionCaption2, write=SetPositionCaption2};
	__property AnsiString PositionCaption3 = {read=FPositionCaption3, write=SetPositionCaption3};
	__property Qgraphics::TFont* PanelFontInactive = {read=FPanelFontInactive, write=SetPanelFontInactive};
	__property Qgraphics::TFont* PanelFontActive = {read=FPanelFontActive, write=SetPanelFontActive};
	__property Qgraphics::TColor PanelBackGroundColor = {read=FPanelBackGroundColor, write=SetPanelBackGroundColor, nodefault};
	__property double PanelMarginTop = {read=FPanelMarginTop, write=SetPanelMarginTop};
	__property double PanelMarginRow = {read=FPanelMarginRow, write=SetPanelMarginRow};
	__property double PanelMarginBottom = {read=FPanelMarginBottom, write=SetPanelMarginBottom};
	__property int PositionCount = {read=FPositionCount, write=SetPositionCount, nodefault};
	__property int Position = {read=FPosition, write=SetPosition, nodefault};
	__property Qgraphics::TColor KnobOuterColor = {read=FKnobOuterColor, write=SetKnobOuterColor, nodefault};
	__property Qgraphics::TColor KnobInnerColor = {read=FKnobInnerColor, write=SetKnobInnerColor, nodefault};
	__property Qgraphics::TColor KnobHandleColor = {read=FKnobHandleColor, write=SetKnobHandleColor, nodefault};
	__property int KnobHandleWidth = {read=FKnobHandleWidth, write=SetKnobHandleWidth, nodefault};
	__property int KnobRadius = {read=FKnobRadius, write=SetKnobRadius, nodefault};
	__property int KnobSideMargin = {read=FKnobSideMargin, write=SetKnobSideMargin, nodefault};
	__property bool KnobRadiusAutoSize = {read=FKnobRadiusAutoSize, write=SetKnobRadiusAutoSize, nodefault};
	__property TiSwitchPanelMouseControlStyle MouseControlStyle = {read=FMouseControlStyle, write=SetMouseControlStyle, nodefault};
	__property TiSwitchPanelBorderStyle BorderStyle = {read=FBorderStyle, write=SetBorderStyle, nodefault};
	__property Qgraphics::TColor BackGroundColorTop = {read=FBackGroundColorTop, write=SetBackGroundColorTop, nodefault};
	__property Classes::TNotifyEvent OnPositionChange = {read=FOnPositionChange, write=FOnPositionChange};
	__property Classes::TNotifyEvent OnPositionChangeUser = {read=FOnPositionChangeUser, write=FOnPositionChangeUser};
	__property BackGroundColor  = {default=-2};
	__property Width  = {default=140};
	__property Height  = {default=190};
public:
	#pragma option push -w-inl
	/* TWidgetControl.CreateParented */ inline __fastcall TiSwitchPanel(Qt::QWidgetH* ParentWidget) : Qicustomcomponent::TiCustomComponent(ParentWidget) { }
	#pragma option pop
	
};


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

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

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