home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1999 January
/
Chip_1999-01_cd.bin
/
zkuste
/
delphi
/
D3
/
EDTOOL.ZIP
/
PVLCEDIT.HPP
< prev
next >
Wrap
C/C++ Source or Header
|
1998-10-07
|
3KB
|
99 lines
//----------------------------------------------------------------------------
// pvlCedit.hpp - bcbdcc32 generated hdr (DO NOT EDIT) rev: 0
// From: pvlCedit.pas
//----------------------------------------------------------------------------
#ifndef pvlCeditHPP
#define pvlCeditHPP
//----------------------------------------------------------------------------
#include <EdTool.hpp>
#include <Messages.hpp>
#include <Dialogs.hpp>
#include <Windows.hpp>
#include <Classes.hpp>
#include <Controls.hpp>
#include <Buttons.hpp>
#include <ExtCtrls.hpp>
#include <Forms.hpp>
#include <System.hpp>
namespace Pvlcedit
{
//-- type declarations -------------------------------------------------------
enum ops { opplus, opminus, optimes, opdivide, opnone };
class __declspec(delphiclass) TFrmVisCalcEdit;
class __declspec(pascalimplementation) TFrmVisCalcEdit : public Forms::TForm
{
typedef Forms::TForm inherited;
__published:
Extctrls::TPanel* Panel1;
Buttons::TSpeedButton* b1;
Buttons::TSpeedButton* b2;
Buttons::TSpeedButton* b3;
Buttons::TSpeedButton* b4;
Buttons::TSpeedButton* b5;
Buttons::TSpeedButton* b6;
Buttons::TSpeedButton* b7;
Buttons::TSpeedButton* b8;
Buttons::TSpeedButton* b9;
Buttons::TSpeedButton* b0;
Buttons::TSpeedButton* b00;
Buttons::TSpeedButton* bp;
Buttons::TSpeedButton* bm;
Buttons::TSpeedButton* bt;
Buttons::TSpeedButton* bd;
Buttons::TSpeedButton* beq;
Buttons::TSpeedButton* bC;
Buttons::TSpeedButton* bce;
Buttons::TSpeedButton* bmp;
Buttons::TSpeedButton* bmm;
Buttons::TSpeedButton* bmr;
Buttons::TSpeedButton* bmc;
Buttons::TSpeedButton* bdec;
void __fastcall FormKeyPress(System::TObject* p0, char &p1);
void __fastcall FormShow(System::TObject* p0);
void __fastcall FormClose(System::TObject* p0, Forms::TCloseAction &p1);
void __fastcall b1Click(System::TObject* p0);
private:
Controls::TControl* capture;
System::AnsiString wholestring;
System::AnsiString decstring;
bool indec;
Byte olddec;
bool blank;
Extended oldvalue;
HIDESBASE MESSAGE void __fastcall WMLButtonDown(Messages::TWMMouse &pvlCedit_);
HIDESBASE MESSAGE void __fastcall WMLButtonUp(Messages::TWMMouse &pvlCedit_);
HIDESBASE MESSAGE void __fastcall WMMOUSEMOVE(Messages::TWMMouse &pvlCedit_);
void __fastcall performop(void);
void __fastcall displayvalue(void);
public:
Edtool::TPvlCustomCalcEdit* calcedit;
Extended total;
Extended memory;
Extended value;
ops nextop;
public:
/* TForm.Create */ __fastcall virtual TFrmVisCalcEdit(Classes::TComponent* AOwner) : Forms::TForm(AOwner
) { }
/* TForm.CreateNew */ __fastcall TFrmVisCalcEdit(Classes::TComponent* AOwner, int Dummy) : Forms::TForm(
AOwner, Dummy) { }
/* TForm.Destroy */ __fastcall virtual ~TFrmVisCalcEdit(void) { }
public:
/* TWinControl.CreateParented */ __fastcall TFrmVisCalcEdit(HWND ParentWindow) : Forms::TForm(ParentWindow
) { }
};
//-- var, const, procedure ---------------------------------------------------
} /* namespace Pvlcedit */
#if !defined(NO_IMPLICIT_NAMESPACE_USE)
using namespace Pvlcedit;
#endif
//-- end unit ----------------------------------------------------------------
#endif // pvlCedit