home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
DOS/V Power Report 1997 May
/
VPR9705A.ISO
/
VPR_DATA
/
PROGRAM
/
CBTRIAL
/
SETUP
/
DATA.Z
/
DBEXCEPT.HPP
< prev
next >
Wrap
C/C++ Source or Header
|
1997-02-14
|
3KB
|
94 lines
//----------------------------------------------------------------------------
// Dbexcept.hpp - bcbdcc32 generated hdr (DO NOT EDIT) rev: 0
// From: Dbexcept.pas
//----------------------------------------------------------------------------
#ifndef DbexceptHPP
#define DbexceptHPP
//----------------------------------------------------------------------------
#include <DB.hpp>
#include <ExtCtrls.hpp>
#include <StdCtrls.hpp>
#include <Buttons.hpp>
#include <Controls.hpp>
#include <Forms.hpp>
#include <Graphics.hpp>
#include <Classes.hpp>
#include <SysUtils.hpp>
#include <Windows.hpp>
#include <System.hpp>
#pragma warn -par
#pragma warn -hid
#pragma warn -inl
namespace Dbexcept
{
//-- type declarations -------------------------------------------------------
class __declspec(delphiclass) TDbEngineErrorDlg;
class __declspec(pascalimplementation) TDbEngineErrorDlg : public Forms::TForm
{
typedef Forms::TForm inherited;
__published:
Extctrls::TPanel* BasicPanel;
Extctrls::TPanel* DetailsPanel;
Stdctrls::TLabel* BDELabel;
Stdctrls::TLabel* NativeLabel;
Stdctrls::TMemo* DbMessageText;
Stdctrls::TEdit* DbResult;
Stdctrls::TEdit* DbCatSub;
Stdctrls::TEdit* NativeResult;
Stdctrls::TButton* BackBtn;
Stdctrls::TButton* NextBtn;
Extctrls::TPanel* ButtonPanel;
Stdctrls::TButton* DetailsBtn;
Stdctrls::TButton* OKBtn;
Extctrls::TPanel* IconPanel;
Extctrls::TImage* IconImage;
Extctrls::TPanel* TopPanel;
Stdctrls::TLabel* ErrorText;
Extctrls::TPanel* RightPanel;
void __fastcall FormShow(System::TObject* Sender);
void __fastcall BackClick(System::TObject* Sender);
void __fastcall NextClick(System::TObject* Sender);
void __fastcall FormCreate(System::TObject* Sender);
void __fastcall DetailsBtnClick(System::TObject* Sender);
private:
Forms::TExceptionEvent FPrevOnException;
Db::EDBEngineError* DbException;
int FDetailsHeight;
int CurItem;
System::AnsiString FDetails;
void __fastcall SwitchDetails(void);
void __fastcall ShowError(void);
public:
void __fastcall ShowException(System::TObject* Sender, Sysutils::Exception* E);
public:
/* TForm.Create */ __fastcall virtual TDbEngineErrorDlg(Classes::TComponent* AOwner) : Forms::TForm(
AOwner) { }
/* TForm.CreateNew */ __fastcall TDbEngineErrorDlg(Classes::TComponent* AOwner, int Dummy) : Forms::
TForm(AOwner, Dummy) { }
/* TForm.Destroy */ __fastcall virtual ~TDbEngineErrorDlg(void) { }
public:
/* TWinControl.CreateParented */ __fastcall TDbEngineErrorDlg(HWND ParentWindow) : Forms::TForm(ParentWindow
) { }
};
//-- var, const, procedure ---------------------------------------------------
extern TDbEngineErrorDlg* DbEngineErrorDlg;
} /* namespace Dbexcept */
#pragma warn .par
#pragma warn .hid
#pragma warn .inl
#if !defined(NO_IMPLICIT_NAMESPACE_USE)
using namespace Dbexcept;
#endif
//-- end unit ----------------------------------------------------------------
#endif // Dbexcept