// Borland C++ Builder // Copyright (c) 1995, 2002 by Borland Software Corporation // All rights reserved // (DO NOT EDIT: machine generated header) 'TextFileInString.pas' rev: 6.00 #ifndef TextFileInStringHPP #define TextFileInStringHPP #pragma delphiheader begin #pragma option push -w- #pragma option push -Vx #include // Pascal unit #include // Pascal unit #include // Pascal unit //-- user supplied ----------------------------------------------------------- namespace Textfileinstring { //-- type declarations ------------------------------------------------------- class DELPHICLASS TTextFileInString; class PASCALIMPLEMENTATION TTextFileInString : public Fileinstring::TFileInString { typedef Fileinstring::TFileInString inherited; public: int Cursor; __fastcall virtual TTextFileInString(void); __fastcall virtual ~TTextFileInString(void); virtual bool __fastcall Load(const AnsiString FName); virtual void __fastcall MakNewFile(void); void __fastcall AddStr(const AnsiString Str); AnsiString __fastcall ReadStrLn(const int FirstByte); AnsiString __fastcall CurReadStr(); AnsiString __fastcall CurReadLn(); bool __fastcall Eof(void); AnsiString __fastcall CurRead(const int BytesRead); void __fastcall InsertString(const int Pos, AnsiString Str); void __fastcall ReplaceString(const int Pos, AnsiString Str); }; //-- var, const, procedure --------------------------------------------------- } /* namespace Textfileinstring */ using namespace Textfileinstring; #pragma option pop // -w- #pragma option pop // -Vx #pragma delphiheader end. //-- end unit ---------------------------------------------------------------- #endif // TextFileInString