eplabels.hpp

漏洞扫描系列中HB Network Scanner 测试用练习代码

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

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

#ifndef EPLabelsHPP
#define EPLabelsHPP

#pragma delphiheader begin
#pragma option push -w-
#pragma option push -Vx
#include <GrUtils.hpp>	// Pascal unit
#include <BMPUtils.hpp>	// Pascal unit
#include <EffBmp.hpp>	// Pascal unit
#include <VCLBase.hpp>	// Pascal unit
#include <Graphics.hpp>	// Pascal unit
#include <Menus.hpp>	// Pascal unit
#include <Forms.hpp>	// Pascal unit
#include <Controls.hpp>	// Pascal unit
#include <Classes.hpp>	// Pascal unit
#include <SysUtils.hpp>	// Pascal unit
#include <Windows.hpp>	// Pascal unit
#include <Messages.hpp>	// Pascal unit
#include <SysInit.hpp>	// Pascal unit
#include <System.hpp>	// Pascal unit

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

namespace Eplabels
{
//-- type declarations -------------------------------------------------------
#pragma option push -b-
enum TTextLayout { tlTop, tlCenter, tlBottom };
#pragma option pop

class DELPHICLASS TepCustomLabel;
class PASCALIMPLEMENTATION TepCustomLabel : public Vclbase::TEffectGControl 
{
	typedef Vclbase::TEffectGControl inherited;
	
private:
	bool FMiddleTransparent;
	bool FUseInnerColor;
	bool FUseOuterColor;
	Classes::TAlignment FAlignment;
	Graphics::TColor FInnerColor;
	Graphics::TColor FOuterColor;
	bool FText3D;
	bool FGradEffect;
	Effbmp::TGradKind FGradKind;
	Graphics::TColor FGradColor;
	void __fastcall SetGradColor(Graphics::TColor Value);
	void __fastcall SetGradKind(Effbmp::TGradKind Value);
	void __fastcall SetGradEffect(bool Value);
	void __fastcall SetMiddleTransparent(bool Value);
	void __fastcall SetText3D(bool Value);
	void __fastcall SetUseInnerColor(bool Value);
	void __fastcall SetUseOuterColor(bool Value);
	void __fastcall SetInnerColor(Graphics::TColor Value);
	void __fastcall SetOuterColor(Graphics::TColor Value);
	void __fastcall DoDrawText(void);
	void __fastcall SetAlignment(Classes::TAlignment Value);
	MESSAGE void __fastcall CMTextChanged(Messages::TMessage &Message);
	
protected:
	virtual void __fastcall PaintFace(void);
	virtual void __fastcall PaintEffects(void);
	__property bool MiddleTransparent = {read=FMiddleTransparent, write=SetMiddleTransparent, nodefault};
	__property Classes::TAlignment Alignment = {read=FAlignment, write=SetAlignment, default=0};
	__property Graphics::TColor InnerColor = {read=FInnerColor, write=SetInnerColor, nodefault};
	__property Graphics::TColor OuterColor = {read=FOuterColor, write=SetOuterColor, nodefault};
	__property bool UseInnerColor = {read=FUseInnerColor, write=SetUseInnerColor, nodefault};
	__property bool UseOuterColor = {read=FUseOuterColor, write=SetUseOuterColor, nodefault};
	__property bool Text3D = {read=FText3D, write=SetText3D, nodefault};
	__property Graphics::TColor GradColor = {read=FGradColor, write=SetGradColor, nodefault};
	__property bool GradEffect = {read=FGradEffect, write=SetGradEffect, nodefault};
	__property Effbmp::TGradKind GradKind = {read=FGradKind, write=SetGradKind, nodefault};
	
public:
	__fastcall virtual TepCustomLabel(Classes::TComponent* AOwner);
public:
	#pragma option push -w-inl
	/* TGraphicControl.Destroy */ inline __fastcall virtual ~TepCustomLabel(void) { }
	#pragma option pop
	
};


class DELPHICLASS TepLabel;
class PASCALIMPLEMENTATION TepLabel : public TepCustomLabel 
{
	typedef TepCustomLabel inherited;
	
__published:
	__property MiddleTransparent ;
	__property Transparent ;
	__property GradColor ;
	__property GradEffect ;
	__property GradKind ;
	__property Align  = {default=0};
	__property InnerColor ;
	__property OuterColor ;
	__property UseInnerColor ;
	__property UseOuterColor ;
	__property Text3D ;
	__property Alignment  = {default=0};
	__property Caption ;
	__property Color  = {default=-2147483643};
	__property DragCursor  = {default=-12};
	__property DragMode  = {default=0};
	__property Enabled  = {default=1};
	__property Font ;
	__property ParentColor  = {default=1};
	__property ParentFont  = {default=1};
	__property ParentShowHint  = {default=1};
	__property PopupMenu ;
	__property ShowHint ;
	__property Visible  = {default=1};
	__property OnClick ;
	__property OnDblClick ;
	__property OnDragDrop ;
	__property OnDragOver ;
	__property OnEndDrag ;
	__property OnMouseDown ;
	__property OnMouseMove ;
	__property OnMouseUp ;
	__property OnStartDrag ;
public:
	#pragma option push -w-inl
	/* TepCustomLabel.Create */ inline __fastcall virtual TepLabel(Classes::TComponent* AOwner) : TepCustomLabel(AOwner) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TGraphicControl.Destroy */ inline __fastcall virtual ~TepLabel(void) { }
	#pragma option pop
	
};


#pragma option push -b-
enum TTextLLayout { tRight, tCenter, tLeft };
#pragma option pop

class DELPHICLASS TepTextLabel;
class PASCALIMPLEMENTATION TepTextLabel : public Vclbase::TEffectGControl 
{
	typedef Vclbase::TEffectGControl inherited;
	
private:
	Classes::TStrings* FLines;
	TTextLLayout FTextLayout;
	Graphics::TColor FTextInnerColor;
	Graphics::TColor FTextOuterColor;
	bool FText3D;
	bool FMiddleTransparent;
	void __fastcall SetMiddleTransparent(bool Value);
	void __fastcall SetText3D(bool Value);
	void __fastcall SetTextInnerColor(Graphics::TColor Value);
	void __fastcall SetTextOuterColor(Graphics::TColor Value);
	void __fastcall SetLines(Classes::TStrings* Value);
	void __fastcall SetTextLayout(TTextLLayout Value);
	
protected:
	virtual void __fastcall PaintFace(void);
	virtual void __fastcall PaintEffects(void);
	
public:
	__fastcall virtual TepTextLabel(Classes::TComponent* AOwner);
	__fastcall virtual ~TepTextLabel(void);
	
__published:
	__property Font ;
	__property Color  = {default=-2147483643};
	__property bool MiddleTransparent = {read=FMiddleTransparent, write=SetMiddleTransparent, nodefault};
	__property TTextLLayout TextLayout = {read=FTextLayout, write=SetTextLayout, nodefault};
	__property Align  = {default=0};
	__property Classes::TStrings* Lines = {read=FLines, write=SetLines};
	__property Graphics::TColor TextInnerColor = {read=FTextInnerColor, write=SetTextInnerColor, nodefault};
	__property Graphics::TColor TextOuterColor = {read=FTextOuterColor, write=SetTextOuterColor, nodefault};
	__property bool Text3D = {read=FText3D, write=SetText3D, nodefault};
	__property PopupMenu ;
	__property ParentFont  = {default=1};
	__property OnDblClick ;
	__property OnDragDrop ;
	__property OnDragOver ;
	__property OnEndDrag ;
	__property OnMouseDown ;
	__property OnMouseMove ;
	__property OnMouseUp ;
	__property OnStartDrag ;
};


class DELPHICLASS TepBitLabel;
class PASCALIMPLEMENTATION TepBitLabel : public Vclbase::TEffectGControl 
{
	typedef Vclbase::TEffectGControl inherited;
	
private:
	Classes::TAlignment FAlignment;
	Graphics::TBitmap* FWallpaper;
	bool FChange;
	Graphics::TBitmap* FGlyphText;
	Graphics::TColor FTransparentColor;
	bool F3DText;
	Graphics::TColor FInnerColor;
	Graphics::TColor FOuterColor;
	bool FUseInnerColor;
	bool FUseOuterColor;
	void __fastcall SetAlignment(Classes::TAlignment Value);
	void __fastcall SetInnerColor(Graphics::TColor Value);
	void __fastcall SetOuterColor(Graphics::TColor Value);
	void __fastcall SetUseInnerColor(bool Value);
	void __fastcall SetUseOuterColor(bool Value);
	void __fastcall Set3DText(bool Value);
	void __fastcall SetTransparentColor(Graphics::TColor Value);
	void __fastcall SetWallpaper(Graphics::TBitmap* Value);
	HIDESBASE MESSAGE void __fastcall CMFontChanged(Messages::TMessage &Message);
	MESSAGE void __fastcall CMTextChanged(Messages::TMessage &Message);
	
protected:
	virtual void __fastcall PaintFace(void);
	
public:
	__fastcall virtual TepBitLabel(Classes::TComponent* AOwner);
	__fastcall virtual ~TepBitLabel(void);
	
__published:
	__property Classes::TAlignment Alignment = {read=FAlignment, write=SetAlignment, default=0};
	__property Caption ;
	__property Color  = {default=-2147483643};
	__property Graphics::TColor OuterColor = {read=FOuterColor, write=SetOuterColor, nodefault};
	__property Graphics::TColor InnerColor = {read=FInnerColor, write=SetInnerColor, nodefault};
	__property bool UseOuterColor = {read=FUseOuterColor, write=SetUseOuterColor, nodefault};
	__property bool UseInnerColor = {read=FUseInnerColor, write=SetUseInnerColor, nodefault};
	__property bool Text3D = {read=F3DText, write=Set3DText, nodefault};
	__property Graphics::TColor TransparentColor = {read=FTransparentColor, write=SetTransparentColor, nodefault};
	__property Graphics::TBitmap* Wallpaper = {read=FWallpaper, write=SetWallpaper};
	__property Font ;
	__property Align  = {default=0};
	__property OnClick ;
	__property PopupMenu ;
	__property ParentFont  = {default=1};
	__property OnDblClick ;
	__property OnDragDrop ;
	__property OnDragOver ;
	__property OnEndDrag ;
	__property OnMouseDown ;
	__property OnMouseMove ;
	__property OnMouseUp ;
	__property OnStartDrag ;
};


class DELPHICLASS TepShadowLabel;
class PASCALIMPLEMENTATION TepShadowLabel : public Vclbase::TEffectGControl 
{
	typedef Vclbase::TEffectGControl inherited;
	
private:
	Classes::TAlignment FAlignment;
	Byte FShadowOffset;
	bool FBlurShadow;
	void __fastcall SetBlurShadow(bool Value);
	void __fastcall SetAlignment(Classes::TAlignment Value);
	void __fastcall SetShadowOffset(Byte Value);
	MESSAGE void __fastcall CMTextChanged(Messages::TMessage &Message);
	
protected:
	virtual void __fastcall PaintFace(void);
	
public:
	__fastcall virtual TepShadowLabel(Classes::TComponent* AOwner);
	
__published:
	__property Classes::TAlignment Alignment = {read=FAlignment, write=SetAlignment, default=0};
	__property Caption ;
	__property Align  = {default=0};
	__property bool BlurShadow = {read=FBlurShadow, write=SetBlurShadow, nodefault};
	__property Byte ShadowOffset = {read=FShadowOffset, write=SetShadowOffset, nodefault};
	__property Color  = {default=-2147483643};
	__property DragCursor  = {default=-12};
	__property DragMode  = {default=0};
	__property Enabled  = {default=1};
	__property Font ;
	__property ParentColor  = {default=1};
	__property ParentFont  = {default=1};
	__property ParentShowHint  = {default=1};
	__property PopupMenu ;
	__property ShowHint ;
	__property Visible  = {default=1};
	__property OnClick ;
	__property OnDblClick ;
	__property OnDragDrop ;
	__property OnDragOver ;
	__property OnEndDrag ;
	__property OnMouseDown ;
	__property OnMouseMove ;
	__property OnMouseUp ;
	__property OnStartDrag ;
public:
	#pragma option push -w-inl
	/* TGraphicControl.Destroy */ inline __fastcall virtual ~TepShadowLabel(void) { }
	#pragma option pop
	
};


class DELPHICLASS TepWaveLabel;
class PASCALIMPLEMENTATION TepWaveLabel : public Vclbase::TEffectGControl 
{
	typedef Vclbase::TEffectGControl inherited;
	
private:
	int FTextX;
	int FTextY;
	int FXDiv;
	int FYDiv;
	int FRatioVal;
	bool FUseInnerColor;
	bool FUseOuterColor;
	Graphics::TColor FInnerColor;
	Graphics::TColor FOuterColor;
	void __fastcall SetInnerColor(Graphics::TColor Value);
	void __fastcall SetOuterColor(Graphics::TColor Value);
	void __fastcall SetUseInnerColor(bool Value);
	void __fastcall SetUseOuterColor(bool Value);
	void __fastcall SetTextX(int Value);
	void __fastcall SetTextY(int Value);
	void __fastcall SetXDiv(int Value);
	void __fastcall SetYDiv(int Value);
	void __fastcall SetRatioVal(int Value);
	MESSAGE void __fastcall CMTextChanged(Messages::TMessage &Message);
	
protected:
	virtual void __fastcall PaintFace(void);
	
public:
	__fastcall virtual TepWaveLabel(Classes::TComponent* AOwner);
	
__published:
	__property Caption ;
	__property Graphics::TColor InnerColor = {read=FInnerColor, write=SetInnerColor, nodefault};
	__property Graphics::TColor OuterColor = {read=FOuterColor, write=SetOuterColor, nodefault};
	__property bool UseInnerColor = {read=FUseInnerColor, write=SetUseInnerColor, nodefault};
	__property bool UseOuterColor = {read=FUseOuterColor, write=SetUseOuterColor, nodefault};
	__property Color  = {default=-2147483643};
	__property int XDiv = {read=FXDiv, write=SetXDiv, nodefault};
	__property int YDiv = {read=FYDiv, write=SetYDiv, nodefault};
	__property int RatioVal = {read=FRatioVal, write=SetRatioVal, nodefault};
	__property Align  = {default=0};
	__property Font ;
	__property int TextX = {read=FTextX, write=SetTextX, nodefault};
	__property int TextY = {read=FTextY, write=SetTextY, nodefault};
	__property Enabled  = {default=1};
	__property Visible  = {default=1};
	__property OnClick ;
	__property ParentFont  = {default=1};
	__property PopupMenu ;
	__property OnDblClick ;
	__property OnDragDrop ;
	__property OnDragOver ;
	__property OnEndDrag ;
	__property OnMouseDown ;
	__property OnMouseMove ;
	__property OnMouseUp ;
	__property OnStartDrag ;
public:
	#pragma option push -w-inl
	/* TGraphicControl.Destroy */ inline __fastcall virtual ~TepWaveLabel(void) { }
	#pragma option pop
	
};


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

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

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