// CodeGear C++Builder
// Copyright (c) 1995, 2025 by Embarcadero Technologies, Inc.
// All rights reserved

// (DO NOT EDIT: machine generated header) 'ectJSON.pas' rev: 37.00 (Windows)

#ifndef ectJSONHPP
#define ectJSONHPP

#pragma delphiheader begin
#pragma option push
#if defined(__BORLANDC__) && !defined(__clang__)
#pragma option -w-      // All warnings off
#pragma option -Vx      // Zero-length empty class member 
#endif
#pragma pack(push,8)
#include <System.hpp>
#include <SysInit.hpp>

//-- user supplied -----------------------------------------------------------

namespace Ectjson
{
//-- forward type declarations -----------------------------------------------
class DELPHICLASS TSAJ;
//-- type declarations -------------------------------------------------------
#pragma pack(push,4)
class PASCALIMPLEMENTATION TSAJ : public System::TObject
{
	typedef System::TObject inherited;
	
public:
	__fastcall virtual TSAJ();
	__fastcall virtual ~TSAJ();
	void __fastcall ParseJSON(System::UnicodeString &Txt);
	virtual void __fastcall StartElement(System::UnicodeString Name);
	virtual void __fastcall SetElementValue(System::UnicodeString Value);
	virtual void __fastcall EndElement();
	
private:
	int FLenTxt;
	bool __fastcall ParseObject(System::UnicodeString &Txt, int &NowPos);
	bool __fastcall ParseArray(System::UnicodeString &Txt, int &NowPos);
	bool __fastcall ParseValue(System::UnicodeString &Txt, int &NowPos);
	bool __fastcall ParseString(System::UnicodeString &Txt, int &NowPos);
	bool __fastcall ParseChar(System::UnicodeString &Txt, int &NowPos);
	bool __fastcall ParseInteger(System::UnicodeString &Txt, int &NowPos);
	bool __fastcall ParseNumber(System::UnicodeString &Txt, int &NowPos);
	void __fastcall SkipSpace(System::UnicodeString &Txt, int &NowPos);
	__property int LenTxt = {read=FLenTxt, nodefault};
};

#pragma pack(pop)

//-- var, const, procedure ---------------------------------------------------
}	/* namespace Ectjson */
#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_ECTJSON)
using namespace Ectjson;
#endif
#pragma pack(pop)
#pragma option pop

#pragma delphiheader end.
//-- end unit ----------------------------------------------------------------
#endif	// ectJSONHPP
