home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 2001 October
/
Chip_2001-10_cd1.bin
/
zkuste
/
delphi
/
kompon
/
d123456
/
CHEMPLOT.ZIP
/
TPlot
/
Titles.hpp
< prev
next >
Wrap
C/C++ Source or Header
|
2001-07-31
|
13KB
|
351 lines
// Borland C++ Builder
// Copyright (c) 1995, 1998 by Borland International
// All rights reserved
// (DO NOT EDIT: machine generated header) 'Titles.pas' rev: 3.00
#ifndef TitlesHPP
#define TitlesHPP
#include <Plotdefs.hpp>
#include <Misc.hpp>
#include <Graphics.hpp>
#include <Dialogs.hpp>
#include <Controls.hpp>
#include <Windows.hpp>
#include <NoMath.hpp>
#include <SysUtils.hpp>
#include <Classes.hpp>
#include <SysInit.hpp>
#include <System.hpp>
//-- user supplied -----------------------------------------------------------
namespace Titles
{
//-- type declarations -------------------------------------------------------
class DELPHICLASS TRectangle;
class PASCALIMPLEMENTATION TRectangle : public Classes::TPersistent
{
typedef Classes::TPersistent inherited;
private:
TAlignment FAlignment;
bool FFireEvents;
int FLeft;
int FTop;
int FRight;
int FBottom;
System::AnsiString FName;
Classes::TPersistent* FOwner;
int FTag;
bool FVisible;
protected:
Classes::TNotifyEvent FOnChange;
int __fastcall GetHeight(void);
int __fastcall GetWidth(void);
int __fastcall GetMidX(void);
int __fastcall GetMidY(void);
virtual void __fastcall SetLeft(int Value);
virtual void __fastcall SetMidX(int Value);
virtual void __fastcall SetMidY(int Value);
virtual void __fastcall SetTop(int Value);
void __fastcall SetAlignment(Classes::TAlignment Value);
virtual void __fastcall SetRight(int Value);
virtual void __fastcall SetBottom(int Value);
virtual void __fastcall SetVisible(bool Value);
virtual void __fastcall SetHeight(int Value);
virtual void __fastcall SetWidth(int Value);
virtual void __fastcall DoHandleChange(void);
public:
__property Classes::TPersistent* Owner = {read=FOwner};
__property int Tag = {read=FTag, write=FTag, nodefault};
__fastcall virtual TRectangle(Classes::TPersistent* AOwner);
__fastcall virtual ~TRectangle(void);
virtual void __fastcall AssignTo(Classes::TPersistent* Dest);
void __fastcall AssignToRect(const Windows::TRect &Dest);
virtual bool __fastcall ClickedOn(int iX, int iY);
virtual void __fastcall MoveTo(int iX, int iY);
virtual void __fastcall MoveBy(int dX, int dY);
virtual void __fastcall Outline(Graphics::TCanvas* ACanvas);
__published:
__property Classes::TAlignment Alignment = {read=FAlignment, write=SetAlignment, nodefault};
__property bool FireEvents = {read=FFireEvents, write=FFireEvents, nodefault};
__property System::AnsiString Name = {read=FName, write=FName};
__property int Left = {read=FLeft, write=SetLeft, nodefault};
__property int Top = {read=FTop, write=SetTop, nodefault};
__property int Right = {read=FRight, write=SetRight, nodefault};
__property int Bottom = {read=FBottom, write=SetBottom, nodefault};
__property bool Visible = {read=FVisible, write=SetVisible, nodefault};
__property int Height = {read=GetHeight, write=SetHeight, nodefault};
__property int Width = {read=GetWidth, write=SetWidth, nodefault};
__property int MidX = {read=GetMidX, write=SetMidX, nodefault};
__property int MidY = {read=GetMidY, write=SetMidY, nodefault};
__property Classes::TNotifyEvent OnChange = {read=FOnChange, write=FOnChange};
};
class DELPHICLASS TBorder;
class PASCALIMPLEMENTATION TBorder : public Titles::TRectangle
{
typedef Titles::TRectangle inherited;
private:
int FRightEx;
int FBottomEx;
void __fastcall SetRightEx(int Value);
void __fastcall SetBottomEx(int Value);
int __fastcall GetRightGap(void);
int __fastcall GetBottomGap(void);
int __fastcall GetHeightEx(void);
int __fastcall GetWidthEx(void);
void __fastcall SetRightGap(int Value);
void __fastcall SetBottomGap(int Value);
void __fastcall SetHeightEx(int Value);
void __fastcall SetWidthEx(int Value);
protected:
virtual void __fastcall SetLeft(int Value);
virtual void __fastcall SetTop(int Value);
public:
__fastcall virtual TBorder(Classes::TPersistent* AOwner);
__published:
__property int RightEx = {read=FRightEx, write=SetRightEx, nodefault};
__property int BottomEx = {read=FBottomEx, write=SetBottomEx, nodefault};
__property int RightGap = {read=GetRightGap, write=SetRightGap, nodefault};
__property int BottomGap = {read=GetBottomGap, write=SetBottomGap, nodefault};
__property int HeightEx = {read=GetHeightEx, write=SetHeightEx, nodefault};
__property int WidthEx = {read=GetWidthEx, write=SetWidthEx, nodefault};
public:
/* TRectangle.Destroy */ __fastcall virtual ~TBorder(void) { }
};
class DELPHICLASS TAngleRect;
class PASCALIMPLEMENTATION TAngleRect : public Titles::TRectangle
{
typedef Titles::TRectangle inherited;
private:
Plotdefs::TDegrees FAngle;
float FAngleRadians;
Word FLength;
Word FBreadth;
tagPOINT FCentre;
tagPOINT FOrigin;
tagPOINT FPolyRect[5];
Extended FSin;
Extended FCos;
Extended FSinM30;
Extended FCosM30;
Extended FSinP30;
Extended FCosP30;
protected:
__property Extended Sin = {read=FSin};
__property Extended Cos = {read=FCos};
__property Extended SinM30 = {read=FSinM30};
__property Extended CosM30 = {read=FCosM30};
__property Extended SinP30 = {read=FSinP30};
__property Extended CosP30 = {read=FCosP30};
void __fastcall DoGeometry(void);
tagPOINT __fastcall RotatePoint(const tagPOINT &APoint);
void __fastcall SetAngle(Plotdefs::TDegrees Value);
void __fastcall SetLength(Word Value);
void __fastcall SetBreadth(Word Value);
void __fastcall SetOrigin(const tagPOINT &Value);
virtual tagPOINT __fastcall GetVector();
virtual void __fastcall SetLeft(int Value);
virtual void __fastcall SetTop(int Value);
virtual void __fastcall SetRight(int Value);
virtual void __fastcall SetBottom(int Value);
virtual void __fastcall SetMidX(int Value);
virtual void __fastcall SetMidY(int Value);
virtual void __fastcall SetHeight(int Value);
virtual void __fastcall SetWidth(int Value);
virtual void __fastcall SetCentre(const tagPOINT &NewCentre);
virtual void __fastcall SetVector(const tagPOINT &Value);
public:
__property tagPOINT Origin = {read=FOrigin, write=SetOrigin};
__property tagPOINT Centre = {read=FCentre, write=SetCentre};
__property tagPOINT Vector = {read=GetVector, write=SetVector};
__fastcall virtual TAngleRect(Classes::TPersistent* AOwner);
__fastcall virtual ~TAngleRect(void);
virtual void __fastcall AssignTo(Classes::TPersistent* Dest);
virtual bool __fastcall ClickedOn(int iX, int iY);
virtual void __fastcall MoveTo(int NewX, int NewY);
virtual void __fastcall MoveBy(int dX, int dY);
void __fastcall SetNewGeometry(const tagPOINT &NewOrigin, Plotdefs::TDegrees NewAngle, int NewLength
, int NewBreadth);
virtual void __fastcall Outline(Graphics::TCanvas* ACanvas);
__published:
__property Plotdefs::TDegrees Angle = {read=FAngle, write=SetAngle, nodefault};
__property Word Breadth = {read=FBreadth, write=SetBreadth, nodefault};
__property Word Length = {read=FLength, write=SetLength, nodefault};
};
class DELPHICLASS TCaption;
class PASCALIMPLEMENTATION TCaption : public Titles::TRectangle
{
typedef Titles::TRectangle inherited;
private:
System::AnsiString FCaption;
Graphics::TFont* FFont;
Classes::TNotifyEvent FOnCaptionChange;
protected:
virtual void __fastcall CreateName(void);
virtual void __fastcall SetCaption(System::AnsiString Value);
void __fastcall SetFont(Graphics::TFont* Value);
public:
__fastcall virtual TCaption(Classes::TPersistent* AOwner);
__fastcall virtual ~TCaption(void);
virtual void __fastcall AssignTo(Classes::TPersistent* Dest);
__published:
__property System::AnsiString Caption = {read=FCaption, write=SetCaption};
__property Graphics::TFont* Font = {read=FFont, write=SetFont};
__property Classes::TNotifyEvent OnCaptionChange = {read=FOnCaptionChange, write=FOnCaptionChange};
};
class DELPHICLASS TTitle;
class PASCALIMPLEMENTATION TTitle : public Titles::TCaption
{
typedef Titles::TCaption inherited;
private:
TDirection FDirection;
TOrientation FOrientation;
Windows::TRect FEnvelope;
System::AnsiString FUnits;
System::AnsiString FFullCaption;
void __fastcall SetDirection(Plotdefs::TDirection Value);
void __fastcall SetOrientation(Plotdefs::TOrientation Value);
void __fastcall SetEnvelope(const Windows::TRect &Value);
void __fastcall SetUnits(System::AnsiString Value);
protected:
DYNAMIC void __fastcall DoGeometry(Graphics::TCanvas* ACanvas, System::AnsiString TheText);
virtual void __fastcall SetCaption(System::AnsiString Value);
public:
__property Windows::TRect Envelope = {read=FEnvelope, write=SetEnvelope};
__property System::AnsiString FullCaption = {read=FFullCaption};
__fastcall virtual TTitle(Classes::TPersistent* AOwner);
void __fastcall Draw(Graphics::TCanvas* ACanvas);
virtual void __fastcall AssignTo(Classes::TPersistent* Dest);
__published:
__property System::AnsiString Units = {read=FUnits, write=SetUnits};
__property Plotdefs::TDirection Direction = {read=FDirection, write=SetDirection, nodefault};
__property Plotdefs::TOrientation Orientation = {read=FOrientation, write=SetOrientation, nodefault
};
public:
/* TCaption.Destroy */ __fastcall virtual ~TTitle(void) { }
};
class DELPHICLASS TLegend;
class PASCALIMPLEMENTATION TLegend : public Titles::TRectangle
{
typedef Titles::TRectangle inherited;
private:
bool FCheckboxes;
TDirection FDirection;
Graphics::TFont* FFont;
int FFontHeight;
int FStringWidth;
int FCheckWidth;
int FLineWidth;
Classes::TList* FSeriesList;
protected:
int __fastcall GetItemWidth(void);
void __fastcall SetCheckboxes(bool Value);
void __fastcall SetDirection(Plotdefs::TDirection Value);
void __fastcall SetFont(Graphics::TFont* Value);
public:
__property int FontHeight = {read=FFontHeight, nodefault};
__property int ItemWidth = {read=GetItemWidth, nodefault};
__fastcall virtual TLegend(Classes::TPersistent* AOwner, Classes::TList* SeriesList);
__fastcall virtual ~TLegend(void);
int __fastcall GetHit(int iX, int iY, Windows::TRect &TheRect);
void __fastcall Draw(Graphics::TCanvas* ACanvas, int SeriesIncrement);
__published:
__property bool CheckBoxes = {read=FCheckboxes, write=SetCheckboxes, nodefault};
__property Plotdefs::TDirection Direction = {read=FDirection, write=SetDirection, nodefault};
__property Graphics::TFont* Font = {read=FFont, write=SetFont};
public:
/* TRectangle.Create */ __fastcall virtual TLegend(Classes::TPersistent* AOwner) : Titles::TRectangle(
AOwner) { }
};
class DELPHICLASS TNote;
class PASCALIMPLEMENTATION TNote : public Titles::TCaption
{
typedef Titles::TCaption inherited;
private:
int FArrowLeft;
int FArrowTop;
float FArrowLeftReal;
float FArrowTopReal;
Classes::TPersistent* FOwner;
float FLeftReal;
float FTopReal;
int ArrowStartLeft;
int ArrowStartTop;
protected:
virtual void __fastcall SetLeft(int Value);
virtual void __fastcall SetTop(int Value);
virtual void __fastcall SetArrowLeft(int Value);
virtual void __fastcall SetArrowTop(int Value);
virtual void __fastcall SetArrowLeftReal(float Value);
virtual void __fastcall SetArrowTopReal(float Value);
virtual void __fastcall SetLeftReal(float Value);
virtual void __fastcall SetTopReal(float Value);
public:
__fastcall virtual TNote(Classes::TPersistent* AOwner);
virtual void __fastcall AssignTo(Classes::TPersistent* Dest);
void __fastcall Draw(Graphics::TCanvas* ACanvas);
void __fastcall TracePointerTo(Graphics::TCanvas* ACanvas, int iX, int iY);
__published:
__property int ArrowLeft = {read=FArrowLeft, write=SetArrowLeft, nodefault};
__property int ArrowTop = {read=FArrowTop, write=SetArrowTop, nodefault};
__property float ArrowLeftReal = {read=FArrowLeftReal, write=SetArrowLeftReal};
__property float ArrowTopReal = {read=FArrowTopReal, write=SetArrowTopReal};
__property float LeftReal = {read=FLeftReal, write=SetLeftReal};
__property float TopReal = {read=FTopReal, write=SetTopReal};
public:
/* TCaption.Destroy */ __fastcall virtual ~TNote(void) { }
};
//-- var, const, procedure ---------------------------------------------------
#define SIN_30 (5.000000E-01)
#define SIN_60 (8.660254E-01)
#define COS_30 (8.660254E-01)
#define COS_60 (5.000000E-01)
} /* namespace Titles */
#if !defined(NO_IMPLICIT_NAMESPACE_USE)
using namespace Titles;
#endif
//-- end unit ----------------------------------------------------------------
#endif // Titles