iplotlabel.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) 'iPlotLabel.pas' rev: 6.00

#ifndef iPlotLabelHPP
#define iPlotLabelHPP

#pragma delphiheader begin
#pragma option push -w-
#pragma option push -Vx
#include <iPlotChannelCustom.hpp>	// Pascal unit
#include <iPlotObjects.hpp>	// Pascal unit
#include <iGPFunctions.hpp>	// Pascal unit
#include <iTypes.hpp>	// Pascal unit
#include <Menus.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 Iplotlabel
{
//-- type declarations -------------------------------------------------------
class DELPHICLASS TiPlotLabel;
class PASCALIMPLEMENTATION TiPlotLabel : public Iplotobjects::TiPlotLayoutObject 
{
	typedef Iplotobjects::TiPlotLayoutObject inherited;
	
private:
	int FRequiredWidth;
	int FMarginTopPixels;
	int FMarginBottomPixels;
	int FMarginLeftPixels;
	int FMarginRightPixels;
	AnsiString FCaption;
	double FMarginLeft;
	double FMarginRight;
	double FMarginBottom;
	double FMarginTop;
	Graphics::TFont* FFont;
	Itypes::TiAlignmentHorizontal FAlignment;
	
protected:
	void __fastcall SetCaption(const AnsiString Value);
	void __fastcall SetMarginBottom(const double Value);
	void __fastcall SetMarginLeft(const double Value);
	void __fastcall SetMarginRight(const double Value);
	void __fastcall SetMarginTop(const double Value);
	void __fastcall SetFont(const Graphics::TFont* Value);
	void __fastcall SetAlignment(const Itypes::TiAlignmentHorizontal Value);
	void __fastcall CalcRects(Graphics::TCanvas* Canvas);
	virtual int __fastcall GetRequiredWidth(const Graphics::TCanvas* Canvas);
	virtual void __fastcall Draw(const Graphics::TCanvas* Canvas, const Graphics::TColor BackGroundColor);
	
public:
	__fastcall virtual TiPlotLabel(System::TObject* AOwner, Classes::TNotifyEvent AOnChange, Classes::TNotifyEvent AOnInsert, Classes::TNotifyEvent AOnRemove, Classes::TNotifyEvent AOnRename);
	__fastcall virtual ~TiPlotLabel(void);
	
__published:
	__property double MarginLeft = {read=FMarginLeft, write=SetMarginLeft};
	__property double MarginTop = {read=FMarginTop, write=SetMarginTop};
	__property double MarginRight = {read=FMarginRight, write=SetMarginRight};
	__property double MarginBottom = {read=FMarginBottom, write=SetMarginBottom};
	__property AnsiString Caption = {read=FCaption, write=SetCaption};
	__property Itypes::TiAlignmentHorizontal Alignment = {read=FAlignment, write=SetAlignment, nodefault};
	__property Graphics::TFont* Font = {read=FFont, write=SetFont};
};


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

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

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