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

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

#ifndef InftplistparsemusicHPP
#define InftplistparsemusicHPP

#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 <Inftplist.hpp>	// Pascal unit
#include <Inftplistparsebase.hpp>	// Pascal unit
#include <Inftplisttypes.hpp>	// Pascal unit

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

namespace Inftplistparsemusic
{
//-- type declarations -------------------------------------------------------
class DELPHICLASS TIdMusicFTPListItem;
class PASCALIMPLEMENTATION TIdMusicFTPListItem : public Inftplisttypes::TIdRecFTPListItem 
{
	typedef Inftplisttypes::TIdRecFTPListItem inherited;
	
protected:
	AnsiString FOwnerName;
	
public:
	__property AnsiString OwnerName = {read=FOwnerName, write=FOwnerName};
	__property RecLength ;
	__property RecFormat ;
	__property NumberRecs ;
public:
	#pragma option push -w-inl
	/* TInFTPListItem.Create */ inline __fastcall virtual TIdMusicFTPListItem(Classes::TCollection* AOwner) : Inftplisttypes::TIdRecFTPListItem(AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TInFTPListItem.Destroy */ inline __fastcall virtual ~TIdMusicFTPListItem(void) { }
	#pragma option pop
	
};


class DELPHICLASS TInFTPLPMusic;
class PASCALIMPLEMENTATION TInFTPLPMusic : public Inftplistparsebase::TInFTPListBaseHeader 
{
	typedef Inftplistparsebase::TInFTPListBaseHeader inherited;
	
protected:
	#pragma option push -w-inl
	/* virtual class method */ virtual Inftplist::TInFTPListItem* __fastcall MakeNewItem(Inftplist::TInFTPListItems* AOwner) { return MakeNewItem(__classid(TInFTPLPMusic), AOwner); }
	#pragma option pop
	/*         class method */ static Inftplist::TInFTPListItem* __fastcall MakeNewItem(TMetaClass* vmt, Inftplist::TInFTPListItems* AOwner);
	#pragma option push -w-inl
	/* virtual class method */ virtual bool __fastcall IsHeader(const AnsiString AData) { return IsHeader(__classid(TInFTPLPMusic), AData); }
	#pragma option pop
	/*         class method */ static bool __fastcall IsHeader(TMetaClass* vmt, const AnsiString AData);
	#pragma option push -w-inl
	/* virtual class method */ virtual bool __fastcall ParseLine(const Inftplist::TInFTPListItem* AItem, const AnsiString APath = "") { return ParseLine(__classid(TInFTPLPMusic), AItem, APath); }
	#pragma option pop
	/*         class method */ static bool __fastcall ParseLine(TMetaClass* vmt, const Inftplist::TInFTPListItem* AItem, const AnsiString APath = "");
	
public:
	#pragma option push -w-inl
	/* virtual class method */ virtual AnsiString __fastcall GetIdent() { return GetIdent(__classid(TInFTPLPMusic)); }
	#pragma option pop
	/*         class method */ static AnsiString __fastcall GetIdent(TMetaClass* vmt);
public:
	#pragma option push -w-inl
	/* TObject.Create */ inline __fastcall TInFTPLPMusic(void) : Inftplistparsebase::TInFTPListBaseHeader() { }
	#pragma option pop
	#pragma option push -w-inl
	/* TObject.Destroy */ inline __fastcall virtual ~TInFTPLPMusic(void) { }
	#pragma option pop
	
};


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

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

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