wrgcopy.h

速达开源ERP系统

//---------------------------------------------------------------------------
#ifndef WrgCopyH
#define WrgCopyH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include "fpanel.h"
#include "SDComboBox.h"
#include "SDEdit.h"
#include "SDGrid.h"
#include <Buttons.hpp>
#include <ExtCtrls.hpp>
#include <Grids.hpp>
#include "DateEdit.hpp"
#include <Mask.hpp>
#include "gVar.h"
#include "StdBaseForm.h"

class PACKAGE TfrmWrgCopy;
//---------------------------------------------------------------------------
class TfrmWrgCopy : public TStdBaseForm
{
__published:	// IDE-managed Components
    TFloatPanel *FloatPanel1;
    TLabel *Label1;
    TLabel *Label2;
    TBitBtn *btnCancel;
    TBitBtn *btnOK;
    TSDGrid *sgWrg;
    TPanel *Panel1;
    TPanel *Panel2;
    TRadioButton *rbtRouted;
    TRadioButton *rbtWrg;
    TSDComboBox *scWrgRoute;
    TSDComboBox *scWrgWoF;
    TLabel *Label10;
    TSDEdit *seWrgWo;
    TLabel *Label3;
    TSDComboBox *scWrgWc;
    TSDComboBox *scWrgLoc;
    TLabel *Label4;
    TLabel *Label5;
    TLabel *Label6;
    TDateEdit *deWrgIdate;
    TDateEdit *deWrgEdate;
    TLabel *Label7;
    TSDComboBox *scWrgType;
    TSDComboBox *scWrgState;
    TLabel *Label8;
    TLabel *Label25;
    TLabel *Label26;
    TLabel *Label27;
    TSDEdit *seWrgRlt;
    TSDEdit *seWrgSlt;
    TSDEdit *seWrgQlt;
    TLabel *Label28;
    TSDEdit *seWrgWlt;
    TSDEdit *seWrgMlt;
    TLabel *Label29;
    TLabel *Label11;
    TSDEdit *seWrgPQty;
    TCheckBox *cheChkFlg;
    TCheckBox *cheWxFlg;
    TLabel *Label12;
    TSDEdit *seWrgWxAmt;
    void __fastcall sgWrgSelectCell(TObject *Sender, int ACol, int ARow,
          bool &CanSelect);
    void __fastcall btnCancelClick(TObject *Sender);
    void __fastcall FormShow(TObject *Sender);
    void __fastcall btnOKClick(TObject *Sender);
    void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
    void __fastcall scWrgRouteClick(TObject *Sender);
    void __fastcall scWrgWoFClick(TObject *Sender);
    void __fastcall rbtWrgClick(TObject *Sender);
    void __fastcall rbtRoutedClick(TObject *Sender);
private:	// User declarations
    long ComErrNum;
    AnsiString FWrgCopyWo;
    TComResultSet *Rst;
    TComServer    *comServer;
    void __fastcall InitEditControl();
    void __fastcall SetValueToControl();
    void __fastcall FillGridWithData(AnsiString s_Code);
    void __fastcall SetFieldValue(int Index,AnsiString value);
public:		// User declarations
    void __fastcall SetcomServer(TComServer *value);
    __fastcall TfrmWrgCopy(TComponent* Owner);
    __fastcall TfrmWrgCopy(TComponent* Owner,AnsiString FWrgWo);
};
//---------------------------------------------------------------------------
extern PACKAGE TfrmWrgCopy *frmWrgCopy;
//---------------------------------------------------------------------------
#endif