system.h

这是一款ERP软件源代码

    int m_ModulePost;
    int m_ModuleCancel;
    int m_ModuleVisible;
    int m_ModuleRight;
    int m_ModuleLib;

//Backup Field
    AnsiString b_ModuleCode;
    AnsiString b_ModuleCaption;
    AnsiString b_ModuleItem;
    AnsiString b_ModuleDesc;
    int b_ModuleLevel;
    int b_ModuleNo;
    AnsiString b_ModuleUpperCode;
    AnsiString b_ModuleFormName;
    AnsiString b_ModulePicName;
    AnsiString b_ModuleSelPicName;
    AnsiString b_ModuleMovePic;
    AnsiString b_ModuleNavpic;
    int b_ModuleType;
    int b_ModuleCheck;
    int b_ModulePost;
    int b_ModuleCancel;
    int b_ModuleVisible;
    int b_ModuleRight;
    int b_ModuleLib;

    void BackupValue();
    void EmptyValue(int Index);
    void BatchLetValue();
    void AssignValue();

    void __fastcall SetModuleCaption(AnsiString value);
    void __fastcall SetModuleItem(AnsiString value);
    void __fastcall SetModuleDesc(AnsiString value);
    void __fastcall SetModuleNo(int value);
    void __fastcall SetModuleLevel(int value);
    void __fastcall SetModuleUpperCode(AnsiString value);
    void __fastcall SetModuleFormName(AnsiString value);
    void __fastcall SetModulePicName(AnsiString value);
    void __fastcall SetModuleSelPicName(AnsiString value);
    void __fastcall SetModuleMovePic(AnsiString value);
    void __fastcall SetModuleNavpic(AnsiString value);
    void __fastcall SetModuleType(int value);
    void __fastcall SetModuleCheck(int value);
    void __fastcall SetModulePost(int value);
    void __fastcall SetModuleCancel(int value);
    void __fastcall SetModuleVisible(int value);
    void __fastcall SetModuleLib(int value);

    __property AnsiString ModuleCode  = { read = m_ModuleCode };
    __property AnsiString ModuleCaption  = { read = m_ModuleCaption, write = SetModuleCaption };
    __property AnsiString ModuleItem  = { read = m_ModuleItem, write = SetModuleItem };
    __property AnsiString ModuleDesc  = { read = m_ModuleDesc, write = SetModuleDesc };
    __property int ModuleLevel  = { read = m_ModuleLevel,write = SetModuleLevel };
    __property int ModuleNo  = { read = m_ModuleNo, write = SetModuleNo };
    __property AnsiString ModuleUpperCode  = { read = m_ModuleUpperCode, write = SetModuleUpperCode };
    __property AnsiString ModuleFormName  = { read = m_ModuleFormName, write = SetModuleFormName };
    __property AnsiString ModulePicName  = { read = m_ModulePicName, write = SetModulePicName };
    __property AnsiString ModuleSelPicName  = { read = m_ModuleSelPicName, write = SetModuleSelPicName };
    __property AnsiString ModuleMovePic={read=m_ModuleMovePic,write=SetModuleMovePic};
    __property AnsiString ModuleNavpic={read=m_ModuleNavpic,write=SetModuleNavpic};
    __property int ModuleType  = { read = m_ModuleType, write = SetModuleType };
    __property int ModuleCheck  = { read = m_ModuleCheck, write = SetModuleCheck };
    __property int ModulePost={read=m_ModulePost,write=SetModulePost};
    __property int ModuleCancel={read =m_ModuleCancel,write=SetModuleCancel};
    __property int ModuleVisible={read =m_ModuleVisible,write=SetModuleVisible};
    __property int ModuleRight={read=m_ModuleRight};
    __property int ModuleLib={read=m_ModuleLib,write=SetModuleLib};

public:
    TsdModule(TDataComm *DC);
    TsdModule();
    ~TsdModule();

    void Update();
    void Delete();
    void Assign(TsdModule *p);
    int  Query();
    void __fastcall CycleQuery(AnsiString value,int UnitType);

    AnsiString GetFieldValue(euModule sdFieldName);
    void SetFieldValue(euModule sdFieldName, AnsiString Value);
    void RestoreValue();
    bool Find(AnsiString WhereStr);
};

//===================================================
//*********(TsdUserGroup)用户组维护******************
//===================================================

class _EXPORT_TYPE TsdUserGroup:public TsdStandard
{
private:
    AnsiString m_UserGroupCode;
    AnsiString m_UserGroupName;
    AnsiString m_UserGroupDesc;
    int        m_UserGroupLevel;
    AnsiString m_UserGroupUpperCode;
    AnsiString m_UserGroupItem;

//Backup Field

    AnsiString b_UserGroupCode;
    AnsiString b_UserGroupName;
    AnsiString b_UserGroupDesc;
    int        b_UserGroupLevel;
    AnsiString b_UserGroupUpperCode;
    AnsiString b_UserGroupItem;

    void BackupValue();
    void EmptyValue(int Index);
    void BatchLetValue();
    void AssignValue();

    void  SetUserGroupCode(AnsiString value);
    void  SetUserGroupName(AnsiString value);
    void  SetUserGroupDesc(AnsiString value);
    void  SetUserGroupUpperCode(AnsiString value);
    void  SetUserGroupItem(AnsiString value);
    void  SetUserGroupLevel(int value);

    __property AnsiString UserGroupCode  = { read = m_UserGroupCode, write = SetUserGroupCode};
    __property AnsiString UserGroupName  = { read = m_UserGroupName, write = SetUserGroupName};
    __property AnsiString UserGroupDesc  = { read = m_UserGroupDesc, write = SetUserGroupDesc};
    __property int UserGroupLevel= { read = m_UserGroupLevel, write = SetUserGroupLevel};
    __property AnsiString UserGroupUpperCode  = { read = m_UserGroupUpperCode, write = SetUserGroupUpperCode };
    __property AnsiString UserGroupItem  = { read = m_UserGroupItem, write = SetUserGroupItem };
    void Assign(TsdUserGroup *p);

public:
    TsdUserGroup(TDataComm *DC);
    TsdUserGroup();
    ~TsdUserGroup();

    void Update();
    void Delete();
    int  Query();

    AnsiString GetFieldValue(euUserGroup sdFieldName);
    void SetFieldValue(euUserGroup sdFieldName, AnsiString Value);
    bool Find(AnsiString WhereStr);
    void RestoreValue();
};

//===================================================
//**************(TsdUser)用户维护
//===================================================
class _EXPORT_TYPE TsdUser:public TsdStandard
{
private:
    AnsiString m_UserCode;
    AnsiString m_UserName;
    AnsiString m_UserDesc;
    AnsiString m_UserGroup;
    AnsiString m_UserPassword;
    int        m_UserLanguage;
    AnsiString m_UserExpireDate;
    int        m_UserRestrict;
    int        m_UserNetFlag;
    AnsiString m_UserNetAddress;
    AnsiString m_UserDept;
    AnsiString m_UserStime;
    AnsiString m_UserEtime;

//Backup Field
    AnsiString b_UserCode;
    AnsiString b_UserName;
    AnsiString b_UserDesc;
    AnsiString b_UserGroup;
    AnsiString b_UserPassword;
    int        b_UserLanguage;
    AnsiString b_UserExpireDate;
    int        b_UserRestrict;
    int        b_UserNetFlag;
    AnsiString b_UserNetAddress;
    AnsiString b_UserDept;
    AnsiString b_UserStime;
    AnsiString b_UserEtime;

    void BackupValue();
    void EmptyValue(int Index);
    void BatchLetValue();
    void AssignValue();

    void __fastcall SetUserCode(AnsiString value);
    void __fastcall SetUserName(AnsiString value);
    void __fastcall SetUserDesc(AnsiString value);
    void __fastcall SetUserPassword(AnsiString value);
    void __fastcall SetUserLanguage(int value);
    void __fastcall SetUserExpireDate(AnsiString value);
    void __fastcall SetUserRestrict(int value);
    void __fastcall SetUserNetFlag(int value);
    void __fastcall SetUserNetAddress(AnsiString value);
    void __fastcall SetUserGroup(AnsiString value);
    void __fastcall SetUserDept(AnsiString value);
    void __fastcall SetUserStime(AnsiString value);
    void __fastcall SetUserEtime(AnsiString value);

    __property AnsiString UserCode  = { read = m_UserCode, write = SetUserCode };
    __property AnsiString UserName  = { read = m_UserName, write = SetUserName};
    __property AnsiString UserDesc  = { read = m_UserDesc, write = SetUserDesc};
    __property AnsiString UserPassword={read=m_UserPassword,write=SetUserPassword};
    __property int UserLanguage={read=m_UserLanguage,write=SetUserLanguage};
    __property int UserRestrict={read=m_UserRestrict,write=SetUserRestrict};
    __property int UserNetFlag={read=m_UserNetFlag,write=SetUserNetFlag};
    __property AnsiString UserNetAddress={read=m_UserNetAddress,write=SetUserNetAddress};
    __property AnsiString UserGroup  = { read = m_UserGroup, write = SetUserGroup };
    __property AnsiString UserExpireDate  = { read = m_UserExpireDate, write = SetUserExpireDate };
    __property AnsiString UserDept={read=m_UserDept,write=SetUserDept};
    __property AnsiString UserStime={read=m_UserStime,write=SetUserStime};
    __property AnsiString UserEtime={read=m_UserEtime,write=SetUserEtime};

    void Assign(TsdUser *p);
public:
    TsdUser(TDataComm *DC);
    TsdUser();
    ~TsdUser();

    void Update();
    void Delete();
    int  Query();

    AnsiString GetFieldValue(euUser sdFieldName);
    void SetFieldValue(euUser sdFieldName, AnsiString Value);
    bool Find(AnsiString WhereStr);
    void RestoreValue();
};


//===================================================
//      (TsdForm)表单维护
//===================================================
 class _EXPORT_TYPE TsdForm: public TsdStandard
{
private:
    AnsiString m_FormName;   //表单名称
    AnsiString m_FormClassID;   //表单所属类别
    AnsiString m_FormCaption;   //表单标题
    AnsiString m_FormDesc;   //表单功能描述
    int        m_FormPosition;   //位置
    int        m_FormWindowState;   //状态
    int        m_FormHelpIndex;   //帮助
    int        m_FormType;   //类型
    AnsiString m_FormID;   //ID标识
//backup
    AnsiString b_FormName;
    AnsiString b_FormClassID;
    AnsiString b_FormCaption;
    AnsiString b_FormDesc;
    int        b_FormPosition;
    int        b_FormWindowState;
    int        b_FormHelpIndex;
    int        b_FormType;
    AnsiString b_FormID;

    void __fastcall SetFormName(AnsiString value);
    void __fastcall SetFormClassID(AnsiString value);
    void __fastcall SetFormCaption(AnsiString value);
    void __fastcall SetFormDesc(AnsiString value);
    void __fastcall SetFormPosition(int value);
    void __fastcall SetFormWindowState(int value);
    void __fastcall SetFormHelpIndex(int value);
    void __fastcall SetFormType(int value);
    void __fastcall SetFormID(AnsiString value);

    __property  AnsiString FormName={read=m_FormName,write=SetFormName};
    __property  AnsiString FormClassID={read=m_FormClassID,write=SetFormClassID};
    __property  AnsiString FormCaption={read=m_FormCaption,write=SetFormCaption};
    __property  AnsiString FormDesc={read=m_FormDesc,write=SetFormDesc};
    __property  int        FormPosition={read=m_FormPosition,write=SetFormPosition};
    __property  int        FormWindowState={read=m_FormWindowState,write=SetFormWindowState};
    __property  int        FormHelpIndex={read=m_FormHelpIndex,write=SetFormHelpIndex};
    __property  int        FormType={read=m_FormType,write=SetFormType};
    __property  AnsiString FormID={read=m_FormID,write=SetFormID};
    void BackupValue();
    void EmptyValue(int Index);
    void BatchLetValue();
    void AssignValue();
 

public:
    TsdForm(TDataComm *DC);
    TsdForm();
    ~TsdForm();
 
 
    void Update();
    void Delete();
    void Assign(TsdForm *p);
    int  Query();
    bool Find(AnsiString WhereStr);
 
    AnsiString GetFieldValue(euForm sdFieldName);
    void SetFieldValue(euForm sdFieldName, AnsiString value);
    void RestoreValue();
};


//=============================================
//**********(TsdParameter)系统参数*************
//=============================================

class _EXPORT_TYPE TsdParameter : public TsdStandard
{

private:
    AnsiString m_ParameterCode;
    AnsiString m_ParameterName;
    AnsiString m_ParameterItem;
    AnsiString m_ParameterDesc;
    int        m_ParameterLevel;
    AnsiString m_ParameterUpperCode;
    AnsiString m_ParameterValue;
    int        m_ParameterType;
    int        m_ParameterValueType;
    AnsiString m_ParameterValueDesc;

//Backup Field

    AnsiString b_ParameterCode;
    AnsiString b_ParameterName;
    AnsiString b_ParameterItem;
    AnsiString b_ParameterDesc;
    int        b_ParameterLevel;
    AnsiString b_ParameterValue;
    AnsiString b_ParameterUpperCode;
    int        b_ParameterValueType;
    int        b_ParameterType;
    AnsiString b_ParameterValueDesc;

    void BackupValue();
    void EmptyValue(int Index);
    void BatchLetValue();
    void AssignValue();

    void __fastcall SetParameterDesc(AnsiString value);
    void __fastcall SetParameterValue(AnsiString value);
    void __fastcall SetParameterValueType(int value);
    void __fastcall SetParameterValueDesc(AnsiString value);
    void __fastcall SetParameterType(int value);
    void __fastcall SetParameterUpperCode(AnsiString value);
    void __fastcall SetParameterName(AnsiString value);
    void __fastcall SetParameterItem(AnsiString value);

    __property AnsiString ParameterCode  = { read = m_ParameterCode };
    __property AnsiString ParameterDesc  = { read = m_ParameterDesc, write = SetParameterDesc };
    __property AnsiString ParameterValue  = { read = m_ParameterValue, write = SetParameterValue };
    __property int ParameterLevel  = { read = m_ParameterLevel };
    __property int ParameterValueType  = { read = m_ParameterValueType, write = SetParameterValueType };
    __property int ParameterType  = { read = m_ParameterType, write = SetParameterType };
    __property AnsiString ParameterValueDesc  = { read = m_ParameterValueDesc, write = SetParameterValueDesc };
    __property AnsiString ParameterUpperCode  = { read = m_ParameterUpperCode, write = SetParameterUpperCode };
    __property AnsiString ParameterName  = { read = m_ParameterName, write = SetParameterName };
    __property AnsiString ParameterItem  = { read = m_ParameterItem, write = SetParameterItem };

public:
    TsdParameter(TDataComm *DC);