iplotannotation.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) 'iPlotAnnotation.pas' rev: 6.00

#ifndef iPlotAnnotationHPP
#define iPlotAnnotationHPP

#pragma delphiheader begin
#pragma option push -w-
#pragma option push -Vx
#include <ImgList.hpp>	// Pascal unit
#include <iPlotAxis.hpp>	// Pascal unit
#include <iPlotChannelCustom.hpp>	// Pascal unit
#include <iPlotDataView.hpp>	// Pascal unit
#include <iPlotObjects.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 Iplotannotation
{
//-- type declarations -------------------------------------------------------
#pragma option push -b-
enum TiPlotReferenceType { iprtDataView, iprtChannel, iprtXChannelYDataView, iprtXDataViewYChannel };
#pragma option pop

#pragma option push -b-
enum TiPlotAnnotationStyle { ipasText, ipasLine, ipasRectangle, ipasLineX, ipasLineY, ipasImage, ipasTextRectangle, ipasEllipse, ipasTextBox };
#pragma option pop

#pragma option push -b-
enum TiPlotAnnotationSelectStyle { ipassNone, ipassMove, ipassSizeTopLeft, ipassSizeTopRight, ipassSizeBottomLeft, ipassSizeBottomRight };
#pragma option pop

class DELPHICLASS TiPlotAnnotation;
class PASCALIMPLEMENTATION TiPlotAnnotation : public Iplotobjects::TiPlotObject 
{
	typedef Iplotobjects::TiPlotObject inherited;
	
private:
	TiPlotAnnotationStyle FStyle;
	TiPlotReferenceType FReference;
	TiPlotAnnotationSelectStyle FSelectStyle;
	#pragma pack(push, 1)
	Types::TRect FSizeTopLeftRect;
	#pragma pack(pop)
	
	#pragma pack(push, 1)
	Types::TRect FSizeTopRightRect;
	#pragma pack(pop)
	
	#pragma pack(push, 1)
	Types::TRect FSizeBottomLeftRect;
	#pragma pack(pop)
	
	#pragma pack(push, 1)
	Types::TRect FSizeBottomRightRect;
	#pragma pack(pop)
	
	double FX;
	double FY;
	double FY2;
	double FX2;
	double FWidth;
	double FHeight;
	Graphics::TColor FPenColor;
	int FPenWidth;
	Graphics::TPenStyle FPenStyle;
	Graphics::TColor FBrushColor;
	Graphics::TBrushStyle FBrushStyle;
	AnsiString FText;
	Graphics::TFont* FFont;
	AnsiString FChannelName;
	Iplotdataview::TiPlotDataView* FDataView;
	Iplotchannelcustom::TiPlotChannelCustom* FChannel;
	Itypes::TiRotationAngle FTextRotation;
	bool FShowing;
	#pragma pack(push, 1)
	Types::TRect FDrawRect;
	#pragma pack(pop)
	
	#pragma pack(push, 1)
	Types::TRect FClickRect;
	#pragma pack(pop)
	
	bool FRectChange;
	bool FUserCanMove;
	bool FUserCanSize;
	bool FClipToAxes;
	double FMouseDownXPos;
	double FMouseDownYPos;
	bool FMouseDown;
	int FMouseDownX;
	int FMouseDownY;
	double FMouseDownWidth;
	double FMouseDownHeight;
	int FMouseDownPositionPixelsX;
	int FMouseDownPositionPixelsY;
	#pragma pack(push, 1)
	Types::TRect FMouseDownRect;
	#pragma pack(pop)
	
	int FImageListIndex;
	int FImageIndex;
	Itypes::TiAlignmentHorizontal FTextHorzAlignment;
	Itypes::TiAlignmentVertical FTextVertAlignment;
	double FTextHorzMargin;
	double FTextVertMargin;
	bool FShowFocusRect;
	double FMouseDownXValue;
	double FMouseDownYValue;
	double FMouseDownX2Value;
	double FMouseDownY2Value;
	int FOuterMargin;
	int __fastcall GetXMax(void);
	int __fastcall GetXMin(void);
	int __fastcall GetYMax(void);
	int __fastcall GetYMin(void);
	
protected:
	void __fastcall SetBrushColor(const Graphics::TColor Value);
	void __fastcall SetBrushStyle(const Graphics::TBrushStyle Value);
	void __fastcall SetHeight(const double Value);
	void __fastcall SetReference(const TiPlotReferenceType Value);
	void __fastcall SetPenColor(const Graphics::TColor Value);
	void __fastcall SetPenStyle(const Graphics::TPenStyle Value);
	void __fastcall SetPenWidth(const int Value);
	void __fastcall SetStyle(const TiPlotAnnotationStyle Value);
	void __fastcall SetWidth(const double Value);
	void __fastcall SetX(const double Value);
	void __fastcall SetY(const double Value);
	void __fastcall SetX2(const double Value);
	void __fastcall SetY2(const double Value);
	void __fastcall SetFont(const Graphics::TFont* Value);
	void __fastcall SetText(const AnsiString Value);
	void __fastcall SetChannelName(const AnsiString Value);
	void __fastcall SetTextRotation(const Itypes::TiRotationAngle Value);
	void __fastcall SetUserCanMove(const bool Value);
	void __fastcall SetUserCanSize(const bool Value);
	void __fastcall SetClipToAxes(const bool Value);
	void __fastcall SetImageListIndex(const int Value);
	void __fastcall SetImageIndex(const int Value);
	void __fastcall SetTextHorzAlignment(const Itypes::TiAlignmentHorizontal Value);
	void __fastcall SetTextVertAlignment(const Itypes::TiAlignmentVertical Value);
	void __fastcall SetTextHorzMargin(const double Value);
	void __fastcall SetTextVertMargin(const double Value);
	void __fastcall SetShowFocusRect(const bool Value);
	void __fastcall SetOuterMargin(const int Value);
	virtual void __fastcall NotificationRemove(System::TObject* Sender);
	virtual void __fastcall NotificationSetFocus(System::TObject* Sender);
	virtual void __fastcall NotificationRename(System::TObject* Sender);
	virtual void __fastcall DoMouseLeft(const Iplotobjects::TiPlotMouseData &MouseData);
	virtual void __fastcall DoMouseMove(const Iplotobjects::TiPlotMouseData &MouseData);
	virtual void __fastcall DoMouseUp(const Iplotobjects::TiPlotMouseData &MouseData);
	Iplotchannelcustom::TiPlotChannelCustom* __fastcall GetChannel(void);
	virtual Controls::TCursor __fastcall GetMousePointer(const Types::TPoint &APoint);
	virtual bool __fastcall iMouseHitTest(const Iplotobjects::TiPlotMouseData &MouseData);
	virtual void __fastcall Draw(const Graphics::TCanvas* Canvas, const Graphics::TColor BackGroundColor);
	void __fastcall SetupRectangle(const Types::TRect &ARect);
	double __fastcall MousePointToXPos(const Types::TPoint &APoint);
	double __fastcall MousePointToYPos(const Types::TPoint &APoint);
	bool __fastcall IsMoveable(void);
	bool __fastcall IsSizeable(void);
	__property Iplotdataview::TiPlotDataView* DataView = {read=FDataView, write=FDataView};
	__property Iplotchannelcustom::TiPlotChannelCustom* Channel = {read=GetChannel};
	
public:
	__fastcall virtual TiPlotAnnotation(System::TObject* AOwner, Classes::TNotifyEvent AOnChange, Classes::TNotifyEvent AOnInsert, Classes::TNotifyEvent AOnRemove, Classes::TNotifyEvent AOnRename);
	__fastcall virtual ~TiPlotAnnotation(void);
	int __fastcall PositionXToPixels(double Value);
	int __fastcall PositionYToPixels(double Value);
	double __fastcall PixelsXToPosition(int Value);
	double __fastcall PixelsYToPosition(int Value);
	
__published:
	__property TiPlotAnnotationStyle Style = {read=FStyle, write=SetStyle, nodefault};
	__property TiPlotReferenceType Reference = {read=FReference, write=SetReference, nodefault};
	__property double X = {read=FX, write=SetX};
	__property double Y = {read=FY, write=SetY};
	__property double X2 = {read=FX2, write=SetX2};
	__property double Y2 = {read=FY2, write=SetY2};
	__property double Width = {read=FWidth, write=SetWidth};
	__property double Height = {read=FHeight, write=SetHeight};
	__property Graphics::TColor PenColor = {read=FPenColor, write=SetPenColor, nodefault};
	__property Graphics::TPenStyle PenStyle = {read=FPenStyle, write=SetPenStyle, nodefault};
	__property int PenWidth = {read=FPenWidth, write=SetPenWidth, nodefault};
	__property Graphics::TColor BrushColor = {read=FBrushColor, write=SetBrushColor, nodefault};
	__property Graphics::TBrushStyle BrushStyle = {read=FBrushStyle, write=SetBrushStyle, nodefault};
	__property AnsiString Text = {read=FText, write=SetText};
	__property Itypes::TiRotationAngle TextRotation = {read=FTextRotation, write=SetTextRotation, nodefault};
	__property Itypes::TiAlignmentHorizontal TextHorzAlignment = {read=FTextHorzAlignment, write=SetTextHorzAlignment, nodefault};
	__property Itypes::TiAlignmentVertical TextVertAlignment = {read=FTextVertAlignment, write=SetTextVertAlignment, nodefault};
	__property double TextHorzMargin = {read=FTextHorzMargin, write=SetTextHorzMargin};
	__property double TextVertMargin = {read=FTextVertMargin, write=SetTextVertMargin};
	__property Graphics::TFont* Font = {read=FFont, write=SetFont};
	__property int OuterMargin = {read=FOuterMargin, write=SetOuterMargin, nodefault};
	__property int ImageListIndex = {read=FImageListIndex, write=SetImageListIndex, nodefault};
	__property int ImageIndex = {read=FImageIndex, write=SetImageIndex, nodefault};
	__property AnsiString ChannelName = {read=FChannelName, write=SetChannelName};
	__property bool UserCanMove = {read=FUserCanMove, write=SetUserCanMove, nodefault};
	__property bool UserCanSize = {read=FUserCanSize, write=SetUserCanSize, nodefault};
	__property bool ClipToAxes = {read=FClipToAxes, write=SetClipToAxes, nodefault};
	__property bool ShowFocusRect = {read=FShowFocusRect, write=SetShowFocusRect, nodefault};
};


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

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

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