//----------------------------------------------------------------------------
// KYasPar.hpp - dcc32 generated hdr (DO NOT EDIT) rev: 0
// From: KYasPar.pas
//----------------------------------------------------------------------------
#ifndef KYasParHPP
#define KYasParHPP
//----------------------------------------------------------------------------
#include <kparams.hpp>
#include <KModbus.hpp>
#include <IniPara.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 Kyaspar
{
//-- type declarations -------------------------------------------------------
class __declspec(delphiclass) TYasParamValue;
class __declspec(pascalimplementation) TYasParamValue : public Inipara::TParamValue
{
	typedef Inipara::TParamValue inherited;
	
private:
	Kmodbus::TModBusSlave* *modbusslave;
	
public:
	virtual System::AnsiString __fastcall WriteFunction(double d);
	virtual System::AnsiString __fastcall ReadFunction(void);
public:
	/* TObject.Create */ __fastcall TYasParamValue(void) : Inipara::TParamValue() { }
	/* TObject.Destroy */ __fastcall virtual ~TYasParamValue(void) { }
	
};

class __declspec(delphiclass) TYasParams;
class __declspec(pascalimplementation) TYasParams : public Kparams::TParams
{
	typedef Kparams::TParams inherited;
	
private:
	Forms::TForm* FYasForm;
	Kmodbus::TModBusSlave* FModbusSlave;
	double thz;
	Inipara::TParamValue* RunParam;
	Inipara::TParamValue* HzParam;
	
protected:
	virtual void __fastcall SetDirection(int d);
	virtual int __fastcall GetDirection(void);
	virtual bool __fastcall FindParams(void);
	virtual void __fastcall RefreshRunParams(void);
	virtual void __fastcall SendRunParams(void);
	virtual System::AnsiString __fastcall CreateList(void);
	virtual int __fastcall GetSlave(void);
	virtual void __fastcall SetSlave(int s);
	Kmodbus::TModbus* __fastcall GetModbus(void);
	void __fastcall SetModbus(Kmodbus::TModbus* mb);
	
public:
	__fastcall virtual TYasParams(Classes::TComponent* AOwner);
	virtual void __fastcall WriteHz(double hz);
	virtual void __fastcall WriteRunHz(double hz);
	virtual double __fastcall ReadHz(void);
	virtual double __fastcall ReadMaxHz(void);
	virtual double __fastcall WriteReadHz(double hz);
	virtual void __fastcall Stop(void);
	virtual Inipara::TParamValue* __fastcall NewParam( System::AnsiString &name);
	virtual void __fastcall ShowControl(void);
	virtual void __fastcall ShowErrors(void);
	
__published:
	__property Kmodbus::TModBusSlave* ModbusSlave = {read=FModbusSlave, nodefault};
	__property Kmodbus::TModbus* Modbus = {read=GetModbus, write=SetModbus, nodefault};
	__property int Direction = {read=GetDirection, write=SetDirection, nodefault};
	__property int Slave = {read=GetSlave, write=SetSlave, nodefault};
public:
	/* TParams.Destroy */ __fastcall virtual ~TYasParams(void) { }
	
};

//-- var, const, procedure ---------------------------------------------------

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