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

📄 sugh.h

📁 速达开源ERP系统
💻 H
字号:
//---------------------------------------------------------------------------

#ifndef SughH
#define SughH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include "BillBaseForm.h"
#include <ComCtrls.hpp>
#include <Dialogs.hpp>
#include <ImgList.hpp>
#include <Menus.hpp>
#include <ToolWin.hpp>
#include "DateEdit.hpp"
#include "fpanel.h"
#include "SDComboBox.h"
#include "SDEdit.h"
#include "SDGrid.h"
#include <Buttons.hpp>
#include <Grids.hpp>
#include <Mask.hpp>
//---------------------------------------------------------------------------
class PACKAGE TfrmSugh;
class TfrmSugh : public TBillBaseForm
{
__published:	// IDE-managed Components
        TFloatPanel *fpSughHead;
        TLabel *Label1;
        TLabel *Label3;
        TLabel *Label16;
        TLabel *Label4;
        TLabel *labSughSysDate;
        TLabel *Label20;
        TSDEdit *seSughCode;
        TDateEdit *deSughDate;
        TSDComboBox *scSughFmonth;
        TSDComboBox *scSughType;
        TSDGrid *sgSugh;
        TFloatPanel *fpSughDetail;
        TLabel *Label21;
        TLabel *Label15;
        TLabel *Label19;
        TLabel *Label18;
        TLabel *Label2;
        TLabel *Label7;
        TBitBtn *btnOK;
        TBitBtn *btnCancel;
        TSDEdit *seSugdLine;
        TSDEdit *seSugdQty;
        TSDEdit *seSugdGoods;
        TSDEdit *seSugdGoodsName;
        TSDComboBox *scSugdUnit;
        TFloatPanel *FloatPanel3;
        TLabel *Label14;
        TLabel *labSughUser;
        TLabel *Label9;
        TLabel *labSughChecker;
        TCheckBox *chkSughCheck;
        TCheckBox *chkSughCancel;
        TLabel *Label5;
        TSDEdit *seSugdRQty;
        TLabel *Label8;
        TSDEdit *seSughDesc;
        TLabel *Label17;
        TMemo *memSugdDesc;
        TSDEdit *seSugdLoc;
        void __fastcall sgSughDblClick(TObject *Sender);
        void __fastcall sgSughSelectCell(TObject *Sender, int ACol,
          int ARow, bool &CanSelect);
        void __fastcall btnOKClick(TObject *Sender);
        void __fastcall btnCancelClick(TObject *Sender);
        void __fastcall FormShow(TObject *Sender);
        void __fastcall seSugdGoodsButtonClick(TObject *Sender);
        void __fastcall seSugdGoodsExit(TObject *Sender);
        void __fastcall seSugdLocButtonClick(TObject *Sender);
        void __fastcall seSughCodeExit(TObject *Sender);
private:	// User declarations
        AnsiString __fastcall GetDataToGrid();
        AnsiString __fastcall GetDetailValue(int FieldIndex);
        AnsiString __fastcall GetHeadValue(int Index);
        void __fastcall SetHeadValue(int Index ,AnsiString Value);
        void __fastcall SetDetailValue(int Index, AnsiString Value);
        void __fastcall InitEditControl();
        void __fastcall ClearControl(int Section,bool BringToNext);
        void __fastcall GetDataFromComObject(int Section);
        void __fastcall SendDataToComObject(int Section);
        void __fastcall WaitUserInput(int Section);
        void __fastcall RefreshGridData(int mAction);
        void __fastcall DisplayBill();
        void __fastcall GetBill(AnsiString BillID);
        void __fastcall FillGridWithData();
        void __fastcall ChangeToBrowseState(bool Browse=false);
        void __fastcall RefreshUpdateData(int MsgSrc,int MsgType);
      void __fastcall UnDoChange(){};
public:		// User declarations
        __fastcall TfrmSugh(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TfrmSugh *frmSugh;
//---------------------------------------------------------------------------
#endif

⌨️ 快捷键说明

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