ITS_OP/VmsCamViewer - pasig aces/MAIN/FrmIcsCameraF.h

//---------------------------------------------------------------------------

#ifndef FrmIcsCameraFH
#define FrmIcsCameraFH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
//---------------------------------------------------------------------------
#include "CDSCctvF.h"
#include <ExtCtrls.hpp>
#include <OleCtrls.hpp>
#include <Menus.hpp>
#include "cxContainer.hpp"
#include "cxControls.hpp"
#include "cxEdit.hpp"
#include "cxGraphics.hpp"
#include "cxLabel.hpp"
#include "cxLookAndFeelPainters.hpp"
#include "cxLookAndFeels.hpp"
#include "dxSkinsCore.hpp"
#include "dxSkinBlack.hpp"
#include "dxSkinBlue.hpp"
#include <SHDocVw.hpp>
//---------------------------------------------------------------------------

class TFrmIcsCamera : public TForm
{
__published:	// IDE-managed Components
    TPanel *PnlCamera;
    TPopupMenu *PopupMenu1;
    TMenuItem *MnuConnect;
    TMenuItem *MnuDisconnect;
    TMenuItem *MnuRelease;
    TMenuItem *N2;
    TTimer *TmrPlay;
    TTimer *TmrStop;
    TImage *ImgNoData;
    TPanel *PnlName;
    TWebBrowser *WebBrowser1;
    void __fastcall MnuConnectClick(TObject *Sender);
    void __fastcall MnuDisconnectClick(TObject *Sender);
    void __fastcall MnuReleaseClick(TObject *Sender);
    void __fastcall TmrPlayTimer(TObject *Sender);
    void __fastcall TmrStopTimer(TObject *Sender);
    void __fastcall FormDestroy(TObject *Sender);
    void __fastcall WebBrowser1BeforeNavigate2(TObject *ASender, const IDispatch *pDisp,
          OleVariant &URL, OleVariant &Flags, OleVariant &TargetFrameName,
          OleVariant &PostData, OleVariant &Headers, WordBool &Cancel);


private:	// User declarations

public:		// User declarations
    __fastcall TFrmIcsCamera(TComponent* Owner, TXCctv *ACctv, bool AAutoPlay);

    bool    FAutoPlay;
    bool    FPlay;
    long    FConHandle;

    bool    FInstalled;
    String  FId;
    String  FGroup;
    String  FName;
    String  FStreamingType;
    String  FViewAddress;
    String  FFullAddress;
    String  FWebCamIp;
    String  FWebCamUser;
    String  FWebCamPswd;

    void __fastcall InitCamera(TXCctv *ACctv, bool AAutoPlay=true);
    void __fastcall DisplayName(String AName);

    void __fastcall Connect();
    void __fastcall Disconnect();
    void __fastcall CameraRelease();

    String  FCamUrl;
    void __fastcall OpenUrl(bool AOpen);
    void __fastcall BrowserShow(bool AShow);

    bool            FHtmlCompleted;
    void           *fJSExec;
    bool __fastcall ExecScript(String AScript);
};
//---------------------------------------------------------------------------
extern PACKAGE TFrmIcsCamera *FrmIcsCamera;
//---------------------------------------------------------------------------
#endif