|
|
|
|
|
//---------------------------------------------------------------------------
#include <SysUtils.hpp> #include <Classes.hpp> #include <Controls.hpp> #include <ExtCtrls.hpp> #include <Buttons.hpp> #include <Grids.hpp> #include <DB.hpp> #include <DBGrids.hpp> enum TLocation {vcLeft,vcRight,vcTop,vcBottom}; //在这里写 typedef Set <TMyToolbar, tbOpen, tbHelp> TMyToolbars; //--------------------------------------------------------------------------- class PACKAGE TNewReport : public TPanel { private: // void __fastcall GetLocation(TLocation values); protected: public: TLocation FLocation; TPanel * PanelButton; //放操作控件的容器 TPanel* PanelGrid; //放报表控件的容器 TSpeedButton * PriovButton; //焦点前进按钮 TSpeedButton* BackButton; //焦点后退按钮 TSpeedButton* UpButton; //焦点上移 TSpeedButton* DownButton; //焦点下移 TSpeedButton* CreateButton; //生成 TSpeedButton* SaveButton; //保存 TSpeedButton* ExcelButton; //导入EXCEL TSpeedButton* PrintButton; //打印报表 TSpeedButton* ExitButton; //退出 TDBGrid * ShowDataGrid; //显示报表数据控件 void __fastcall SetLocation(TLocation values); __fastcall TNewReport(TComponent* Owner); __published: __property TLocation Location = {read=FLocation,write=SetLocation,default=vcBottom}; }; |
|