qiplotobjects.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) 'QiPlotObjects.pas' rev: 6.00

#ifndef QiPlotObjectsHPP
#define QiPlotObjectsHPP

#pragma delphiheader begin
#pragma option push -w-
#pragma option push -Vx
#include <QiTypes.hpp>	// Pascal unit
#include <QMenus.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 Qiplotobjects
{
//-- type declarations -------------------------------------------------------
#pragma pack(push, 4)
struct TiPlotMouseData
{
	int X;
	int Y;
	int ScreenX;
	int ScreenY;
	int XAxisPixels;
	int YAxisPixels;
	Classes::TShiftState Shift;
	Qcontrols::TMouseButton Button;
	bool DblClickActive;
} ;
#pragma pack(pop)

class DELPHICLASS TiMenuItem;
class PASCALIMPLEMENTATION TiMenuItem : public Qmenus::TMenuItem 
{
	typedef Qmenus::TMenuItem inherited;
	
public:
	AnsiString AString;
public:
	#pragma option push -w-inl
	/* TMenuItem.Create */ inline __fastcall virtual TiMenuItem(Classes::TComponent* AOwner) : Qmenus::TMenuItem(AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TMenuItem.Destroy */ inline __fastcall virtual ~TiMenuItem(void) { }
	#pragma option pop
	
};


#pragma pack(push, 4)
struct TiHintData
{
	AnsiString Text;
	int Top;
	int Left;
	bool Visible;
} ;
#pragma pack(pop)

class DELPHICLASS TiPlotRectObject;
class PASCALIMPLEMENTATION TiPlotRectObject : public System::TObject 
{
	typedef System::TObject inherited;
	
public:
	#pragma pack(push, 1)
	Types::TRect ARect;
	#pragma pack(pop)
	
public:
	#pragma option push -w-inl
	/* TObject.Create */ inline __fastcall TiPlotRectObject(void) : System::TObject() { }
	#pragma option pop
	#pragma option push -w-inl
	/* TObject.Destroy */ inline __fastcall virtual ~TiPlotRectObject(void) { }
	#pragma option pop
	
};


typedef void __fastcall (__closure *TPlotMousePointerEvent)(Qcontrols::TCursor ACursor);

class DELPHICLASS TiPlotTranslationObject;
class PASCALIMPLEMENTATION TiPlotTranslationObject : public Classes::TPersistent 
{
	typedef Classes::TPersistent inherited;
	
private:
	AnsiString FOriginalString;
	AnsiString FReplacementString;
	
public:
	__property AnsiString OriginalString = {read=FOriginalString, write=FOriginalString};
	__property AnsiString ReplacementString = {read=FReplacementString, write=FReplacementString};
public:
	#pragma option push -w-inl
	/* TPersistent.Destroy */ inline __fastcall virtual ~TiPlotTranslationObject(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TObject.Create */ inline __fastcall TiPlotTranslationObject(void) : Classes::TPersistent() { }
	#pragma option pop
	
};


class DELPHICLASS TiPlotObject;
class PASCALIMPLEMENTATION TiPlotObject : public Classes::TPersistent 
{
	typedef Classes::TPersistent inherited;
	
private:
	AnsiString FName;
	AnsiString FNameOld;
	System::TObject* FOwner;
	Classes::TShiftState FShiftState;
	Classes::TNotifyEvent FOnChange;
	Classes::TNotifyEvent FOnLayoutChange;
	Classes::TNotifyEvent FOnRemove;
	Classes::TNotifyEvent FOnInsert;
	Classes::TNotifyEvent FOnRename;
	Classes::TNotifyEvent FOnSetFocus;
	Classes::TNotifyEvent FOnEdit;
	Classes::TNotifyEvent FOnInvalidateNow;
	bool FVisible;
	bool FEnabled;
	int FLayer;
	bool FPopupEnabled;
	bool FUserSelected;
	bool FUserCanEdit;
	bool FXYAxesReversed;
	bool FCanDraw;
	TiPlotObject* FMouseOverObject;
	bool FMouseDown;
	
protected:
	AnsiString __fastcall GetLayerString();
	virtual void __fastcall SetVisible(const bool Value);
	void __fastcall SetLayer(const int Value);
	virtual void __fastcall SetEnabled(const bool Value);
	virtual void __fastcall SetXYAxesReversed(const bool Value);
	void __fastcall SetUserSelected(const bool Value);
	void __fastcall SetName(const AnsiString Value);
	void __fastcall SetUserCanEdit(const bool Value);
	void __fastcall SetShiftState(const Classes::TShiftState Value);
	void __fastcall SetPopupEnabled(const bool Value);
	virtual void __fastcall TriggerChange(System::TObject* Sender);
	void __fastcall TriggerRename(System::TObject* Sender);
	virtual void __fastcall TriggerLayoutChange(System::TObject* Sender);
	void __fastcall TriggerInvalidateNow(System::TObject* Sender);
	void __fastcall TriggerSetFocus(System::TObject* Sender);
	void __fastcall SetBooleanProperty(bool Value, bool &FVariable, Classes::TNotifyEvent EventHandler);
	void __fastcall SetIntegerProperty(int Value, int &FVariable, Classes::TNotifyEvent EventHandler);
	void __fastcall SetDoubleProperty(double Value, double &FVariable, Classes::TNotifyEvent EventHandler);
	void __fastcall SetStringProperty(AnsiString Value, AnsiString &FVariable, Classes::TNotifyEvent EventHandler);
	void __fastcall SetColorProperty(Qgraphics::TColor Value, Qgraphics::TColor &FVariable, Classes::TNotifyEvent EventHandler);
	virtual void __fastcall NotificationRemove(System::TObject* Sender);
	virtual void __fastcall NotificationRename(System::TObject* Sender);
	virtual void __fastcall NotificationSetFocus(System::TObject* Sender);
	virtual void __fastcall DrawSetup(const Qgraphics::TCanvas* Canvas);
	virtual void __fastcall Draw(const Qgraphics::TCanvas* Canvas, const Qgraphics::TColor BackGroundColor);
	virtual void __fastcall iMouseDown(Qcontrols::TMouseButton Button, Classes::TShiftState Shift, int X, int Y, int ScreenX, int ScreenY, Qmenus::TPopupMenu* PopupMenu);
	virtual void __fastcall iMouseMove(TiHintData &HintData, Classes::TShiftState Shift, int X, int Y, int ScreenX, int ScreenY, bool DblClickActive);
	virtual void __fastcall iMouseUp(Qcontrols::TMouseButton Button, Classes::TShiftState Shift, int X, int Y, int ScreenX, int ScreenY, bool DblClickActive);
	virtual bool __fastcall iMouseHitTest(const TiPlotMouseData &MouseData);
	virtual bool __fastcall iMouseWheel(int WheelDelta, Classes::TShiftState Shift, const Types::TPoint &MousePos);
	void __fastcall CalcAxisPixels(int X, int Y, int &XAxisPixels, int &YAxisPixels);
	virtual void __fastcall DoMouseHint(const TiPlotMouseData &MouseData, TiHintData &HintData);
	virtual void __fastcall DoMouseLeft(const TiPlotMouseData &MouseData);
	virtual void __fastcall DoMouseMove(const TiPlotMouseData &MouseData);
	virtual void __fastcall DoMouseUp(const TiPlotMouseData &MouseData);
	virtual void __fastcall DoMouseDoubleClick(const TiPlotMouseData &MouseData);
	virtual void __fastcall DoSetFocus(void);
	virtual void __fastcall DoLostFocus(void);
	virtual void __fastcall DoMouseNotOver(void);
	virtual TiPlotObject* __fastcall GetMouseObject(int X, int Y);
	virtual Qcontrols::TCursor __fastcall GetMousePointer(const Types::TPoint &APoint);
	AnsiString __fastcall GetTranslation(AnsiString Value);
	virtual void __fastcall iKeyDown(Word &CharCode, Classes::TShiftState Shift);
	virtual void __fastcall Loaded(void);