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

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

#ifndef IdsysvclHPP
#define IdsysvclHPP

#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 <Windows.hpp>	// Pascal unit
#include <Idsysbase.hpp>	// Pascal unit
#include <Sysutils.hpp>	// Pascal unit

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

namespace Idsysvcl
{
//-- type declarations -------------------------------------------------------
typedef System::TDateTime TIdDateTimeBase;

typedef Set<char, 0, 255>  TAnsiCharSet;

typedef TSysCharSet TSysCharSet;
;

class DELPHICLASS TIdSysVCL;
class PASCALIMPLEMENTATION TIdSysVCL : public Idsysbase::TIdSysBase 
{
	typedef Idsysbase::TIdSysBase inherited;
	
public:
	/*         class method */ static __int64 __fastcall StrToInt64(TMetaClass* vmt, const AnsiString S)/* overload */;
	/*         class method */ static __int64 __fastcall StrToInt64(TMetaClass* vmt, const AnsiString S, const __int64 Default)/* overload */;
	/*         class method */ static Word __fastcall TwoDigitYearCenturyWindow(TMetaClass* vmt);
	/*         class method */ static Word __fastcall DayOfWeek(TMetaClass* vmt, const System::TDateTime ADateTime);
	/*         class method */ static AnsiString __fastcall DateTimeToStr(TMetaClass* vmt, const System::TDateTime ADateTime);
	/*         class method */ static System::TDateTime __fastcall StrToDateTime(TMetaClass* vmt, const AnsiString S);
	/*         class method */ static System::TDateTime __fastcall Now(TMetaClass* vmt);
	/*         class method */ static AnsiString __fastcall FormatDateTime(TMetaClass* vmt, const AnsiString Format, System::TDateTime ADateTime);
	/*         class method */ static AnsiString __fastcall Format(TMetaClass* vmt, const AnsiString Format, System::TVarRec const * Args, const int Args_Size);
	/*         class method */ static System::TDateTime __fastcall FileDateToDateTime(TMetaClass* vmt, int FileDate);
	/*         class method */ static int __fastcall CompareStr(TMetaClass* vmt, const AnsiString S1, const AnsiString S2);
	/*         class method */ static System::TDateTime __fastcall AddMSecToTime(TMetaClass* vmt, const System::TDateTime ADateTime, const int AMSec);
	/*         class method */ static int __fastcall CompareDate(TMetaClass* vmt, const System::TDateTime D1, const System::TDateTime D2);
	/*         class method */ static bool __fastcall SameText(TMetaClass* vmt, const AnsiString S1, const AnsiString S2);
	/*         class method */ static void __fastcall FreeAndNil(TMetaClass* vmt, void *Obj);
	/*         class method */ static TAnsiCharSet __fastcall LeadBytes(TMetaClass* vmt);
	/*         class method */ static AnsiString __fastcall IntToHex(TMetaClass* vmt, int Value, int Digits)/* overload */;
	/*         class method */ static AnsiString __fastcall IntToHex(TMetaClass* vmt, __int64 Value, int Digits)/* overload */;
	/*         class method */ static AnsiString __fastcall IntToStr(TMetaClass* vmt, int Value)/* overload */;
	/*         class method */ static AnsiString __fastcall IntToStr(TMetaClass* vmt, __int64 Value)/* overload */;
	/*         class method */ static AnsiString __fastcall IncludeTrailingPathDelimiter(TMetaClass* vmt, const AnsiString S);
	/*         class method */ static AnsiString __fastcall ExcludeTrailingPathDelimiter(TMetaClass* vmt, const AnsiString S);
	/*         class method */ static int __fastcall StrToInt(TMetaClass* vmt, const AnsiString S, int Default)/* overload */;
	/*         class method */ static int __fastcall StrToInt(TMetaClass* vmt, const AnsiString S)/* overload */;
	/*         class method */ static AnsiString __fastcall LowerCase(TMetaClass* vmt, const AnsiString S);
	/*         class method */ static AnsiString __fastcall UpperCase(TMetaClass* vmt, const AnsiString S)/* overload */;
	/*         class method */ static void __fastcall RaiseLastOSError(TMetaClass* vmt);
	/*         class method */ static AnsiString __fastcall Trim(TMetaClass* vmt, const AnsiString S);
	/*         class method */ static AnsiString __fastcall TrimLeft(TMetaClass* vmt, const AnsiString S);
	/*         class method */ static AnsiString __fastcall TrimRight(TMetaClass* vmt, const AnsiString S);
	/*         class method */ static void __fastcall Abort(TMetaClass* vmt);
	/*         class method */ static bool __fastcall FileExists(TMetaClass* vmt, const AnsiString FileName);
	/*         class method */ static int __fastcall LastDelimiter(TMetaClass* vmt, const AnsiString Delimiters, const AnsiString S);
	/*         class method */ static AnsiString __fastcall StringReplace(TMetaClass* vmt, const AnsiString S, const AnsiString OldPattern, const AnsiString NewPattern)/* overload */;
	/*         class method */ static AnsiString __fastcall StringReplace(TMetaClass* vmt, const AnsiString S, AnsiString const * OldPattern, const int OldPattern_Size, AnsiString const * NewPattern, const int NewPattern_Size)/* overload */;
	/*         class method */ static AnsiString __fastcall ReplaceOnlyFirst(TMetaClass* vmt, const AnsiString S, const AnsiString OldPattern, const AnsiString NewPattern);
	/*         class method */ static void __fastcall DecodeTime(TMetaClass* vmt, const System::TDateTime ADateTime, Word &Hour, Word &Min, Word &Sec, Word &MSec);
	/*         class method */ static void __fastcall DecodeDate(TMetaClass* vmt, const System::TDateTime ADateTime, Word &Year, Word &Month, Word &Day);
	/*         class method */ static System::TDateTime __fastcall EncodeTime(TMetaClass* vmt, Word Hour, Word Min, Word Sec, Word MSec);
	/*         class method */ static System::TDateTime __fastcall EncodeDate(TMetaClass* vmt, Word Year, Word Month, Word Day);
	/*         class method */ static System::TDateTime __fastcall FileAge(TMetaClass* vmt, const AnsiString FileName);
	/*         class method */ static bool __fastcall DirectoryExists(TMetaClass* vmt, const AnsiString Directory);
	/*         class method */ static bool __fastcall DeleteFile(TMetaClass* vmt, const AnsiString FileName);
	/*         class method */ static AnsiString __fastcall ExtractFilePath(TMetaClass* vmt, const AnsiString FileName);
	/*         class method */ static AnsiString __fastcall ExtractFileName(TMetaClass* vmt, const AnsiString FileName);
	/*         class method */ static AnsiString __fastcall ExtractFileExt(TMetaClass* vmt, const AnsiString FileName);
	/*         class method */ static AnsiString __fastcall ChangeFileExt(TMetaClass* vmt, const AnsiString FileName, const AnsiString Extension);
	/*         class method */ static bool __fastcall IsLeapYear(TMetaClass* vmt, Word Year);
	/*         class method */ static AnsiString __fastcall FloatToIntStr(TMetaClass* vmt, const Extended AFloat);
	/*         class method */ static AnsiString __fastcall DateTimeGMTToHttpStr(TMetaClass* vmt, const System::TDateTime GMTValue);
	/*         class method */ static AnsiString __fastcall DateTimeToInternetStr(TMetaClass* vmt, const System::TDateTime Value, const bool AIsGMT = false);
	/*         class method */ static AnsiString __fastcall DateTimeToGmtOffSetStr(TMetaClass* vmt, System::TDateTime ADateTime, bool SubGMT);
	/*         class method */ static System::TDateTime __fastcall OffsetFromUTC(TMetaClass* vmt);
public:
	#pragma option push -w-inl
	/* TObject.Create */ inline __fastcall TIdSysVCL(void) : Idsysbase::TIdSysBase() { }
	#pragma option pop
	#pragma option push -w-inl
	/* TObject.Destroy */ inline __fastcall virtual ~TIdSysVCL(void) { }
	#pragma option pop
	
};


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

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

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