123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219 |
- //---------------------------------------------------------------------------
- #ifndef VMSM400MFH
- #define VMSM400MFH
- //---------------------------------------------------------------------------
- #include <Classes.hpp>
- #include <Controls.hpp>
- #include <StdCtrls.hpp>
- #include <Forms.hpp>
- #include <DB.hpp>
- #include <DBClient.hpp>
- #include <FMTBcd.hpp>
- #include <Provider.hpp>
- #include <SqlExpr.hpp>
- #include <Menus.hpp>
- #include <ExtCtrls.hpp>
- #include <Graphics.hpp>
- #include <ComCtrls.hpp>
- #include <ADODB.hpp>
- #include <Dialogs.hpp>
- #include <ExtDlgs.hpp>
- //---------------------------------------------------------------------------
- //---------------------------------------------------------------------------
- #include "WindowMsgF.h"
- #include "cxButtons.hpp"
- #include "cxCalendar.hpp"
- #include "cxContainer.hpp"
- #include "cxControls.hpp"
- #include "cxDropDownEdit.hpp"
- #include "cxEdit.hpp"
- #include "cxGraphics.hpp"
- #include "cxGroupBox.hpp"
- #include "cxLabel.hpp"
- #include "cxLookAndFeelPainters.hpp"
- #include "cxLookAndFeels.hpp"
- #include "cxMaskEdit.hpp"
- #include "cxPC.hpp"
- #include "cxPCdxBarPopupMenu.hpp"
- #include "cxSpinEdit.hpp"
- #include "cxSplitter.hpp"
- #include "cxTextEdit.hpp"
- #include "cxTimeEdit.hpp"
- #include "dxSkinBlack.hpp"
- #include "dxSkinBlue.hpp"
- #include "dxSkinCaramel.hpp"
- #include "dxSkinCoffee.hpp"
- #include "dxSkinDarkRoom.hpp"
- #include "dxSkinDarkSide.hpp"
- #include "dxSkinFoggy.hpp"
- #include "dxSkinGlassOceans.hpp"
- #include "dxSkiniMaginary.hpp"
- #include "dxSkinLilian.hpp"
- #include "dxSkinLiquidSky.hpp"
- #include "dxSkinLondonLiquidSky.hpp"
- #include "dxSkinMcSkin.hpp"
- #include "dxSkinMoneyTwins.hpp"
- #include "dxSkinOffice2007Black.hpp"
- #include "dxSkinOffice2007Blue.hpp"
- #include "dxSkinOffice2007Green.hpp"
- #include "dxSkinOffice2007Pink.hpp"
- #include "dxSkinOffice2007Silver.hpp"
- #include "dxSkinOffice2010Black.hpp"
- #include "dxSkinOffice2010Blue.hpp"
- #include "dxSkinOffice2010Silver.hpp"
- #include "dxSkinsCore.hpp"
- #include "dxSkinscxPCPainter.hpp"
- #include "dxSkinSeven.hpp"
- #include "dxSkinSharp.hpp"
- #include "dxSkinSilver.hpp"
- #include "dxSkinStardust.hpp"
- #include "cxRadioGroup.hpp"
- #include "cxClasses.hpp"
- #include "cxCustomData.hpp"
- #include "cxData.hpp"
- #include "cxDataStorage.hpp"
- #include "cxDBData.hpp"
- #include "cxFilter.hpp"
- #include "cxGrid.hpp"
- #include "cxGridCustomTableView.hpp"
- #include "cxGridCustomView.hpp"
- #include "cxGridDBTableView.hpp"
- #include "cxGridLevel.hpp"
- #include "cxGridTableView.hpp"
- #include "cxStyles.hpp"
- #include "cxCheckBox.hpp"
- #include "FRAME_VmsListF.h"
- #include "cxImage.hpp"
- #include "cxButtonEdit.hpp"
- #include "cxBlobEdit.hpp"
- class TVMSM400M : public TForm
- {
- __published: // IDE-managed Components
- TTimer *TmrShow;
- TShape *ShpTitle;
- TcxButton *BtnClose;
- TLabel *LblCaption;
- TShape *ShpList;
- TEdit *EdFocus;
- TPanel *PnlBack;
- TPanel *PnlLeft;
- TcxSplitter *cxSplitter1;
- TcxGroupBox *GrpList;
- TPanel *Panel1;
- TPanel *PnlVmsList;
- TPanel *PnlSymbol;
- TcxSplitter *cxSplitter2;
- TcxGroupBox *cxGroupBox1;
- TcxGroupBox *cxGroupBox2;
- TFRAMEVmsList *FRAMEVmsList1;
- TcxGrid *CxList;
- TcxGridTableView *TvList;
- TcxGridColumn *ColLink1;
- TcxGridColumn *ColLink2;
- TcxGridColumn *ColLink3;
- TcxGridColumn *ColLink4;
- TcxGridColumn *ColLink5;
- TcxGridColumn *ColLink6;
- TcxGridLevel *GlList;
- TPanel *PnlMenu;
- TcxButton *BtnEdit;
- TcxButton *BtnInsert;
- TcxButton *BtnDelete;
- TcxButton *BtnSave;
- TPanel *Panel4;
- TcxButton *BtnDownload;
- TPanel *PnlCmd;
- TPanel *PnlInfo2;
- TImage *ImgPreView;
- TcxLabel *cxLabel18;
- TImage *ImgDesc01;
- TcxLabel *cxLabel1;
- TImage *ImgDesc02;
- TcxTextEdit *EdNmbr;
- TcxLabel *cxLabel2;
- TImage *ImgDesc03;
- TcxTextEdit *EdExpl;
- TcxButtonEdit *EdImageFileName;
- TcxLabel *cxLabel3;
- TImage *ImgDesc04;
- TcxButton *BtnSaveImgFile;
- TSaveDialog *SaveDialog;
- TOpenPictureDialog *OpenBmp;
- TcxTextEdit *EdVmsCd;
- TcxLabel *lblText1;
- TcxLabel *lblText2;
- TcxLabel *lblText3;
- TcxLabel *lblText4;
- TcxLabel *lblText5;
- TcxComboBox *CbType;
- TcxLabel *cxLabel6;
- TImage *ImgDesc14;
- TcxLabel *LblDesc;
- TImage *ImgTemp;
- TcxLabel *lblImgSize;
- void __fastcall FormShow(TObject *Sender);
- void __fastcall TmrShowTimer(TObject *Sender);
- void __fastcall BtnCloseClick(TObject *Sender);
- void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
- void __fastcall FormCloseQuery(TObject *Sender, bool &CanClose);
- void __fastcall BtnEditClick(TObject *Sender);
- void __fastcall BtnSaveClick(TObject *Sender);
- void __fastcall BtnInsertClick(TObject *Sender);
- void __fastcall BtnDeleteClick(TObject *Sender);
- void __fastcall BtnSaveImgFileClick(TObject *Sender);
- void __fastcall EdImageFileNameClick(TObject *Sender);
- void __fastcall OpenBmpCanClose(TObject *Sender, bool &CanClose);
- void __fastcall TvListCellDblClick(TcxCustomGridTableView *Sender, TcxGridTableDataCellViewInfo *ACellViewInfo,
- TMouseButton AButton, TShiftState AShift,
- bool &AHandled);
- void __fastcall ColLink2CustomDrawCell(TcxCustomGridTableView *Sender, TcxCanvas *ACanvas,
- TcxGridTableDataCellViewInfo *AViewInfo, bool &ADone);
- void __fastcall BtnDownloadClick(TObject *Sender);
- void __fastcall TvListFocusedRecordChanged(TcxCustomGridTableView *Sender, TcxCustomGridRecord *APrevFocusedRecord,
- TcxCustomGridRecord *AFocusedRecord, bool ANewItemRecordFocusingChanged);
- void __fastcall CbTypePropertiesChange(TObject *Sender);
- void __fastcall PnlMenuDblClick(TObject *Sender);
- private: // User declarations
- void __fastcall CommClose();
- TcxDataController *m_pGDC;
- String FTitle;
- bool FUpdate;
- bool FNewDb;
- bool EditMode;
- TList *FListSymb;
- DWORD FFileSize;
- bool FImageUpdate;
- bool FIsUpdate;
- int FOldWidth, FOldHeight;
- int FNewWidth, FNewHeight;
- public:
- public: // User declarations
- __fastcall TVMSM400M(TComponent* Owner);
- void __fastcall FormInit();
- void __fastcall ClearSymbloList();
- void __fastcall LoadImageSymbol();
- void __fastcall DisplayInfo();
- bool __fastcall UpdateVmsImage(String ANmbr, String AExpl, String ATypeCd);
- bool __fastcall InsertVmsImage(String ANmbr, String AExpl, String AFileName, String ATypeCd);
- void __fastcall ChangeEditMode(int AEdit);
- };
- //---------------------------------------------------------------------------
- extern PACKAGE TVMSM400M *VMSM400M;
- //---------------------------------------------------------------------------
- #endif
|