NO HAY CÓDIGO FUENTE git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.TRichView@1 b34d35ef-135b-4489-b9d1-9916e9c25524
104 lines
4.2 KiB
C++
104 lines
4.2 KiB
C++
// Borland C++ Builder
|
|
// Copyright (c) 1995, 2005 by Borland Software Corporation
|
|
// All rights reserved
|
|
|
|
// (DO NOT EDIT: machine generated header) 'Rvseqitem.pas' rev: 10.00
|
|
|
|
#ifndef RvseqitemHPP
|
|
#define RvseqitemHPP
|
|
|
|
#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 <Sysutils.hpp> // Pascal unit
|
|
#include <Classes.hpp> // Pascal unit
|
|
#include <Rvlabelitem.hpp> // Pascal unit
|
|
#include <Rvfuncs.hpp> // Pascal unit
|
|
#include <Rvfmisc.hpp> // Pascal unit
|
|
#include <Rvstyle.hpp> // Pascal unit
|
|
#include <Rvitem.hpp> // Pascal unit
|
|
#include <Rvclasses.hpp> // Pascal unit
|
|
#include <Rvtypes.hpp> // Pascal unit
|
|
|
|
//-- user supplied -----------------------------------------------------------
|
|
|
|
namespace Rvseqitem
|
|
{
|
|
//-- type declarations -------------------------------------------------------
|
|
class DELPHICLASS TRVSeqItemInfo;
|
|
class DELPHICLASS TRVSeqList;
|
|
class PASCALIMPLEMENTATION TRVSeqItemInfo : public Rvlabelitem::TRVLabelItemInfo
|
|
{
|
|
typedef Rvlabelitem::TRVLabelItemInfo inherited;
|
|
|
|
private:
|
|
Rvstyle::TRVSeqType FNumberType;
|
|
|
|
protected:
|
|
int FCachedIndexInList;
|
|
void __fastcall CalcDisplayString(TRVSeqList* List);
|
|
virtual Rvstyle::TRVSeqType __fastcall GetNumberType(void);
|
|
virtual void __fastcall SetNumberType(const Rvstyle::TRVSeqType Value);
|
|
|
|
public:
|
|
int Counter;
|
|
int StartFrom;
|
|
bool Reset;
|
|
AnsiString SeqName;
|
|
AnsiString FormatString;
|
|
__fastcall TRVSeqItemInfo(Classes::TPersistent* RVData, const AnsiString ASeqName, Rvstyle::TRVSeqType ANumberType, int ATextStyleNo, int AStartFrom, bool AReset);
|
|
__fastcall virtual TRVSeqItemInfo(Classes::TPersistent* RVData);
|
|
int __fastcall GetIndexInList(Classes::TList* List);
|
|
DYNAMIC void __fastcall MovingToUndoList(int ItemNo, System::TObject* RVData, System::TObject* AContainerUndoItem);
|
|
DYNAMIC void __fastcall MovingFromUndoList(int ItemNo, System::TObject* RVData);
|
|
DYNAMIC void __fastcall Assign(Rvitem::TCustomRVItemInfo* Source);
|
|
AnsiString __fastcall GetDisplayString(TRVSeqList* List, int ACounter);
|
|
DYNAMIC void __fastcall SaveRTF(Classes::TStream* Stream, const AnsiString Path, Classes::TPersistent* RVData, int ItemNo, double TwipsPerPixel, int Level, Rvclasses::TRVColorList* ColorList, Rvclasses::TRVIntegerList* StyleToFont, Rvclasses::TRVIntegerList* ListOverrideOffsetsList1, Rvclasses::TRVIntegerList* ListOverrideOffsetsList2, Rvclasses::TRVList* FontTable);
|
|
DYNAMIC void __fastcall SaveRVF(Classes::TStream* Stream, Classes::TPersistent* RVData, int ItemNo, int ParaNo, const AnsiString Name, Rvitem::TRVMultiDrawItemPart* Part, bool ForceSameAsPrev);
|
|
DYNAMIC bool __fastcall ReadRVFLine(const AnsiString s, Classes::TPersistent* RVData, int ReadType, int LineNo, int LineCount, AnsiString &Name, Rvitem::TRVFReadMode &ReadMode, Rvitem::TRVFReadState &ReadState, bool UTF8Strings, bool &AssStyleNameUsed);
|
|
__property Rvstyle::TRVSeqType NumberType = {read=GetNumberType, write=SetNumberType, nodefault};
|
|
public:
|
|
#pragma option push -w-inl
|
|
/* TCustomRVItemInfo.Destroy */ inline __fastcall virtual ~TRVSeqItemInfo(void) { }
|
|
#pragma option pop
|
|
|
|
};
|
|
|
|
|
|
class PASCALIMPLEMENTATION TRVSeqList : public Classes::TList
|
|
{
|
|
typedef Classes::TList inherited;
|
|
|
|
public:
|
|
int __fastcall InsertAfter(TRVSeqItemInfo* InsertMe, TRVSeqItemInfo* AfterMe);
|
|
void __fastcall RecalcCounters(int StartFrom, Rvstyle::TRVStyle* RVStyle);
|
|
void __fastcall RecalcDisplayStrings(Rvstyle::TRVStyle* RVStyle);
|
|
public:
|
|
#pragma option push -w-inl
|
|
/* TList.Destroy */ inline __fastcall virtual ~TRVSeqList(void) { }
|
|
#pragma option pop
|
|
|
|
public:
|
|
#pragma option push -w-inl
|
|
/* TObject.Create */ inline __fastcall TRVSeqList(void) : Classes::TList() { }
|
|
#pragma option pop
|
|
|
|
};
|
|
|
|
|
|
//-- var, const, procedure ---------------------------------------------------
|
|
static const short rvsSequence = -202;
|
|
|
|
} /* namespace Rvseqitem */
|
|
using namespace Rvseqitem;
|
|
#pragma pack(pop)
|
|
#pragma option pop
|
|
|
|
#pragma delphiheader end.
|
|
//-- end unit ----------------------------------------------------------------
|
|
#endif // Rvseqitem
|