📄 vrpowermeter.hpp
字号:
// Borland C++ Builder
// Copyright (c) 1995, 1999 by Borland International
// All rights reserved
// (DO NOT EDIT: machine generated header) 'VrPowerMeter.pas' rev: 5.00
#ifndef VrPowerMeterHPP
#define VrPowerMeterHPP
#pragma delphiheader begin
#pragma option push -w-
#pragma option push -Vx
#include <Menus.hpp> // Pascal unit
#include <VrControls.hpp> // Pascal unit
#include <Messages.hpp> // Pascal unit
#include <SysUtils.hpp> // Pascal unit
#include <Graphics.hpp> // Pascal unit
#include <Windows.hpp> // Pascal unit
#include <Controls.hpp> // Pascal unit
#include <Classes.hpp> // Pascal unit
#include <SysInit.hpp> // Pascal unit
#include <System.hpp> // Pascal unit
//-- user supplied -----------------------------------------------------------
namespace Vrpowermeter
{
//-- type declarations -------------------------------------------------------
#pragma option push -b-
enum TVrTitleAlignment { tiaTop, tiaBottom };
#pragma option pop
class DELPHICLASS TVrPowerMeter;
class PASCALIMPLEMENTATION TVrPowerMeter : public Vrcontrols::TVrGraphicImageControl
{
typedef Vrcontrols::TVrGraphicImageControl inherited;
private:
double FValue;
Graphics::TColor FFillColor;
Graphics::TColor FBarColor;
Graphics::TColor FColorShadow;
Graphics::TColor FColorHighlight;
AnsiString FUnitsText;
double FMaxValue;
double FMinValue;
int FDecimals;
double FIncrement;
bool FScaleVisible;
int FTopOffset;
int FBottomOffset;
int FBarWidth;
Graphics::TBitmap* FMarkerImage;
bool FMarkerVisible;
Graphics::TFont* FTitleFont;
TVrTitleAlignment FTitleAlignment;
Classes::TNotifyEvent FOnChange;
int TopTextHeight;
int LeftMeter;
int DrawStyle;
Windows::TRect TheRect;
void __fastcall SetValue(double Value);
void __fastcall SetBarColor(Graphics::TColor Value);
void __fastcall SetFillColor(Graphics::TColor Value);
void __fastcall SetColorShadow(Graphics::TColor Value);
void __fastcall SetColorHighlight(Graphics::TColor Value);
void __fastcall SetUnitsText(AnsiString Value);
void __fastcall SetMinValue(double Value);
void __fastcall SetMaxValue(double Value);
void __fastcall SetDecimals(int Value);
void __fastcall SetIncrement(double Value);
void __fastcall SetScaleVisible(bool Value);
void __fastcall SetTopOffset(int Value);
void __fastcall SetBottomOffset(int Value);
void __fastcall SetBarWidth(int Value);
void __fastcall SetMarkerImage(Graphics::TBitmap* Value);
void __fastcall SetMarkerVisible(bool Value);
void __fastcall SetTitleFont(Graphics::TFont* Value);
void __fastcall SetTitleAlignment(TVrTitleAlignment Value);
void __fastcall DrawTopText(void);
void __fastcall DrawMeterBar(void);
void __fastcall DrawIncrements(void);
int __fastcall ValueToPixels(double Value);
void __fastcall DrawMaxValue(void);
void __fastcall DrawMinValue(void);
void __fastcall DrawMarker(void);
void __fastcall MarkerChanged(System::TObject* Sender);
void __fastcall TitleFontChanged(System::TObject* Sender);
HIDESBASE MESSAGE void __fastcall CMTextChanged(Messages::TMessage &Message);
protected:
virtual void __fastcall Paint(void);
void __fastcall LoadBitmaps(void);
HIDESBASE virtual void __fastcall Changed(void);
int __fastcall TopGap(void);
int __fastcall BottomGap(void);
AnsiString __fastcall DisplayValue(double Value);
public:
__fastcall virtual TVrPowerMeter(Classes::TComponent* AOwner);
__fastcall virtual ~TVrPowerMeter(void);
__published:
__property Graphics::TColor FillColor = {read=FFillColor, write=SetFillColor, nodefault};
__property Graphics::TColor BarColor = {read=FBarColor, write=SetBarColor, nodefault};
__property Graphics::TColor ColorShadow = {read=FColorShadow, write=SetColorShadow, nodefault};
__property Graphics::TColor ColorHighlight = {read=FColorHighlight, write=SetColorHighlight, nodefault
};
__property AnsiString UnitsText = {read=FUnitsText, write=SetUnitsText};
__property double MaxValue = {read=FMaxValue, write=SetMaxValue};
__property double MinValue = {read=FMinValue, write=SetMinValue};
__property double Value = {read=FValue, write=SetValue};
__property int Decimals = {read=FDecimals, write=SetDecimals, default=0};
__property double Increment = {read=FIncrement, write=SetIncrement};
__property bool ScaleVisible = {read=FScaleVisible, write=SetScaleVisible, nodefault};
__property int TopOffset = {read=FTopOffset, write=SetTopOffset, default=15};
__property int BottomOffset = {read=FBottomOffset, write=SetBottomOffset, default=10};
__property int BarWidth = {read=FBarWidth, write=SetBarWidth, nodefault};
__property Graphics::TBitmap* MarkerImage = {read=FMarkerImage, write=SetMarkerImage};
__property bool MarkerVisible = {read=FMarkerVisible, write=SetMarkerVisible, nodefault};
__property Graphics::TFont* TitleFont = {read=FTitleFont, write=SetTitleFont};
__property TVrTitleAlignment TitleAlignment = {read=FTitleAlignment, write=SetTitleAlignment, default=0
};
__property Transparent ;
__property Classes::TNotifyEvent OnChange = {read=FOnChange, write=FOnChange};
__property Align ;
__property Caption ;
__property Anchors ;
__property Constraints ;
__property Color ;
__property DragCursor ;
__property DragKind ;
__property DragMode ;
__property Font ;
__property ParentColor ;
__property ParentShowHint ;
__property ParentFont ;
__property PopupMenu ;
__property ShowHint ;
__property Visible ;
__property OnClick ;
__property OnContextPopup ;
__property OnDblClick ;
__property OnDragDrop ;
__property OnDragOver ;
__property OnEndDock ;
__property OnEndDrag ;
__property OnMouseDown ;
__property OnMouseMove ;
__property OnMouseUp ;
__property OnStartDock ;
__property OnStartDrag ;
};
//-- var, const, procedure ---------------------------------------------------
} /* namespace Vrpowermeter */
#if !defined(NO_IMPLICIT_NAMESPACE_USE)
using namespace Vrpowermeter;
#endif
#pragma option pop // -w-
#pragma option pop // -Vx
#pragma delphiheader end.
//-- end unit ----------------------------------------------------------------
#endif // VrPowerMeter
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -