?? frxdesgnctrls.hpp
字號:
// Borland C++ Builder
// Copyright (c) 1995, 2002 by Borland Software Corporation
// All rights reserved
// (DO NOT EDIT: machine generated header) 'frxDesgnCtrls.pas' rev: 6.00
#ifndef frxDesgnCtrlsHPP
#define frxDesgnCtrlsHPP
#pragma delphiheader begin
#pragma option push -w-
#pragma option push -Vx
#include <Variants.hpp> // Pascal unit
#include <frxPictureCache.hpp> // Pascal unit
#include <frxClass.hpp> // Pascal unit
#include <ImgList.hpp> // Pascal unit
#include <ToolWin.hpp> // Pascal unit
#include <ComCtrls.hpp> // Pascal unit
#include <ExtCtrls.hpp> // Pascal unit
#include <Buttons.hpp> // Pascal unit
#include <StdCtrls.hpp> // Pascal unit
#include <Dialogs.hpp> // Pascal unit
#include <Forms.hpp> // Pascal unit
#include <Controls.hpp> // Pascal unit
#include <Graphics.hpp> // Pascal unit
#include <Classes.hpp> // Pascal unit
#include <Messages.hpp> // Pascal unit
#include <Windows.hpp> // Pascal unit
#include <SysUtils.hpp> // Pascal unit
#include <SysInit.hpp> // Pascal unit
#include <System.hpp> // Pascal unit
//-- user supplied -----------------------------------------------------------
namespace Frxdesgnctrls
{
//-- type declarations -------------------------------------------------------
#pragma option push -b-
enum TfrxRulerUnits { ruCM, ruInches, ruPixels, ruChars };
#pragma option pop
class DELPHICLASS TfrxRuler;
class PASCALIMPLEMENTATION TfrxRuler : public Extctrls::TPanel
{
typedef Extctrls::TPanel inherited;
private:
int FOffset;
Extended FScale;
int FStart;
TfrxRulerUnits FUnits;
Extended FPosition;
int FSize;
void __fastcall SetOffset(const int Value);
void __fastcall SetScale(const Extended Value);
void __fastcall SetStart(const int Value);
void __fastcall SetUnits(const TfrxRulerUnits Value);
void __fastcall SetPosition(const Extended Value);
MESSAGE void __fastcall WMEraseBackground(Messages::TMessage &Message);
void __fastcall SetSize(const int Value);
public:
__fastcall virtual TfrxRuler(Classes::TComponent* AOwner);
virtual void __fastcall Paint(void);
__published:
__property int Offset = {read=FOffset, write=SetOffset, nodefault};
__property Extended Scale = {read=FScale, write=SetScale};
__property int Start = {read=FStart, write=SetStart, nodefault};
__property TfrxRulerUnits Units = {read=FUnits, write=SetUnits, default=2};
__property Extended Position = {read=FPosition, write=SetPosition};
__property int Size = {read=FSize, write=SetSize, nodefault};
public:
#pragma option push -w-inl
/* TCustomControl.Destroy */ inline __fastcall virtual ~TfrxRuler(void) { }
#pragma option pop
public:
#pragma option push -w-inl
/* TWinControl.CreateParented */ inline __fastcall TfrxRuler(HWND ParentWindow) : Extctrls::TPanel(ParentWindow) { }
#pragma option pop
};
class DELPHICLASS TfrxScrollBox;
class PASCALIMPLEMENTATION TfrxScrollBox : public Forms::TScrollBox
{
typedef Forms::TScrollBox inherited;
protected:
MESSAGE void __fastcall WMGetDlgCode(Messages::TWMNoParams &Message);
DYNAMIC void __fastcall KeyDown(Word &Key, Classes::TShiftState Shift);
DYNAMIC void __fastcall KeyUp(Word &Key, Classes::TShiftState Shift);
DYNAMIC void __fastcall KeyPress(char &Key);
public:
#pragma option push -w-inl
/* TScrollBox.Create */ inline __fastcall virtual TfrxScrollBox(Classes::TComponent* AOwner) : Forms::TScrollBox(AOwner) { }
#pragma option pop
public:
#pragma option push -w-inl
/* TScrollingWinControl.Destroy */ inline __fastcall virtual ~TfrxScrollBox(void) { }
#pragma option pop
public:
#pragma option push -w-inl
/* TWinControl.CreateParented */ inline __fastcall TfrxScrollBox(HWND ParentWindow) : Forms::TScrollBox(ParentWindow) { }
#pragma option pop
};
class DELPHICLASS TfrxCustomSelector;
class PASCALIMPLEMENTATION TfrxCustomSelector : public Extctrls::TPanel
{
typedef Extctrls::TPanel inherited;
private:
MESSAGE void __fastcall WMEraseBackground(Messages::TMessage &Message);
protected:
virtual void __fastcall DrawEdge(int X, int Y, bool IsDown) = 0 ;
DYNAMIC void __fastcall MouseDown(Controls::TMouseButton Button, Classes::TShiftState Shift, int X, int Y);
DYNAMIC void __fastcall MouseMove(Classes::TShiftState Shift, int X, int Y);
public:
virtual void __fastcall Paint(void);
__fastcall virtual TfrxCustomSelector(Classes::TComponent* AOwner);
public:
#pragma option push -w-inl
/* TCustomControl.Destroy */ inline __fastcall virtual ~TfrxCustomSelector(void) { }
#pragma option pop
public:
#pragma option push -w-inl
/* TWinControl.CreateParented */ inline __fastcall TfrxCustomSelector(HWND ParentWindow) : Extctrls::TPanel(ParentWindow) { }
#pragma option pop
};
class DELPHICLASS TfrxColorSelector;
class PASCALIMPLEMENTATION TfrxColorSelector : public TfrxCustomSelector
{
typedef TfrxCustomSelector inherited;
private:
Graphics::TColor FColor;
Classes::TNotifyEvent FOnColorChanged;
protected:
virtual void __fastcall DrawEdge(int X, int Y, bool IsDown);
DYNAMIC void __fastcall MouseUp(Controls::TMouseButton Button, Classes::TShiftState Shift, int X, int Y);
public:
__fastcall virtual TfrxColorSelector(Classes::TComponent* AOwner);
virtual void __fastcall Paint(void);
__property Graphics::TColor Color = {read=FColor, write=FColor, nodefault};
__property Classes::TNotifyEvent OnColorChanged = {read=FOnColorChanged, write=FOnColorChanged};
public:
#pragma option push -w-inl
/* TCustomControl.Destroy */ inline __fastcall virtual ~TfrxColorSelector(void) { }
#pragma option pop
public:
#pragma option push -w-inl
/* TWinControl.CreateParented */ inline __fastcall TfrxColorSelector(HWND ParentWindow) : TfrxCustomSelector(ParentWindow) { }
#pragma option pop
};
class DELPHICLASS TfrxLineSelector;
class PASCALIMPLEMENTATION TfrxLineSelector : public TfrxCustomSelector
{
typedef TfrxCustomSelector inherited;
private:
Byte FStyle;
Classes::TNotifyEvent FOnStyleChanged;
protected:
virtual void __fastcall DrawEdge(int X, int Y, bool IsDown);
DYNAMIC void __fastcall MouseUp(Controls::TMouseButton Button, Classes::TShiftState Shift, int X, int Y);
public:
__fastcall virtual TfrxLineSelector(Classes::TComponent* AOwner);
virtual void __fastcall Paint(void);
__property Byte Style = {read=FStyle, nodefault};
__property Classes::TNotifyEvent OnStyleChanged = {read=FOnStyleChanged, write=FOnStyleChanged};
public:
#pragma option push -w-inl
/* TCustomControl.Destroy */ inline __fastcall virtual ~TfrxLineSelector(void) { }
#pragma option pop
public:
#pragma option push -w-inl
/* TWinControl.CreateParented */ inline __fastcall TfrxLineSelector(HWND ParentWindow) : TfrxCustomSelector(ParentWindow) { }
#pragma option pop
};
class DELPHICLASS TfrxUndoBuffer;
class PASCALIMPLEMENTATION TfrxUndoBuffer : public System::TObject
{
typedef System::TObject inherited;
private:
Frxpicturecache::TfrxPictureCache* FPictureCache;
Classes::TList* FRedo;
Classes::TList* FUndo;
int __fastcall GetRedoCount(void);
int __fastcall GetUndoCount(void);
void __fastcall SetPictureFlag(Frxclass::TfrxReport* Report, bool Flag);
void __fastcall SetPictures(Frxclass::TfrxReport* Report);
public:
__fastcall TfrxUndoBuffer(void);
__fastcall virtual ~TfrxUndoBuffer(void);
void __fastcall AddUndo(Frxclass::TfrxReport* Report);
void __fastcall AddRedo(Frxclass::TfrxReport* Report);
void __fastcall GetUndo(Frxclass::TfrxReport* Report);
void __fastcall GetRedo(Frxclass::TfrxReport* Report);
void __fastcall ClearUndo(void);
void __fastcall ClearRedo(void);
__property int UndoCount = {read=GetUndoCount, nodefault};
__property int RedoCount = {read=GetRedoCount, nodefault};
__property Frxpicturecache::TfrxPictureCache* PictureCache = {read=FPictureCache, write=FPictureCache};
};
class DELPHICLASS TfrxClipboard;
class PASCALIMPLEMENTATION TfrxClipboard : public System::TObject
{
typedef System::TObject inherited;
private:
Frxclass::TfrxCustomDesigner* FDesigner;
Frxpicturecache::TfrxPictureCache* FPictureCache;
bool __fastcall GetPasteAvailable(void);
public:
__fastcall TfrxClipboard(Frxclass::TfrxCustomDesigner* ADesigner);
void __fastcall Copy(void);
void __fastcall Paste(void);
__property bool PasteAvailable = {read=GetPasteAvailable, nodefault};
__property Frxpicturecache::TfrxPictureCache* PictureCache = {read=FPictureCache, write=FPictureCache};
public:
#pragma option push -w-inl
/* TObject.Destroy */ inline __fastcall virtual ~TfrxClipboard(void) { }
#pragma option pop
};
//-- var, const, procedure ---------------------------------------------------
} /* namespace Frxdesgnctrls */
using namespace Frxdesgnctrls;
#pragma option pop // -w-
#pragma option pop // -Vx
#pragma delphiheader end.
//-- end unit ----------------------------------------------------------------
#endif // frxDesgnCtrls
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -