// Borland C++ Builder
// Copyright (c) 1995, 2005 by Borland Software Corporation
// All rights reserved

// (DO NOT EDIT: machine generated header) 'Inreplyrfc.pas' rev: 10.00

#ifndef InreplyrfcHPP
#define InreplyrfcHPP

#pragma delphiheader begin
#pragma option push
#pragma option -w-      // All warnings off
#pragma option -Vx      // Zero-length empty class member functions
#pragma pack(push,8)
#include <System.hpp>	// Pascal unit
#include <Sysinit.hpp>	// Pascal unit
#include <Classes.hpp>	// Pascal unit
#include <Inreply.hpp>	// Pascal unit
#include <Inexception.hpp>	// Pascal unit

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

namespace Inreplyrfc
{
//-- type declarations -------------------------------------------------------
class DELPHICLASS TInReplyRFC;
class PASCALIMPLEMENTATION TInReplyRFC : public Inreply::TInReply 
{
	typedef Inreply::TInReply inherited;
	
protected:
	virtual void __fastcall AssignTo(Classes::TPersistent* ADest);
	virtual bool __fastcall CheckIfCodeIsValid(const AnsiString ACode);
	virtual Classes::TStrings* __fastcall GetFormattedReply(void);
	virtual void __fastcall SetFormattedReply(const Classes::TStrings* AValue);
	
public:
	#pragma option push -w-inl
	/* virtual class method */ virtual bool __fastcall IsEndMarker(const AnsiString ALine) { return IsEndMarker(__classid(TInReplyRFC), ALine); }
	#pragma option pop
	/*         class method */ static bool __fastcall IsEndMarker(TMetaClass* vmt, const AnsiString ALine);
	virtual void __fastcall RaiseReplyError(void);
	virtual bool __fastcall ReplyExists(void);
public:
	#pragma option push -w-inl
	/* TInReply.Create */ inline __fastcall virtual TInReplyRFC(Classes::TCollection* ACollection)/* overload */ : Inreply::TInReply(ACollection) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TInReply.Destroy */ inline __fastcall virtual ~TInReplyRFC(void) { }
	#pragma option pop
	
};


class DELPHICLASS TIdRepliesRFC;
class PASCALIMPLEMENTATION TIdRepliesRFC : public Inreply::TIdReplies 
{
	typedef Inreply::TIdReplies inherited;
	
public:
	__fastcall virtual TIdRepliesRFC(Classes::TPersistent* AOwner)/* overload */;
	__fastcall virtual TIdRepliesRFC(Classes::TPersistent* AOwner, const TMetaClass* AReplyClass)/* overload */;
	virtual void __fastcall UpdateText(Inreply::TInReply* AReply);
public:
	#pragma option push -w-inl
	/* TCollection.Destroy */ inline __fastcall virtual ~TIdRepliesRFC(void) { }
	#pragma option pop
	
};


class DELPHICLASS EInReplyRFCError;
class PASCALIMPLEMENTATION EInReplyRFCError : public Inreply::EInReplyError 
{
	typedef Inreply::EInReplyError inherited;
	
protected:
	int FErrorCode;
	
public:
	__fastcall virtual EInReplyRFCError(const int AErrorCode, const AnsiString AReplyMessage);
	__property int ErrorCode = {read=FErrorCode, nodefault};
public:
	#pragma option push -w-inl
	/* EInExceptionBase.Create */ inline __fastcall virtual EInReplyRFCError(AnsiString AMsg)/* overload */ : Inreply::EInReplyError(AMsg) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* Exception.CreateFmt */ inline __fastcall EInReplyRFCError(const AnsiString Msg, System::TVarRec const * Args, const int Args_Size) : Inreply::EInReplyError(Msg, Args, Args_Size) { }
	#pragma option pop
	#pragma option push -w-inl
	/* Exception.CreateRes */ inline __fastcall EInReplyRFCError(int Ident)/* overload */ : Inreply::EInReplyError(Ident) { }
	#pragma option pop
	#pragma option push -w-inl
	/* Exception.CreateResFmt */ inline __fastcall EInReplyRFCError(int Ident, System::TVarRec const * Args, const int Args_Size)/* overload */ : Inreply::EInReplyError(Ident, Args, Args_Size) { }
	#pragma option pop
	#pragma option push -w-inl
	/* Exception.CreateHelp */ inline __fastcall EInReplyRFCError(const AnsiString Msg, int AHelpContext) : Inreply::EInReplyError(Msg, AHelpContext) { }
	#pragma option pop
	#pragma option push -w-inl
	/* Exception.CreateFmtHelp */ inline __fastcall EInReplyRFCError(const AnsiString Msg, System::TVarRec const * Args, const int Args_Size, int AHelpContext) : Inreply::EInReplyError(Msg, Args, Args_Size, AHelpContext) { }
	#pragma option pop
	#pragma option push -w-inl
	/* Exception.CreateResHelp */ inline __fastcall EInReplyRFCError(int Ident, int AHelpContext)/* overload */ : Inreply::EInReplyError(Ident, AHelpContext) { }
	#pragma option pop
	#pragma option push -w-inl
	/* Exception.CreateResFmtHelp */ inline __fastcall EInReplyRFCError(System::PResStringRec ResStringRec, System::TVarRec const * Args, const int Args_Size, int AHelpContext)/* overload */ : Inreply::EInReplyError(ResStringRec, Args, Args_Size, AHelpContext) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TObject.Destroy */ inline __fastcall virtual ~EInReplyRFCError(void) { }
	#pragma option pop
	
};


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

}	/* namespace Inreplyrfc */
using namespace Inreplyrfc;
#pragma pack(pop)
#pragma option pop

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