//----------------------------------------------------------------------------
// YasForm.hpp - dcc32 generated hdr (DO NOT EDIT) rev: 0
// From: YasForm.pas
//----------------------------------------------------------------------------
#ifndef YasFormHPP
#define YasFormHPP
//----------------------------------------------------------------------------
#include <kRndled.hpp>
#include <Gauges.hpp>
#include <KParam.hpp>
#include <KButtons.hpp>
#include <KModbus.hpp>
#include <KYasPar.hpp>
#include <kbar.hpp>
#include <ComCtrls.hpp>
#include <kComp.hpp>
#include <ExtCtrls.hpp>
#include <StdCtrls.hpp>
#include <kparams.hpp>
#include <Dialogs.hpp>
#include <Forms.hpp>
#include <Controls.hpp>
#include <Graphics.hpp>
#include <Classes.hpp>
#include <SysUtils.hpp>
#include <Messages.hpp>
#include <Windows.hpp>
#include <System.hpp>
namespace Yasform
{
//-- type declarations -------------------------------------------------------
typedef Forms::TForm* *PTForm;

class __declspec(delphiclass) TValueBar;
class __declspec(pascalimplementation) TValueBar : public System::TObject
{
	typedef System::TObject inherited;
	
public:
	Kparam::TkParam* v;
	Gauges::TGauge* b;
	double max;
	int maxi;
	int vali;
	void __fastcall SetValue(double d);
	__property double Value = {write=SetValue};
public:
	/* TObject.Create */ __fastcall TValueBar(void) : System::TObject() { }
	/* TObject.Destroy */ __fastcall virtual ~TValueBar(void) { }
	
};

class __declspec(delphiclass) TFormYas;
class __declspec(pascalimplementation) TFormYas : public Forms::TForm
{
	typedef Forms::TForm inherited;
	
__published:
	Stdctrls::TGroupBox* GroupBox1;
	Kbar::TkTrackBar* kTrackBarHz;
	Extctrls::TPanel* Panel1;
	Stdctrls::TLabel* Label4;
	Stdctrls::TLabel* LabelPort;
	Stdctrls::TButton* ButtonParams;
	Kbuttons::TkSpeedButton* BYasBack;
	Kbuttons::TkSpeedButton* BYasFwd;
	Kbuttons::TkSpeedButton* BYasRun;
	Kcomp::TCounter* CounterMin;
	Kcomp::TCounter* CounterMax;
	Stdctrls::TLabel* Label0;
	Kparam::TkParam* CounterHz;
	Extctrls::TTimer* TimerRead;
	Extctrls::TPanel* Panel2;
	Kparam::TkParam* kParamFreq;
	Gauges::TGauge* GaugeFreq;
	Kparam::TkParam* kParamCurA;
	Kparam::TkParam* kParamOutV;
	Gauges::TGauge* GaugeCurA;
	Gauges::TGauge* GaugeOutV;
	Gauges::TGauge* GaugeRef;
	Kparam::TkParam* kParamRef;
	Stdctrls::TGroupBox* GroupBox2;
	Stdctrls::TCheckBox* CheckBoxMAMC;
	Stdctrls::TCheckBox* CheckBoxM1M2;
	Stdctrls::TGroupBox* GroupBox3;
	Stdctrls::TCheckBox* CheckBoxS1;
	Stdctrls::TCheckBox* CheckBoxS2;
	Stdctrls::TCheckBox* CheckBoxS3;
	Stdctrls::TCheckBox* CheckBoxS4;
	Stdctrls::TCheckBox* CheckBoxS5;
	Stdctrls::TCheckBox* CheckBoxS6;
	Krndled::TkRndLed* LedS1;
	Krndled::TkRndLed* LedS5;
	Krndled::TkRndLed* LedS4;
	Krndled::TkRndLed* LedS2;
	Krndled::TkRndLed* LedS3;
	Krndled::TkRndLed* LedS6;
	Krndled::TkRndLed* LedMA;
	Krndled::TkRndLed* LedM1;
	Stdctrls::TButton* ButtonOK;
	Stdctrls::TEdit* EditS1;
	Stdctrls::TEdit* EditS2;
	Stdctrls::TEdit* EditS3;
	Stdctrls::TEdit* EditS4;
	Stdctrls::TEdit* EditS5;
	Stdctrls::TEdit* EditMA;
	Stdctrls::TEdit* EditS6;
	Stdctrls::TEdit* EditM1;
	Stdctrls::TGroupBox* GroupBoxFault;
	Krndled::TkRndLed* LedFault;
	Stdctrls::TCheckBox* CBReset;
	Stdctrls::TCheckBox* CheckBoxUpdate;
	Stdctrls::TButton* ButtonShowCom;
	void __fastcall FormCreate(System::TObject* Sender);
	void __fastcall ButtonParamsClick(System::TObject* Sender);
	virtual void __fastcall kTrackBarHzChange(System::TObject* Sender);
	virtual void __fastcall CounterHzClick(System::TObject* Sender);
	void __fastcall BYasStopClick(System::TObject* Sender);
	void __fastcall SetHz(double hz, bool run);
	void __fastcall Stop(void);
	void __fastcall UpdateMinMax(void);
	void __fastcall CheckButtons(System::TObject* Sender, bool down);
	void __fastcall BYasFwdMouseDown(System::TObject* Sender, Controls::TMouseButton Button,  Classes::TShiftState 
		Shift, int X, int Y);
	void __fastcall BYasBackMouseUp(System::TObject* Sender, Controls::TMouseButton Button,  Classes::TShiftState 
		Shift, int X, int Y);
	void __fastcall BYasRunMouseDown(System::TObject* Sender, Controls::TMouseButton Button,  Classes::TShiftState 
		Shift, int X, int Y);
	void __fastcall BYasRunMouseUp(System::TObject* Sender, Controls::TMouseButton Button,  Classes::TShiftState 
		Shift, int X, int Y);
	void __fastcall kParamFreqClick(System::TObject* Sender);
	void __fastcall TimerReadTimer(System::TObject* Sender);
	void __fastcall FormClose(System::TObject* Sender, Forms::TCloseAction &Action);
	void __fastcall CreateValues(void);
	void __fastcall UpdateValues(void);
	void __fastcall CheckBoxMAMCClick(System::TObject* Sender);
	void __fastcall FormDestroy(System::TObject* Sender);
	void __fastcall CheckBoxS1Click(System::TObject* Sender);
	void __fastcall ButtonOKClick(System::TObject* Sender);
	void __fastcall ReadIni(void);
	void __fastcall WriteIni(void);
	void __fastcall EditS1Change(System::TObject* Sender);
	void __fastcall CBResetClick(System::TObject* Sender);
	void __fastcall CheckBoxUpdateClick(System::TObject* Sender);
	void __fastcall ButtonShowComClick(System::TObject* Sender);
	
private:
	Kyaspar::TYasParams* params;
	Forms::TForm* *formptr;
	int Changes;
	TValueBar* values[4];
	int OutWIndex;
	int InWIndex;
	int OutRIndex;
	int InRIndex;
	Stdctrls::TCheckBox* CBoxS[6];
	Krndled::TkRndLed* LedsS[6];
	Stdctrls::TEdit* EditS[6];
	Stdctrls::TCheckBox* CBoxM[2];
	Krndled::TkRndLed* LedsM[2];
	Stdctrls::TEdit* EditM[2];
	
protected:
	virtual System::AnsiString __fastcall GetValueIni(void);
	
public:
	__fastcall TFormYas(PTForm form, Kyaspar::TYasParams* par);
	__property System::AnsiString ValueIni = {read=GetValueIni, nodefault};
public:
	/* TForm.Create */ __fastcall virtual TFormYas(Classes::TComponent* AOwner) : Forms::TForm(AOwner) { }
		
	/* TForm.CreateNew */ __fastcall TFormYas(Classes::TComponent* AOwner, int Dummy) : Forms::TForm(AOwner
		, Dummy) { }
	/* TForm.Destroy */ __fastcall virtual ~TFormYas(void) { }
	
public:
	/* TWinControl.CreateParented */ __fastcall TFormYas(HWND ParentWindow) : Forms::TForm(ParentWindow
		) { }
	
};

//-- var, const, procedure ---------------------------------------------------
#define MAXVALUES (BYTE)(3)
#define SMAX (BYTE)(5)
#define MMAX (BYTE)(1)

}	/* namespace Yasform */
#if !defined(NO_IMPLICIT_NAMESPACE_USE)
using namespace Yasform;
#endif
//-- end unit ----------------------------------------------------------------
#endif	// YasForm