FrmVmsControlF.h 16 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521
  1. //---------------------------------------------------------------------------
  2. #ifndef FrmVmsControlFH
  3. #define FrmVmsControlFH
  4. //---------------------------------------------------------------------------
  5. #include <Classes.hpp>
  6. #include <Controls.hpp>
  7. #include <StdCtrls.hpp>
  8. #include <Forms.hpp>
  9. #include <DB.hpp>
  10. #include <Menus.hpp>
  11. #include <ExtCtrls.hpp>
  12. #include <ADODB.hpp>
  13. #include <ImgList.hpp>
  14. #include <Graphics.hpp>
  15. #include <ComCtrls.hpp>
  16. //---------------------------------------------------------------------------
  17. #include "DataTypesF.h"
  18. #include "WindowMsgF.h"
  19. #include "CDSVmsCtlrF.h"
  20. //---------------------------------------------------------------------------
  21. #include "cxContainer.hpp"
  22. #include "cxControls.hpp"
  23. #include "cxEdit.hpp"
  24. #include "cxGraphics.hpp"
  25. #include "cxGroupBox.hpp"
  26. #include "cxLabel.hpp"
  27. #include "cxLookAndFeelPainters.hpp"
  28. #include "cxLookAndFeels.hpp"
  29. #include "cxPC.hpp"
  30. #include "cxPCdxBarPopupMenu.hpp"
  31. #include "cxSplitter.hpp"
  32. #include "dxSkinBlack.hpp"
  33. #include "dxSkinBlue.hpp"
  34. #include "dxSkinCaramel.hpp"
  35. #include "dxSkinCoffee.hpp"
  36. #include "dxSkinDarkRoom.hpp"
  37. #include "dxSkinDarkSide.hpp"
  38. #include "dxSkinFoggy.hpp"
  39. #include "dxSkinGlassOceans.hpp"
  40. #include "dxSkiniMaginary.hpp"
  41. #include "dxSkinLilian.hpp"
  42. #include "dxSkinLiquidSky.hpp"
  43. #include "dxSkinLondonLiquidSky.hpp"
  44. #include "dxSkinMcSkin.hpp"
  45. #include "dxSkinMoneyTwins.hpp"
  46. #include "dxSkinOffice2007Black.hpp"
  47. #include "dxSkinOffice2007Blue.hpp"
  48. #include "dxSkinOffice2007Green.hpp"
  49. #include "dxSkinOffice2007Pink.hpp"
  50. #include "dxSkinOffice2007Silver.hpp"
  51. #include "dxSkinOffice2010Black.hpp"
  52. #include "dxSkinOffice2010Blue.hpp"
  53. #include "dxSkinOffice2010Silver.hpp"
  54. #include "dxSkinsCore.hpp"
  55. #include "dxSkinscxPCPainter.hpp"
  56. #include "dxSkinSeven.hpp"
  57. #include "dxSkinSharp.hpp"
  58. #include "dxSkinSilver.hpp"
  59. #include "dxSkinStardust.hpp"
  60. #include "cxClasses.hpp"
  61. #include "cxCustomData.hpp"
  62. #include "cxData.hpp"
  63. #include "cxDataStorage.hpp"
  64. #include "cxFilter.hpp"
  65. #include "cxGrid.hpp"
  66. #include "cxGridCustomTableView.hpp"
  67. #include "cxGridCustomView.hpp"
  68. #include "cxGridLevel.hpp"
  69. #include "cxGridTableView.hpp"
  70. #include "cxStyles.hpp"
  71. #include "cxTextEdit.hpp"
  72. #include "cxGridCardView.hpp"
  73. #include "cxGridCustomLayoutView.hpp"
  74. #include "cxCheckBox.hpp"
  75. #include "cxDropDownEdit.hpp"
  76. #include "cxImage.hpp"
  77. #include "cxButtons.hpp"
  78. #include "cxCalc.hpp"
  79. #include "cxGridBandedTableView.hpp"
  80. #include "FRAME_VmsStateListF.h"
  81. #include "FRAME_VmsStateF.h"
  82. #include "FRAME_VmsMsgListF.h"
  83. #include "ImageBtn.h"
  84. #include "cxMaskEdit.hpp"
  85. #include "cxRadioGroup.hpp"
  86. #include "cxSpinEdit.hpp"
  87. #include "cxTimeEdit.hpp"
  88. #include <OleCtrls.hpp>
  89. #include <SHDocVw.hpp>
  90. //---------------------------------------------------------------------------
  91. #include "IdBaseComponent.hpp"
  92. #include "IdComponent.hpp"
  93. #include "IdIcmpClient.hpp"
  94. #include "IdRawBase.hpp"
  95. #include "IdRawClient.hpp"
  96. #include "FFBaseComponent.hpp"
  97. #include "FFBasePlay.hpp"
  98. #include "FFPlay.hpp"
  99. #include "IdHTTP.hpp"
  100. #include "IdTCPClient.hpp"
  101. #include "IdTCPConnection.hpp"
  102. #include "IdAuthenticationDigest.hpp"
  103. #include "dxSkinsForm.hpp"
  104. #include "IdCoder.hpp"
  105. #include "IdCoder00E.hpp"
  106. #include "IdCoder3to4.hpp"
  107. #include "IdCoderMIME.hpp"
  108. #include "IdCoderUUE.hpp" /* idhttp ±ÇÇÑ ¼³Á¤À» À§ÇØ ÇÊ¿äÇÔ */
  109. //---------------------------------------------------------------------------
  110. class TFrmVmsControl : public TForm
  111. {
  112. __published: // IDE-managed Components
  113. TTimer *TmrShow;
  114. TPanel *PnlCenter;
  115. TPanel *PnlRight;
  116. TPanel *PnlLeft;
  117. TPanel *PnlRTop;
  118. TcxGroupBox *GrpList;
  119. TcxGroupBox *cxGroupBox1;
  120. TcxGroupBox *cxGroupBox2;
  121. TcxPageControl *PgControl;
  122. TcxTabSheet *cxTabSheet3;
  123. TcxTabSheet *cxTabSheet1;
  124. TcxTabSheet *cxTabSheet2;
  125. TImageList *ImageList1;
  126. TcxButton *BtnAllClear;
  127. TcxButton *BtnReverse;
  128. TcxButton *BtnAllSelect;
  129. TPanel *PnlVms;
  130. TPanel *Panel2;
  131. TcxRadioButton *RdbOn;
  132. TcxRadioButton *RdbOff;
  133. TcxRadioButton *RdbReset;
  134. TcxButton *BtnControl;
  135. TcxTimeEdit *cxTimeOn;
  136. TcxTimeEdit *cxTimeOff;
  137. TImage *ImgDesc11;
  138. TImage *ImgDesc01;
  139. TcxButton *BtnOnOffSet;
  140. TImage *ImgDesc40;
  141. TLabel *Label5;
  142. TImage *ImgDesc41;
  143. TLabel *Label8;
  144. TLabel *Label13;
  145. TImage *ImgDesc42;
  146. TLabel *Label2;
  147. TImage *ImgDesc43;
  148. TLabel *Label15;
  149. TImage *ImgDesc44;
  150. TImage *ImgDesc61;
  151. TImage *ImgDesc62;
  152. TLabel *Label6;
  153. TLabel *Label4;
  154. TLabel *Label16;
  155. TLabel *Label7;
  156. TLabel *Label9;
  157. TLabel *Label10;
  158. TLabel *Label11;
  159. TLabel *Label12;
  160. TLabel *Label17;
  161. TcxSpinEdit *Se03;
  162. TcxSpinEdit *Se04;
  163. TcxSpinEdit *Se02;
  164. TcxSpinEdit *Se05;
  165. TcxSpinEdit *Se01;
  166. TcxSpinEdit *Se06;
  167. TcxSpinEdit *Se07;
  168. TLabel *Label1;
  169. TLabel *Label14;
  170. TcxButton *BtnConfig;
  171. TcxTabSheet *cxTabSheet4;
  172. TcxRadioButton *RdbAuto;
  173. TcxRadioButton *RdbFix;
  174. TcxRadioButton *RdbBase;
  175. TcxButton *BtnModeControl;
  176. TLabel *Label18;
  177. TcxRadioButton *RdbLuminance;
  178. TcxSpinEdit *SeLuminance;
  179. TLabel *Label19;
  180. TcxPageControl *PgCam;
  181. TcxTabSheet *TabRtsp;
  182. TPanel *PnlCamera;
  183. TLabel *Label3;
  184. TcxButton *BtnWebCamUrl;
  185. TcxButton *BtnDefaultMsg;
  186. TcxButton *BtnBlankDisplay;
  187. TPanel *PnlVmsCam;
  188. TPanel *PnlCamConrtol;
  189. TcxButton *BtnImageSave;
  190. TPanel *PnlPTZ;
  191. TImageBtn *BtnUpLeft;
  192. TImageBtn *BtnUp;
  193. TImageBtn *BtnUpRight;
  194. TImageBtn *BtnLeft;
  195. TImageBtn *BtnHome;
  196. TImageBtn *BtnRight;
  197. TImageBtn *BtnDownLeft;
  198. TImageBtn *BtnDown;
  199. TImageBtn *BtnDownRight;
  200. TImageBtn *BtnZoomIn;
  201. TImageBtn *BtnZoomOut;
  202. TImageBtn *BtnFocusIn;
  203. TImageBtn *BtnFocusOut;
  204. TLabel *Label20;
  205. TTrackBar *PTZSpeed;
  206. TcxTabSheet *cxTabSheet5;
  207. TcxButton *BtnParamSetting;
  208. TImage *ImgDesc57;
  209. TLabel *Label21;
  210. TcxTimeEdit *cxDisplayTimeOn;
  211. TcxTimeEdit *cxDisplayTimeOff;
  212. TImage *ImgDesc53;
  213. TLabel *Label23;
  214. TImage *ImgDesc54;
  215. TLabel *Label24;
  216. TLabel *Label25;
  217. TImage *ImgDesc52;
  218. TLabel *Label26;
  219. TImage *ImgDesc56;
  220. TLabel *Label27;
  221. TImage *ImgDesc51;
  222. TLabel *Label28;
  223. TLabel *Label29;
  224. TLabel *Label30;
  225. TLabel *Label31;
  226. TLabel *Label32;
  227. TcxSpinEdit *SeModRate;
  228. TcxSpinEdit *SeModCycle;
  229. TcxSpinEdit *SeLumDay;
  230. TcxSpinEdit *SeMsgTime;
  231. TcxSpinEdit *SeLumNight;
  232. TLabel *Label33;
  233. TcxSpinEdit *SeCommErrTime;
  234. TcxSpinEdit *SeSlotCommErr;
  235. TcxSpinEdit *SeSlotPowerErr;
  236. TcxButton *BtnDefMsgDownload;
  237. TcxTabSheet *cxTabSheet6;
  238. TGroupBox *GroupBox1;
  239. TImage *ImgDesc59;
  240. TLabel *Label22;
  241. TcxSpinEdit *SeFormCycleTime;
  242. TLabel *Label34;
  243. TcxButton *BtnDisplayTimeSet;
  244. TcxButton *BtnMsgImmediateDownload;
  245. TTimer *TmrCommand;
  246. TLabel *Label35;
  247. TLabel *Label36;
  248. TLabel *Label37;
  249. TLabel *Label38;
  250. TcxTabSheet *TabPing;
  251. TcxGrid *CxPing;
  252. TcxGridBandedTableView *TvPing;
  253. TcxGridBandedColumn *PColumnSel;
  254. TcxGridBandedColumn *PCol01;
  255. TcxGridBandedColumn *PCol02;
  256. TcxGridBandedColumn *PCol03;
  257. TcxGridBandedColumn *PCol04;
  258. TcxGridBandedColumn *PCol05;
  259. TcxGridBandedColumn *PCol06;
  260. TcxGridBandedColumn *PCol07;
  261. TcxGridBandedColumn *PCol08;
  262. TcxGridBandedColumn *PCol09;
  263. TcxGridBandedColumn *PCol10;
  264. TcxGridBandedColumn *PCol11;
  265. TcxGridBandedColumn *PCol12;
  266. TcxGridBandedColumn *PCol99;
  267. TcxGridLevel *GlPing;
  268. TPanel *PnlPing;
  269. TcxButton *BtnAllSelect0;
  270. TcxButton *BtnAllClear0;
  271. TcxButton *BtnReverse0;
  272. TImage *ImgDesc99;
  273. TLabel *Label39;
  274. TcxSpinEdit *EdPingTimeout;
  275. TLabel *Label40;
  276. TcxButton *BtnNwkPing;
  277. TcxButton *BtnNwkPingClear;
  278. TIdIcmpClient *IdIcmpClient1;
  279. TcxSpinEdit *EdPingPort;
  280. TLabel *Label41;
  281. TLabel *Label42;
  282. TImage *ImgDesc98;
  283. TcxLabel *lblSelVms;
  284. TcxLabel *cxLabel1;
  285. TcxLabel *cxLabel2;
  286. TcxLabel *cxLabel3;
  287. TcxLabel *cxLabel4;
  288. TcxLabel *cxLabel5;
  289. TcxLabel *cxLabel9;
  290. TcxLabel *cxLabel6;
  291. TcxLabel *cxLabel7;
  292. TcxLabel *cxLabel8;
  293. TcxLabel *cxLabel10;
  294. TcxLabel *cxLabel11;
  295. TcxLabel *cxLabel12;
  296. TcxLabel *cxLabel13;
  297. TcxLabel *cxLabel14;
  298. TcxLabel *cxLabel15;
  299. TcxLabel *cxLabel16;
  300. TcxLabel *cxLabel17;
  301. TcxLabel *cxLabel18;
  302. TcxLabel *cxLabel19;
  303. TcxLabel *cxLabel20;
  304. TcxLabel *cxLabel21;
  305. TcxLabel *cxLabel22;
  306. TcxLabel *cxLabel23;
  307. TcxLabel *cxLabel24;
  308. TcxLabel *cxLabel25;
  309. TcxLabel *cxLabel26;
  310. TcxLabel *cxLabel27;
  311. TcxLabel *cxLabel28;
  312. TcxLabel *cxLabel30;
  313. TcxLabel *cxLabel31;
  314. TcxLabel *cxLabel32;
  315. TcxComboBox *CbBrghMode;
  316. TcxSpinEdit *SeCurrBrgh;
  317. TLabel *Label44;
  318. TcxSpinEdit *SeWeekBrgh;
  319. TLabel *Label45;
  320. TcxSpinEdit *SeNghtBrgh;
  321. TLabel *Label46;
  322. TLabel *Label47;
  323. TImage *ImgDesc33;
  324. TcxTimeEdit *cxDispStrTm;
  325. TcxTimeEdit *cxDispEndTm;
  326. TLabel *Label49;
  327. TLabel *Label50;
  328. TLabel *Label51;
  329. TcxButton *BtnModuleOn;
  330. TcxButton *BtnModuleOff;
  331. TcxButton *BtnResetControl;
  332. TcxButton *BtnBrghControl;
  333. TcxButton *BtnImdFromDnld;
  334. TLabel *Label48;
  335. TcxComboBox *CbReset;
  336. TcxButton *BtnResetProgress;
  337. TcxButton *cxButton2;
  338. TcxButton *cxButton3;
  339. TcxButton *cxButton4;
  340. TLabel *Label43;
  341. TFFPlayer *FFPlayer1;
  342. TPanel *PnlSamsung;
  343. TcxLabel *LblErrMsg;
  344. TMemo *reMsg;
  345. TcxCheckBox *ChkFullScreen;
  346. TIdHTTP *IdHTTP1;
  347. TIdDecoderMIME *IdDecoderMIME1;
  348. TIdEncoderMIME *IdEncoderMIME1;
  349. TIdEncoderUUE *IdEncoderUUE1;
  350. TdxSkinController *dxSkinController1;
  351. TcxGrid *CxList;
  352. TcxGridBandedTableView *TvList;
  353. TcxGridBandedColumn *ColumnSel;
  354. TcxGridBandedColumn *Col01;
  355. TcxGridBandedColumn *Col02;
  356. TcxGridBandedColumn *Col03;
  357. TcxGridBandedColumn *Col04;
  358. TcxGridBandedColumn *Col05;
  359. TcxGridBandedColumn *Col06;
  360. TcxGridBandedColumn *Col07;
  361. TcxGridBandedColumn *Col08;
  362. TcxGridBandedColumn *Col09;
  363. TcxGridBandedColumn *Col10;
  364. TcxGridBandedColumn *Col11;
  365. TcxGridBandedColumn *Col12;
  366. TcxGridBandedColumn *Col13;
  367. TcxGridBandedColumn *Col14;
  368. TcxGridBandedColumn *Col15;
  369. TcxGridBandedColumn *Col16;
  370. TcxGridBandedColumn *Col17;
  371. TcxGridBandedColumn *Col18;
  372. TcxGridBandedColumn *Col19;
  373. TcxGridBandedColumn *Col20;
  374. TcxGridBandedColumn *Col21;
  375. TcxGridBandedColumn *Col22;
  376. TcxGridBandedColumn *Col23;
  377. TcxGridBandedColumn *Col24;
  378. TcxGridBandedColumn *Col25;
  379. TcxGridBandedColumn *Col27;
  380. TcxGridBandedColumn *Col26;
  381. TcxGridBandedColumn *Col99;
  382. TcxGridBandedColumn *Col28;
  383. TcxGridBandedColumn *Col29;
  384. TcxGridBandedColumn *Col30;
  385. TcxGridBandedColumn *Col31;
  386. TcxGridBandedColumn *Col32;
  387. TcxGridBandedColumn *Col33;
  388. TcxGridLevel *GlList;
  389. TTimer *TmrRefreshStatus;
  390. TcxButton *BtnSearch;
  391. TEdit *EdFocus;
  392. void __fastcall FormShow(TObject *Sender);
  393. void __fastcall TmrShowTimer(TObject *Sender);
  394. void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
  395. void __fastcall FormActivate(TObject *Sender);
  396. void __fastcall FormDeactivate(TObject *Sender);
  397. void __fastcall BtnAllSelectClick(TObject *Sender);
  398. void __fastcall Se01PropertiesChange(TObject *Sender);
  399. void __fastcall BtnConfigClick(TObject *Sender);
  400. void __fastcall BtnControlClick(TObject *Sender);
  401. void __fastcall BtnOnOffSetClick(TObject *Sender);
  402. void __fastcall BtnModeControlClick(TObject *Sender);
  403. void __fastcall BtnWebCamUrlClick(TObject *Sender);
  404. void __fastcall BtnDefaultMsgClick(TObject *Sender);
  405. void __fastcall BtnWebCamControlMouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift,
  406. int X, int Y);
  407. void __fastcall BtnWebCamControlMouseUp(TObject *Sender, TMouseButton Button, TShiftState Shift,
  408. int X, int Y);
  409. void __fastcall BtnParamSettingClick(TObject *Sender);
  410. void __fastcall BtnDefMsgDownloadClick(TObject *Sender);
  411. void __fastcall BtnDisplayTimeSetClick(TObject *Sender);
  412. void __fastcall BtnMsgImmediateDownloadClick(TObject *Sender);
  413. void __fastcall TmrCommandTimer(TObject *Sender);
  414. void __fastcall PgControlPageChanging(TObject *Sender, TcxTabSheet *NewPage,
  415. bool &AllowChange);
  416. void __fastcall BtnNwkPingClick(TObject *Sender);
  417. void __fastcall BtnNwkPingClearClick(TObject *Sender);
  418. void __fastcall PCol04CustomDrawCell(TcxCustomGridTableView *Sender, TcxCanvas *ACanvas,
  419. TcxGridTableDataCellViewInfo *AViewInfo, bool &ADone);
  420. void __fastcall IdIcmpClient1Reply(TComponent *ASender, const TReplyStatus *AReplyStatus);
  421. void __fastcall PCol08CustomDrawCell(TcxCustomGridTableView *Sender, TcxCanvas *ACanvas,
  422. TcxGridTableDataCellViewInfo *AViewInfo, bool &ADone);
  423. void __fastcall TvPingCellDblClick(TcxCustomGridTableView *Sender, TcxGridTableDataCellViewInfo *ACellViewInfo,
  424. TMouseButton AButton, TShiftState AShift,
  425. bool &AHandled);
  426. void __fastcall BtnImdFromDnldClick(TObject *Sender);
  427. void __fastcall BtnModuleControlClick(TObject *Sender);
  428. void __fastcall BtnResetClick(TObject *Sender);
  429. void __fastcall BtnBrghControlClick(TObject *Sender);
  430. void __fastcall FFPlayer1State(TObject *Sender, TPlayState APlayState);
  431. void __fastcall FFPlayer1OpenFailed(TObject *Sender);
  432. void __fastcall ChkFullScreenClick(TObject *Sender);
  433. void __fastcall IdHTTP1Authorization(TObject *Sender, TIdAuthentication *Authentication, bool &Handled);
  434. void __fastcall TvListCellDblClick(TcxCustomGridTableView *Sender, TcxGridTableDataCellViewInfo *ACellViewInfo, TMouseButton AButton,
  435. TShiftState AShift, bool &AHandled);
  436. void __fastcall Col06CustomDrawCell(TcxCustomGridTableView *Sender, TcxCanvas *ACanvas, TcxGridTableDataCellViewInfo *AViewInfo,
  437. bool &ADone);
  438. void __fastcall Col07CustomDrawCell(TcxCustomGridTableView *Sender, TcxCanvas *ACanvas, TcxGridTableDataCellViewInfo *AViewInfo,
  439. bool &ADone);
  440. void __fastcall Col10CustomDrawCell(TcxCustomGridTableView *Sender, TcxCanvas *ACanvas, TcxGridTableDataCellViewInfo *AViewInfo,
  441. bool &ADone);
  442. void __fastcall Col12CustomDrawCell(TcxCustomGridTableView *Sender, TcxCanvas *ACanvas, TcxGridTableDataCellViewInfo *AViewInfo,
  443. bool &ADone);
  444. void __fastcall TmrRefreshStatusTimer(TObject *Sender);
  445. void __fastcall BtnSearchClick(TObject *Sender);
  446. private: // User declarations
  447. void __fastcall CommClose();
  448. public:
  449. bool FStrmPlay;
  450. String FStrmUser;
  451. String FStrmPswd;
  452. String FStrmHttp;
  453. String FStrmAddr;
  454. void __fastcall ErrorMsg(String AErrMsg);
  455. void __fastcall WebCamPlay(String AVmsNo);
  456. void __fastcall WebCamStop();
  457. public:
  458. TForm *FPalyerForm;
  459. TVmsCtlr *FSelVmsObj;
  460. TStringList *FVmsIds;
  461. String FTitle;
  462. long FRtspHandle;
  463. TcxTabSheet *FCtrlTab;
  464. public: // User declarations
  465. __fastcall TFrmVmsControl(TComponent* Owner);
  466. void __fastcall SetColorScheme(String ASkinName);
  467. void __fastcall RefreshStatusRequest();
  468. void __fastcall UpdateList();
  469. void __fastcall RefreshStatus();
  470. void __fastcall RefreshVmsStatus(TcxDataController *AGDC, int ARow, void *AMemObj);
  471. int __fastcall GetSelIds(String &ALinkIds);
  472. int __fastcall GetSelIds(TStringList *AStringList);
  473. void __fastcall LoadLocalSkin();
  474. void __fastcall DisplayInfo();
  475. void __fastcall ClearCheckList();
  476. int __fastcall GetSelListItems(bool ACommCheck=true);
  477. void __fastcall ActivateForm(bool AActivate);
  478. bool __fastcall UpdateVmsParam(String AVmsNmbr, void *pData);
  479. bool __fastcall UpdateVmsParam2(String AVmsNmbr, void *pData);
  480. int FPingType;
  481. bool FPingTimeout;
  482. void __fastcall PingNetwork(String AIp, int APort);
  483. void __fastcall UpdatePingList();
  484. void __fastcall RefreshPingList(bool AInit=false);
  485. void __fastcall OnVmsSelectMessage(TMessage &Msg);
  486. void __fastcall OnMainFormMessage(TMessage &Msg);
  487. void __fastcall OnVmsStateRefreshMessage(TMessage &Msg);
  488. void __fastcall OnVmsFormRefreshMessage(TMessage &Msg);
  489. BEGIN_MESSAGE_MAP
  490. MESSAGE_HANDLER(WM_VMS_SELECT, TMessage, OnVmsSelectMessage)
  491. MESSAGE_HANDLER(WM_MAINFORM, TMessage, OnMainFormMessage)
  492. MESSAGE_HANDLER(WM_VMS_STATE_REFRESH, TMessage, OnVmsStateRefreshMessage)
  493. MESSAGE_HANDLER(WM_VMS_FORM_REFRESH, TMessage, OnVmsFormRefreshMessage)
  494. END_MESSAGE_MAP(TForm)
  495. };
  496. //---------------------------------------------------------------------------
  497. extern PACKAGE TFrmVmsControl *FrmVmsControl;
  498. //---------------------------------------------------------------------------
  499. #endif