⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 commfunction.h

📁 速达开源ERP系统
💻 H
字号:
//---------------------------------------------------------------------------
#ifndef CommFunctionH
#define CommFunctionH
#include "SDGrid.h"
#include "SDComboBox.h"
#include "SDEdit.h"
#include "dateedit.hpp"
#include "MidClass.h"
class PACKAGE TControlGroup;
class PACKAGE TControlGroups;
//------------------------------------------------------------
enum TMessageWindowStyle
{
       mwsWarning,
       mwsError,
       mwsInformation,
       mwsConfirmation,
       mwsRetry
};

enum TControlAction{
     caNormal,   
     caAddHead,
     caEditHead,
     caDelHead,
     caAddDetail,
     caEditDetail,
     caDelDetail,
     caAddBill,
     caGenBill,
     caCheckBill,
     caQueryBill,
     caEditBill,
     
     caSave,
     caCancel,
     caFirst,
     caPrevious,
     caNext,
     caLast,
     caQuery,
     caPrint,
     caHelp,
     caExit
};


class TControlGroup:public TObject
{
 private:
       	TComponent *Compon;
        AnsiString mKey;
        int mSection;     //1 it belong billl head,2 it belong bill detail
       	bool NewAct;
        bool EditAct;
        bool BrowseAct;

 private:
        void __fastcall SetControlState(bool State);

 protected:

 public:
      	void __fastcall ChangeCotnrolStates(TControlAction Action);
        __fastcall TControlGroup();

 __published:
       	__property bool NewAction={read=NewAct,write=NewAct};
        __property bool EditAction={read=EditAct,write=EditAct};
      	__property bool BrowseAction={read=BrowseAct,write=BrowseAct};
        __property AnsiString Key={read=mKey,write=mKey};
        __property TComponent *Control={read=Compon,write=Compon};
        __property int Section={read=mSection,write=mSection};

};


class TControlGroups:public TObject
{
 private:
      DynamicArray<TControlGroup *> CtlGroup;
 public:
      void __fastcall AddComponent(int mSection, bool NewAct,bool EditAct,bool BrowseAct,
      		TComponent *Control,AnsiString Key);
      void __fastcall SetControlState(TControlAction Action);
      void __fastcall Remove(AnsiString Key);
      void __fastcall Clear(void);


      __fastcall  TControlGroups();
 protected:
       TControlGroup *__fastcall  GetControl(int Index);
       int __fastcall GetLength();
 __published:
       __property int Length={read=GetLength};
       __property TControlGroup * Contorls[int Index]={read=GetControl};

};

void __declspec(dllexport) SetGridWidth(AnsiString FormName,TSDGrid *Grid,AnsiString IniFile);
void __declspec(dllexport) WriteGridWidth(AnsiString FormName,TSDGrid *Grid,AnsiString IniFile);
void __declspec(dllexport) FillComboBox(TSDComboBox *Cbx,AnsiString SqlStr,AnsiString Item0,AnsiString Item1="",AnsiString Item2="",AnsiString Item3="",AnsiString Item4="",AnsiString Item5="",AnsiString Item6="",AnsiString Key="");
void __declspec(dllexport) FillEdit(TSDEdit *pEdit,AnsiString SqlStr,AnsiString Item0,AnsiString Item1="",AnsiString Item2="",AnsiString Item3="",AnsiString Item4="",AnsiString Item5="",AnsiString Item6="",AnsiString Key="");

bool __declspec(dllexport) CheckClassType(TControl *Control,AnsiString sClassType);
void __declspec(dllexport) EmptyAll(TWinControl *ContainerControl);
void __declspec(dllexport) StartWaitForm(AnsiString Msg="");
void __declspec(dllexport) EndWaitForm();
bool __declspec(dllexport) ShowUpdateMessage(int ClassName,int UpdateType);

void __declspec(dllexport) __fastcall WriteLog(AnsiString sFrom,int iType,AnsiString sDesc);
void __declspec(dllexport) __fastcall CheckComboBoxText(TSDComboBox *sdcbx);

#endif

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -