//---------------------------------------------------------------------------- // kErrors.hpp - dcc32 generated hdr (DO NOT EDIT) rev: 0 // From: kErrors.pas //---------------------------------------------------------------------------- #ifndef kErrorsHPP #define kErrorsHPP //---------------------------------------------------------------------------- #include #include #include #include #include #include #include #include #include #include #include #include namespace Kerrors { //-- type declarations ------------------------------------------------------- class __declspec(delphiclass) TCommErrors; class __declspec(pascalimplementation) TCommErrors : public Forms::TForm { typedef Forms::TForm inherited; __published: Stdctrls::TMemo* FErrorScreen; Extctrls::TPanel* PanelSettings; Savepos::TSavePos* SavePos1; Stdctrls::TCheckBox* CheckBoxErr; Stdctrls::TCheckBox* CheckBoxDeb; Stdctrls::TButton* ButtonClear; void __fastcall FormHide(System::TObject* Sender); void __fastcall FormShow(System::TObject* Sender); void __fastcall CheckBoxErrClick(System::TObject* Sender); void __fastcall CheckBoxDebClick(System::TObject* Sender); void __fastcall ButtonClearClick(System::TObject* Sender); public: bool ShowErr; bool ShowDeb; __fastcall virtual TCommErrors(Classes::TComponent* AOwner); void __fastcall Add(const System::AnsiString s); void __fastcall AddDebug(const System::AnsiString s); void __fastcall ShowErrors(void); __published: __property Stdctrls::TMemo* ErrorScreen = {read=FErrorScreen, write=FErrorScreen, nodefault}; public: /* TForm.CreateNew */ __fastcall TCommErrors(Classes::TComponent* AOwner, int Dummy) : Forms::TForm( AOwner, Dummy) { } /* TForm.Destroy */ __fastcall virtual ~TCommErrors(void) { } public: /* TWinControl.CreateParented */ __fastcall TCommErrors(HWND ParentWindow) : Forms::TForm(ParentWindow ) { } }; //-- var, const, procedure --------------------------------------------------- extern TCommErrors* CommErrors; } /* namespace Kerrors */ #if !defined(NO_IMPLICIT_NAMESPACE_USE) using namespace Kerrors; #endif //-- end unit ---------------------------------------------------------------- #endif // kErrors