FrmVmsLogF.h 2.0 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970
  1. //---------------------------------------------------------------------------
  2. #ifndef FrmVmsLogFH
  3. #define FrmVmsLogFH
  4. //---------------------------------------------------------------------------
  5. #include <Classes.hpp>
  6. #include <Controls.hpp>
  7. #include <StdCtrls.hpp>
  8. #include <Forms.hpp>
  9. #include <Buttons.hpp>
  10. #include <ExtCtrls.hpp>
  11. #include <Graphics.hpp>
  12. #include <ComCtrls.hpp>
  13. //---------------------------------------------------------------------------
  14. #include "ITSLogF.h"
  15. #include "AppGlobalF.h"
  16. //---------------------------------------------------------------------------
  17. class TFrmVmsLog : public TForm
  18. {
  19. __published: // IDE-managed Components
  20. TPanel *plServerInfo;
  21. TPanel *Panel1;
  22. TImage *Image1;
  23. TPanel *Panel2;
  24. TCheckBox *chkLogPause;
  25. TButton *btnClear;
  26. TButton *btnCopy;
  27. TMemo *reMsg;
  28. TPanel *Panel4;
  29. TPanel *Panel6;
  30. TImage *Image2;
  31. TCheckBox *chkInfo;
  32. TCheckBox *chkData;
  33. TCheckBox *chkDetail;
  34. TCheckBox *chkError;
  35. TCheckBox *chkWarning;
  36. TCheckBox *chkDebug;
  37. TButton *btnSetLog;
  38. TCheckBox *chkServer;
  39. TCheckBox *chkClient;
  40. void __fastcall btnClearClick(TObject *Sender);
  41. void __fastcall btnCopyClick(TObject *Sender);
  42. void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
  43. void __fastcall btnSetLogClick(TObject *Sender);
  44. private: // User declarations
  45. int FVmsIdx;
  46. LOG_INFO FLogCfg;
  47. AnsiString FVmsId;
  48. TVmsCtlr *FVmsCtlr;
  49. public:
  50. public: // User declarations
  51. __fastcall TFrmVmsLog(TComponent* Owner);
  52. void __fastcall DisplayVmsLog(int AVmsIdx=-1);
  53. void LogWrite(IPC_LOG_MESSAGE *ALog);
  54. void LogData(IPC_LOG_MESSAGE *ALog);
  55. void __fastcall OnWMLogDisplayMessage(TMessage &Msg);
  56. BEGIN_MESSAGE_MAP
  57. MESSAGE_HANDLER(WM_LOG_DISPLAY, TMessage, OnWMLogDisplayMessage)
  58. END_MESSAGE_MAP(TForm)
  59. };
  60. //---------------------------------------------------------------------------
  61. extern PACKAGE TFrmVmsLog *FrmVmsLog;
  62. //---------------------------------------------------------------------------
  63. #endif