//--------------------------------------------------------------------------- #ifndef CCAM020MFH #define CCAM020MFH //--------------------------------------------------------------------------- #include #include #include #include #include #include #include #include #include #include #include //--------------------------------------------------------------------------- #include "CenterCommF.h" #include "DataTypesF.h" #include "WindowMsgF.h" #include "CDSCCamCtlrF.h" #include "cxButtons.hpp" #include "cxCalc.hpp" #include "cxCheckBox.hpp" #include "cxClasses.hpp" #include "cxContainer.hpp" #include "cxControls.hpp" #include "cxCustomData.hpp" #include "cxData.hpp" #include "cxDataStorage.hpp" #include "cxEdit.hpp" #include "cxFilter.hpp" #include "cxGraphics.hpp" #include "cxGrid.hpp" #include "cxGridBandedTableView.hpp" #include "cxGridCustomTableView.hpp" #include "cxGridCustomView.hpp" #include "cxGridLevel.hpp" #include "cxGridTableView.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 "cxStyles.hpp" #include "cxTextEdit.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 "IdBaseComponent.hpp" #include "IdComponent.hpp" #include "IdIcmpClient.hpp" #include "IdRawBase.hpp" #include "IdRawClient.hpp" #include "ImageBtn.h" #include "NVSVIEWERCTRLLib_OCX.h" #include #include "FRAME_CCamStateListF.h" //--------------------------------------------------------------------------- //--------------------------------------------------------------------------- class TCCAM020M : public TForm { __published: // IDE-managed Components TTimer *TmrShow; TPanel *PnlTop; TPanel *PnlRight; TPanel *PnlLeft; TPanel *PnlRTop; TcxGroupBox *GrpList; TcxGroupBox *cxGroupBox1; TImageList *ImageList1; TPanel *PnlCctv; TPanel *Panel2; TcxPageControl *PgCam; TcxTabSheet *TabRtsp; TcxButton *BtnWebCamUrl; TIdIcmpClient *IdIcmpClient1; TcxLabel *cxLabel9; TPanel *PnlCameraBack; TPanel *PnlCamConrtol; TcxButton *BtnImageSave; TPanel *PnlPTZ; TImageBtn *BtnUpLeft; TImageBtn *BtnUp; TImageBtn *BtnUpRight; TImageBtn *BtnLeft; TImageBtn *BtnHome; TImageBtn *BtnRight; TImageBtn *BtnDownLeft; TImageBtn *BtnDown; TImageBtn *BtnDownRight; TImageBtn *BtnZoomIn; TImageBtn *BtnZoomOut; TImageBtn *BtnFocusIn; TImageBtn *BtnFocusOut; TLabel *Label20; TTrackBar *PTZSpeed; TPanel *PnlBottome; TPanel *Panel1; TPanel *PnlCamera; TcxLabel *cxLabel14; TcxPageControl *PgControl; TcxTabSheet *TabPing; TcxGrid *CxPing; TcxGridBandedTableView *TvPing; TcxGridBandedColumn *ColumnSel; TcxGridBandedColumn *Col01; TcxGridBandedColumn *Col02; TcxGridBandedColumn *Col03; TcxGridBandedColumn *Col04; TcxGridBandedColumn *Col05; TcxGridBandedColumn *Col06; TcxGridBandedColumn *Col07; TcxGridBandedColumn *Col08; TcxGridBandedColumn *Col09; TcxGridBandedColumn *Col10; TcxGridBandedColumn *Col11; TcxGridBandedColumn *Col12; TcxGridBandedColumn *Col99; TcxGridLevel *GlPing; TPanel *PnlPing; TImage *ImgDesc99; TLabel *Label39; TLabel *Label40; TLabel *Label41; TLabel *Label42; TImage *ImgDesc98; TcxButton *BtnAllSelect0; TcxButton *BtnAllClear0; TcxButton *BtnReverse0; TcxSpinEdit *EdPingTimeout; TcxButton *BtnNwkPing; TcxButton *BtnNwkPingClear; TcxSpinEdit *EdPingPort; TcxButton *BtnAllSelect; TcxButton *BtnAllClear; TcxButton *BtnReverse; TcxLabel *lblSelCctv; TNVSViewerCtrl *NVSViewerCtrl1; TcxButton *BtnSaveImgFile; TcxLabel *cxLabel1; TcxLabel *cxLabel2; TcxTabSheet *TabPreset; TPanel *PnlPreset; TcxGrid *CxPreset; TcxGridTableView *TvPreset; TcxGridColumn *ColPresetNo; TcxGridColumn *ColPresetName; TcxGridColumn *ColPresetPan; TcxGridColumn *ColPresetTilt; TcxGridColumn *ColPresetZoom; TcxGridColumn *ColPresetFocus; TcxGridColumn *ColPresetAngle; TcxGridColumn *ColPresetDefault; TcxGridColumn *ColPresetDb; TcxGridLevel *GlPreset; TcxButton *BtnCctvPreset; TcxButton *BtnCctvPresetDel; TcxTextEdit *EdPresetName; TLabel *Label19; TImage *ImgDesc21; TLabel *Label18; TImage *ImgDesc20; TcxButton *BtnCctvPresetSet; TcxLabel *cxLabel3; TcxTextEdit *EdPresetNo; TcxLabel *cxLabel4; TcxSpinEdit *SePresetNo; TcxCheckBox *ChkCctvPresetDef; TFRAMECCamStateList *FRAMECCamStateList1; void __fastcall FormShow(TObject *Sender); void __fastcall TmrShowTimer(TObject *Sender); void __fastcall FormClose(TObject *Sender, TCloseAction &Action); void __fastcall FormActivate(TObject *Sender); void __fastcall FormDeactivate(TObject *Sender); void __fastcall BtnAllSelectClick(TObject *Sender); void __fastcall FRAMECCamStateList1TvListCellDblClick(TcxCustomGridTableView *Sender, TcxGridTableDataCellViewInfo *ACellViewInfo, TMouseButton AButton, TShiftState AShift, bool &AHandled); void __fastcall BtnWebCamUrlClick(TObject *Sender); void __fastcall PgControlPageChanging(TObject *Sender, TcxTabSheet *NewPage, bool &AllowChange); void __fastcall BtnNwkPingClick(TObject *Sender); void __fastcall BtnNwkPingClearClick(TObject *Sender); void __fastcall Col04CustomDrawCell(TcxCustomGridTableView *Sender, TcxCanvas *ACanvas, TcxGridTableDataCellViewInfo *AViewInfo, bool &ADone); void __fastcall IdIcmpClient1Reply(TComponent *ASender, const TReplyStatus *AReplyStatus); void __fastcall Col08CustomDrawCell(TcxCustomGridTableView *Sender, TcxCanvas *ACanvas, TcxGridTableDataCellViewInfo *AViewInfo, bool &ADone); void __fastcall TvPingCellDblClick(TcxCustomGridTableView *Sender, TcxGridTableDataCellViewInfo *ACellViewInfo, TMouseButton AButton, TShiftState AShift, bool &AHandled); void __fastcall BtnZoomInOutMouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y); void __fastcall BtnZoomInOutMouseUp(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y); void __fastcall BtnFocusInOutMouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y); void __fastcall BtnFocusInOutMouseUp(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y); void __fastcall BtnPanTileMouseUp(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y); void __fastcall BtnPanTileMouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y); void __fastcall BtnSaveImgFileClick(TObject *Sender); void __fastcall BtnCctvPresetClick(TObject *Sender); void __fastcall BtnCctvPresetSetClick(TObject *Sender); void __fastcall BtnCctvPresetDelClick(TObject *Sender); void __fastcall TvPresetCellDblClick(TcxCustomGridTableView *Sender, TcxGridTableDataCellViewInfo *ACellViewInfo, TMouseButton AButton, TShiftState AShift, bool &AHandled); void __fastcall SePresetNoPropertiesEditValueChanged(TObject *Sender); private: // User declarations void __fastcall CommClose(); public: bool __fastcall OpenWebCamera(); void __fastcall CloseWebCamera(); public: bool FTmrShow; TCCamCtlr *FSelCtlr; TStringList *FSelIds; String FTitle; public: // User declarations __fastcall TCCAM020M(TComponent* Owner); void __fastcall LoadLocalSkin(); void __fastcall DisplayInfo(); void __fastcall ClearCheckList(); int __fastcall GetSelListItems(bool ACommCheck=true); void __fastcall ActivateForm(bool AActivate); int FPingType; bool FPingTimeout; void __fastcall PingNetwork(String AIp, int APort); void __fastcall UpdatePingList(); void __fastcall RefreshPingList(bool AInit=false); void __fastcall ClearPreset(); void __fastcall InitPreset(); void __fastcall OnMainFormMessage(TMessage &Msg); void __fastcall OnCctvStateRefreshMessage(TMessage &Msg); BEGIN_MESSAGE_MAP MESSAGE_HANDLER(WM_MAINFORM, TMessage, OnMainFormMessage) MESSAGE_HANDLER(WM_VMS_STATE_REFRESH, TMessage, OnCctvStateRefreshMessage) END_MESSAGE_MAP(TForm) }; //--------------------------------------------------------------------------- extern PACKAGE TCCAM020M *CCAM020M; //--------------------------------------------------------------------------- #endif