www.pudn.com > RichEdit3.rar > tom_TLB.hpp


// Borland C++ Builder 
// Copyright (c) 1995, 2002 by Borland Software Corporation 
// All rights reserved 
 
// (DO NOT EDIT: machine generated header) 'tom_TLB.pas' rev: 6.00 
 
#ifndef tom_TLBHPP 
#define tom_TLBHPP 
 
#pragma delphiheader begin 
#pragma option push -w- 
#pragma option push -Vx 
#include 	// Pascal unit 
#include 	// Pascal unit 
#include 	// Pascal unit 
#include 	// Pascal unit 
#include 	// Pascal unit 
#include 	// Pascal unit 
#include 	// Pascal unit 
#include 	// Pascal unit 
#include 	// Pascal unit 
 
//-- user supplied ----------------------------------------------------------- 
 
namespace Tom_tlb 
{ 
//-- type declarations ------------------------------------------------------- 
typedef Activex::TOleEnum tomConstants; 
 
typedef OleVariant *POleVariant1; 
 
__interface ITextDocument; 
typedef System::DelphiInterface _di_ITextDocument; 
__interface ITextSelection; 
typedef System::DelphiInterface _di_ITextSelection; 
__interface ITextStoryRanges; 
typedef System::DelphiInterface _di_ITextStoryRanges; 
__interface ITextRange; 
typedef System::DelphiInterface _di_ITextRange; 
__interface INTERFACE_UUID("{8CC497C0-A1DF-11CE-8098-00AA0047BE5D}") ITextDocument  : public IDispatch  
{ 
	 
public: 
	virtual HRESULT __safecall Get_Name(WideString &Get_Name_result) = 0 ; 
	virtual HRESULT __safecall Get_Selection(_di_ITextSelection &Get_Selection_result) = 0 ; 
	virtual HRESULT __safecall Get_StoryCount(int &Get_StoryCount_result) = 0 ; 
	virtual HRESULT __safecall Get_StoryRanges(_di_ITextStoryRanges &Get_StoryRanges_result) = 0 ; 
	virtual HRESULT __safecall Get_Saved(int &Get_Saved_result) = 0 ; 
	virtual HRESULT __safecall Set_Saved(int pValue) = 0 ; 
	virtual HRESULT __safecall Get_DefaultTabStop(float &Get_DefaultTabStop_result) = 0 ; 
	virtual HRESULT __safecall Set_DefaultTabStop(float pValue) = 0 ; 
	virtual HRESULT __safecall New(void) = 0 ; 
	virtual HRESULT __safecall Open(OleVariant &pVar, int Flags, int CodePage) = 0 ; 
	virtual HRESULT __safecall Save(OleVariant &pVar, int Flags, int CodePage) = 0 ; 
	virtual HRESULT __safecall Freeze(int &Freeze_result) = 0 ; 
	virtual HRESULT __safecall Unfreeze(int &Unfreeze_result) = 0 ; 
	virtual HRESULT __safecall BeginEditCollection(void) = 0 ; 
	virtual HRESULT __safecall EndEditCollection(void) = 0 ; 
	virtual HRESULT __safecall Undo(int Count, int &Undo_result) = 0 ; 
	virtual HRESULT __safecall Redo(int Count, int &Redo_result) = 0 ; 
	virtual HRESULT __safecall Range(int cp1, int cp2, _di_ITextRange &Range_result) = 0 ; 
	virtual HRESULT __safecall RangeFromPoint(int x, int y, _di_ITextRange &RangeFromPoint_result) = 0 ; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline WideString _scw_Get_Name() { WideString r; HRESULT hr = Get_Name(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property WideString Name = {read=_scw_Get_Name}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline _di_ITextSelection _scw_Get_Selection() { _di_ITextSelection r; HRESULT hr = Get_Selection(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property _di_ITextSelection Selection = {read=_scw_Get_Selection}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_StoryCount() { int r; HRESULT hr = Get_StoryCount(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int StoryCount = {read=_scw_Get_StoryCount}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline _di_ITextStoryRanges _scw_Get_StoryRanges() { _di_ITextStoryRanges r; HRESULT hr = Get_StoryRanges(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property _di_ITextStoryRanges StoryRanges = {read=_scw_Get_StoryRanges}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_Saved() { int r; HRESULT hr = Get_Saved(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int Saved = {read=_scw_Get_Saved, write=Set_Saved}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline float _scw_Get_DefaultTabStop() { float r; HRESULT hr = Get_DefaultTabStop(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property float DefaultTabStop = {read=_scw_Get_DefaultTabStop, write=Set_DefaultTabStop}; 
}; 
 
__dispinterface ITextDocumentDisp; 
typedef System::DelphiInterface _di_ITextDocumentDisp; 
__dispinterface INTERFACE_UUID("{8CC497C0-A1DF-11CE-8098-00AA0047BE5D}") ITextDocumentDisp  : public IDispatch  
{ 
	 
}; 
 
__interface ITextFont; 
typedef System::DelphiInterface _di_ITextFont; 
__interface ITextPara; 
typedef System::DelphiInterface _di_ITextPara; 
__interface INTERFACE_UUID("{8CC497C2-A1DF-11CE-8098-00AA0047BE5D}") ITextRange  : public IDispatch  
{ 
	 
public: 
	virtual HRESULT __safecall Get_Text(WideString &Get_Text_result) = 0 ; 
	virtual HRESULT __safecall Set_Text(const WideString pbstr) = 0 ; 
	virtual HRESULT __safecall Get_Char(int &Get_Char_result) = 0 ; 
	virtual HRESULT __safecall Set_Char(int pch) = 0 ; 
	virtual HRESULT __safecall Get_Duplicate(_di_ITextRange &Get_Duplicate_result) = 0 ; 
	virtual HRESULT __safecall Get_FormattedText(_di_ITextRange &Get_FormattedText_result) = 0 ; 
	virtual HRESULT __safecall Set_FormattedText(const _di_ITextRange ppRange) = 0 ; 
	virtual HRESULT __safecall Get_Start(int &Get_Start_result) = 0 ; 
	virtual HRESULT __safecall Set_Start(int pcpFirst) = 0 ; 
	virtual HRESULT __safecall Get_End_(int &Get_End__result) = 0 ; 
	virtual HRESULT __safecall Set_End_(int pcpLim) = 0 ; 
	virtual HRESULT __safecall Get_Font(_di_ITextFont &Get_Font_result) = 0 ; 
	virtual HRESULT __safecall Set_Font(const _di_ITextFont pFont) = 0 ; 
	virtual HRESULT __safecall Get_Para(_di_ITextPara &Get_Para_result) = 0 ; 
	virtual HRESULT __safecall Set_Para(const _di_ITextPara pPara) = 0 ; 
	virtual HRESULT __safecall Get_StoryLength(int &Get_StoryLength_result) = 0 ; 
	virtual HRESULT __safecall Get_StoryType(int &Get_StoryType_result) = 0 ; 
	virtual HRESULT __safecall Collapse(int bStart) = 0 ; 
	virtual HRESULT __safecall Expand(int Unit_, int &Expand_result) = 0 ; 
	virtual HRESULT __safecall GetIndex(int Unit_, int &GetIndex_result) = 0 ; 
	virtual HRESULT __safecall SetIndex(int Unit_, int Index, int Extend) = 0 ; 
	virtual HRESULT __safecall SetRange(int cpActive, int cpOther) = 0 ; 
	virtual HRESULT __safecall InRange(const _di_ITextRange pRange, int &InRange_result) = 0 ; 
	virtual HRESULT __safecall InStory(const _di_ITextRange pRange, int &InStory_result) = 0 ; 
	virtual HRESULT __safecall IsEqual(const _di_ITextRange pRange, int &IsEqual_result) = 0 ; 
	virtual HRESULT __safecall Select(void) = 0 ; 
	virtual HRESULT __safecall StartOf(int Unit_, int Extend, int &StartOf_result) = 0 ; 
	virtual HRESULT __safecall EndOf(int Unit_, int Extend, int &EndOf_result) = 0 ; 
	virtual HRESULT __safecall Move(int Unit_, int Count, int &Move_result) = 0 ; 
	virtual HRESULT __safecall MoveStart(int Unit_, int Count, int &MoveStart_result) = 0 ; 
	virtual HRESULT __safecall MoveEnd(int Unit_, int Count, int &MoveEnd_result) = 0 ; 
	virtual HRESULT __safecall MoveWhile(OleVariant &Cset, int Count, int &MoveWhile_result) = 0 ; 
	virtual HRESULT __safecall MoveStartWhile(OleVariant &Cset, int Count, int &MoveStartWhile_result) = 0 ; 
	virtual HRESULT __safecall MoveEndWhile(OleVariant &Cset, int Count, int &MoveEndWhile_result) = 0 ; 
	virtual HRESULT __safecall MoveUntil(OleVariant &Cset, int Count, int &MoveUntil_result) = 0 ; 
	virtual HRESULT __safecall MoveStartUntil(OleVariant &Cset, int Count, int &MoveStartUntil_result) = 0 ; 
	virtual HRESULT __safecall MoveEndUntil(OleVariant &Cset, int Count, int &MoveEndUntil_result) = 0 ; 
	virtual HRESULT __safecall FindText(const WideString bstr, int cch, int Flags, int &FindText_result) = 0 ; 
	virtual HRESULT __safecall FindTextStart(const WideString bstr, int cch, int Flags, int &FindTextStart_result) = 0 ; 
	virtual HRESULT __safecall FindTextEnd(const WideString bstr, int cch, int Flags, int &FindTextEnd_result) = 0 ; 
	virtual HRESULT __safecall Delete(int Unit_, int Count, int &Delete_result) = 0 ; 
	virtual HRESULT __safecall Cut(/* out */ OleVariant &pVar) = 0 ; 
	virtual HRESULT __safecall Copy(/* out */ OleVariant &pVar) = 0 ; 
	virtual HRESULT __safecall Paste(OleVariant &pVar, int Format) = 0 ; 
	virtual HRESULT __safecall CanPaste(OleVariant &pVar, int Format, int &CanPaste_result) = 0 ; 
	virtual HRESULT __safecall CanEdit(int &CanEdit_result) = 0 ; 
	virtual HRESULT __safecall ChangeCase(int Type_) = 0 ; 
	virtual HRESULT __safecall GetPoint(int Type_, /* out */ int &px, /* out */ int &py) = 0 ; 
	virtual HRESULT __safecall SetPoint(int x, int y, int Type_, int Extend) = 0 ; 
	virtual HRESULT __safecall ScrollIntoView(int Value) = 0 ; 
	virtual HRESULT __safecall GetEmbeddedObject(System::_di_IInterface &GetEmbeddedObject_result) = 0 ; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline WideString _scw_Get_Text() { WideString r; HRESULT hr = Get_Text(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property WideString Text = {read=_scw_Get_Text, write=Set_Text}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_Char() { int r; HRESULT hr = Get_Char(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int Char = {read=_scw_Get_Char, write=Set_Char}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline _di_ITextRange _scw_Get_Duplicate() { _di_ITextRange r; HRESULT hr = Get_Duplicate(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property _di_ITextRange Duplicate = {read=_scw_Get_Duplicate}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline _di_ITextRange _scw_Get_FormattedText() { _di_ITextRange r; HRESULT hr = Get_FormattedText(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property _di_ITextRange FormattedText = {read=_scw_Get_FormattedText, write=Set_FormattedText}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_Start() { int r; HRESULT hr = Get_Start(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int Start = {read=_scw_Get_Start, write=Set_Start}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_End_() { int r; HRESULT hr = Get_End_(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int End_ = {read=_scw_Get_End_, write=Set_End_}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline _di_ITextFont _scw_Get_Font() { _di_ITextFont r; HRESULT hr = Get_Font(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property _di_ITextFont Font = {read=_scw_Get_Font, write=Set_Font}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline _di_ITextPara _scw_Get_Para() { _di_ITextPara r; HRESULT hr = Get_Para(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property _di_ITextPara Para = {read=_scw_Get_Para, write=Set_Para}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_StoryLength() { int r; HRESULT hr = Get_StoryLength(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int StoryLength = {read=_scw_Get_StoryLength}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_StoryType() { int r; HRESULT hr = Get_StoryType(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int StoryType = {read=_scw_Get_StoryType}; 
}; 
 
__dispinterface ITextRangeDisp; 
typedef System::DelphiInterface _di_ITextRangeDisp; 
__dispinterface INTERFACE_UUID("{8CC497C2-A1DF-11CE-8098-00AA0047BE5D}") ITextRangeDisp  : public IDispatch  
{ 
	 
}; 
 
__interface INTERFACE_UUID("{8CC497C1-A1DF-11CE-8098-00AA0047BE5D}") ITextSelection  : public ITextRange  
{ 
	 
public: 
	virtual HRESULT __safecall Get_Flags(int &Get_Flags_result) = 0 ; 
	virtual HRESULT __safecall Set_Flags(int pFlags) = 0 ; 
	virtual HRESULT __safecall Get_Type_(int &Get_Type__result) = 0 ; 
	virtual HRESULT __safecall MoveLeft(int Unit_, int Count, int Extend, int &MoveLeft_result) = 0 ; 
	virtual HRESULT __safecall MoveRight(int Unit_, int Count, int Extend, int &MoveRight_result) = 0 ; 
	virtual HRESULT __safecall MoveUp(int Unit_, int Count, int Extend, int &MoveUp_result) = 0 ; 
	virtual HRESULT __safecall MoveDown(int Unit_, int Count, int Extend, int &MoveDown_result) = 0 ; 
	virtual HRESULT __safecall HomeKey(int Unit_, int Extend, int &HomeKey_result) = 0 ; 
	virtual HRESULT __safecall EndKey(int Unit_, int Extend, int &EndKey_result) = 0 ; 
	virtual HRESULT __safecall TypeText(const WideString bstr) = 0 ; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_Flags() { int r; HRESULT hr = Get_Flags(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int Flags = {read=_scw_Get_Flags, write=Set_Flags}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_Type_() { int r; HRESULT hr = Get_Type_(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int Type_ = {read=_scw_Get_Type_}; 
}; 
 
__dispinterface ITextSelectionDisp; 
typedef System::DelphiInterface _di_ITextSelectionDisp; 
__dispinterface INTERFACE_UUID("{8CC497C1-A1DF-11CE-8098-00AA0047BE5D}") ITextSelectionDisp  : public IDispatch  
{ 
	 
}; 
 
__interface INTERFACE_UUID("{8CC497C3-A1DF-11CE-8098-00AA0047BE5D}") ITextFont  : public IDispatch  
{ 
	 
public: 
	virtual HRESULT __safecall Get_Duplicate(_di_ITextFont &Get_Duplicate_result) = 0 ; 
	virtual HRESULT __safecall Set_Duplicate(const _di_ITextFont ppFont) = 0 ; 
	virtual HRESULT __safecall CanChange(int &CanChange_result) = 0 ; 
	virtual HRESULT __safecall IsEqual(const _di_ITextFont pFont, int &IsEqual_result) = 0 ; 
	virtual HRESULT __safecall Reset(int Value) = 0 ; 
	virtual HRESULT __safecall Get_Style(int &Get_Style_result) = 0 ; 
	virtual HRESULT __safecall Set_Style(int pValue) = 0 ; 
	virtual HRESULT __safecall Get_AllCaps(int &Get_AllCaps_result) = 0 ; 
	virtual HRESULT __safecall Set_AllCaps(int pValue) = 0 ; 
	virtual HRESULT __safecall Get_Animation(int &Get_Animation_result) = 0 ; 
	virtual HRESULT __safecall Set_Animation(int pValue) = 0 ; 
	virtual HRESULT __safecall Get_BackColor(int &Get_BackColor_result) = 0 ; 
	virtual HRESULT __safecall Set_BackColor(int pValue) = 0 ; 
	virtual HRESULT __safecall Get_Bold(int &Get_Bold_result) = 0 ; 
	virtual HRESULT __safecall Set_Bold(int pValue) = 0 ; 
	virtual HRESULT __safecall Get_Emboss(int &Get_Emboss_result) = 0 ; 
	virtual HRESULT __safecall Set_Emboss(int pValue) = 0 ; 
	virtual HRESULT __safecall Get_ForeColor(int &Get_ForeColor_result) = 0 ; 
	virtual HRESULT __safecall Set_ForeColor(int pValue) = 0 ; 
	virtual HRESULT __safecall Get_Hidden(int &Get_Hidden_result) = 0 ; 
	virtual HRESULT __safecall Set_Hidden(int pValue) = 0 ; 
	virtual HRESULT __safecall Get_Engrave(int &Get_Engrave_result) = 0 ; 
	virtual HRESULT __safecall Set_Engrave(int pValue) = 0 ; 
	virtual HRESULT __safecall Get_Italic(int &Get_Italic_result) = 0 ; 
	virtual HRESULT __safecall Set_Italic(int pValue) = 0 ; 
	virtual HRESULT __safecall Get_Kerning(float &Get_Kerning_result) = 0 ; 
	virtual HRESULT __safecall Set_Kerning(float pValue) = 0 ; 
	virtual HRESULT __safecall Get_LanguageID(int &Get_LanguageID_result) = 0 ; 
	virtual HRESULT __safecall Set_LanguageID(int pValue) = 0 ; 
	virtual HRESULT __safecall Get_Name(WideString &Get_Name_result) = 0 ; 
	virtual HRESULT __safecall Set_Name(const WideString pbstr) = 0 ; 
	virtual HRESULT __safecall Get_Outline(int &Get_Outline_result) = 0 ; 
	virtual HRESULT __safecall Set_Outline(int pValue) = 0 ; 
	virtual HRESULT __safecall Get_Position(float &Get_Position_result) = 0 ; 
	virtual HRESULT __safecall Set_Position(float pValue) = 0 ; 
	virtual HRESULT __safecall Get_Protected_(int &Get_Protected__result) = 0 ; 
	virtual HRESULT __safecall Set_Protected_(int pValue) = 0 ; 
	virtual HRESULT __safecall Get_Shadow(int &Get_Shadow_result) = 0 ; 
	virtual HRESULT __safecall Set_Shadow(int pValue) = 0 ; 
	virtual HRESULT __safecall Get_Size(float &Get_Size_result) = 0 ; 
	virtual HRESULT __safecall Set_Size(float pValue) = 0 ; 
	virtual HRESULT __safecall Get_SmallCaps(int &Get_SmallCaps_result) = 0 ; 
	virtual HRESULT __safecall Set_SmallCaps(int pValue) = 0 ; 
	virtual HRESULT __safecall Get_Spacing(float &Get_Spacing_result) = 0 ; 
	virtual HRESULT __safecall Set_Spacing(float pValue) = 0 ; 
	virtual HRESULT __safecall Get_StrikeThrough(int &Get_StrikeThrough_result) = 0 ; 
	virtual HRESULT __safecall Set_StrikeThrough(int pValue) = 0 ; 
	virtual HRESULT __safecall Get_Subscript(int &Get_Subscript_result) = 0 ; 
	virtual HRESULT __safecall Set_Subscript(int pValue) = 0 ; 
	virtual HRESULT __safecall Get_Superscript(int &Get_Superscript_result) = 0 ; 
	virtual HRESULT __safecall Set_Superscript(int pValue) = 0 ; 
	virtual HRESULT __safecall Get_Underline(int &Get_Underline_result) = 0 ; 
	virtual HRESULT __safecall Set_Underline(int pValue) = 0 ; 
	virtual HRESULT __safecall Get_Weight(int &Get_Weight_result) = 0 ; 
	virtual HRESULT __safecall Set_Weight(int pValue) = 0 ; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline _di_ITextFont _scw_Get_Duplicate() { _di_ITextFont r; HRESULT hr = Get_Duplicate(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property _di_ITextFont Duplicate = {read=_scw_Get_Duplicate, write=Set_Duplicate}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_Style() { int r; HRESULT hr = Get_Style(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int Style = {read=_scw_Get_Style, write=Set_Style}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_AllCaps() { int r; HRESULT hr = Get_AllCaps(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int AllCaps = {read=_scw_Get_AllCaps, write=Set_AllCaps}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_Animation() { int r; HRESULT hr = Get_Animation(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int Animation = {read=_scw_Get_Animation, write=Set_Animation}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_BackColor() { int r; HRESULT hr = Get_BackColor(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int BackColor = {read=_scw_Get_BackColor, write=Set_BackColor}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_Bold() { int r; HRESULT hr = Get_Bold(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int Bold = {read=_scw_Get_Bold, write=Set_Bold}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_Emboss() { int r; HRESULT hr = Get_Emboss(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int Emboss = {read=_scw_Get_Emboss, write=Set_Emboss}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_ForeColor() { int r; HRESULT hr = Get_ForeColor(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int ForeColor = {read=_scw_Get_ForeColor, write=Set_ForeColor}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_Hidden() { int r; HRESULT hr = Get_Hidden(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int Hidden = {read=_scw_Get_Hidden, write=Set_Hidden}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_Engrave() { int r; HRESULT hr = Get_Engrave(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int Engrave = {read=_scw_Get_Engrave, write=Set_Engrave}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_Italic() { int r; HRESULT hr = Get_Italic(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int Italic = {read=_scw_Get_Italic, write=Set_Italic}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline float _scw_Get_Kerning() { float r; HRESULT hr = Get_Kerning(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property float Kerning = {read=_scw_Get_Kerning, write=Set_Kerning}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_LanguageID() { int r; HRESULT hr = Get_LanguageID(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int LanguageID = {read=_scw_Get_LanguageID, write=Set_LanguageID}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline WideString _scw_Get_Name() { WideString r; HRESULT hr = Get_Name(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property WideString Name = {read=_scw_Get_Name, write=Set_Name}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_Outline() { int r; HRESULT hr = Get_Outline(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int Outline = {read=_scw_Get_Outline, write=Set_Outline}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline float _scw_Get_Position() { float r; HRESULT hr = Get_Position(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property float Position = {read=_scw_Get_Position, write=Set_Position}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_Protected_() { int r; HRESULT hr = Get_Protected_(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int Protected_ = {read=_scw_Get_Protected_, write=Set_Protected_}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_Shadow() { int r; HRESULT hr = Get_Shadow(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int Shadow = {read=_scw_Get_Shadow, write=Set_Shadow}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline float _scw_Get_Size() { float r; HRESULT hr = Get_Size(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property float Size = {read=_scw_Get_Size, write=Set_Size}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_SmallCaps() { int r; HRESULT hr = Get_SmallCaps(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int SmallCaps = {read=_scw_Get_SmallCaps, write=Set_SmallCaps}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline float _scw_Get_Spacing() { float r; HRESULT hr = Get_Spacing(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property float Spacing = {read=_scw_Get_Spacing, write=Set_Spacing}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_StrikeThrough() { int r; HRESULT hr = Get_StrikeThrough(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int StrikeThrough = {read=_scw_Get_StrikeThrough, write=Set_StrikeThrough}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_Subscript() { int r; HRESULT hr = Get_Subscript(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int Subscript = {read=_scw_Get_Subscript, write=Set_Subscript}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_Superscript() { int r; HRESULT hr = Get_Superscript(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int Superscript = {read=_scw_Get_Superscript, write=Set_Superscript}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_Underline() { int r; HRESULT hr = Get_Underline(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int Underline = {read=_scw_Get_Underline, write=Set_Underline}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_Weight() { int r; HRESULT hr = Get_Weight(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int Weight = {read=_scw_Get_Weight, write=Set_Weight}; 
}; 
 
__dispinterface ITextFontDisp; 
typedef System::DelphiInterface _di_ITextFontDisp; 
__dispinterface INTERFACE_UUID("{8CC497C3-A1DF-11CE-8098-00AA0047BE5D}") ITextFontDisp  : public IDispatch  
{ 
	 
}; 
 
__interface INTERFACE_UUID("{8CC497C4-A1DF-11CE-8098-00AA0047BE5D}") ITextPara  : public IDispatch  
{ 
	 
public: 
	virtual HRESULT __safecall Get_Duplicate(_di_ITextPara &Get_Duplicate_result) = 0 ; 
	virtual HRESULT __safecall Set_Duplicate(const _di_ITextPara ppPara) = 0 ; 
	virtual HRESULT __safecall CanChange(int &CanChange_result) = 0 ; 
	virtual HRESULT __safecall IsEqual(const _di_ITextPara pPara, int &IsEqual_result) = 0 ; 
	virtual HRESULT __safecall Reset(int Value) = 0 ; 
	virtual HRESULT __safecall Get_Style(int &Get_Style_result) = 0 ; 
	virtual HRESULT __safecall Set_Style(int pValue) = 0 ; 
	virtual HRESULT __safecall Get_Alignment(int &Get_Alignment_result) = 0 ; 
	virtual HRESULT __safecall Set_Alignment(int pValue) = 0 ; 
	virtual HRESULT __safecall Get_Hyphenation(int &Get_Hyphenation_result) = 0 ; 
	virtual HRESULT __safecall Set_Hyphenation(int pValue) = 0 ; 
	virtual HRESULT __safecall Get_FirstLineIndent(float &Get_FirstLineIndent_result) = 0 ; 
	virtual HRESULT __safecall Get_KeepTogether(int &Get_KeepTogether_result) = 0 ; 
	virtual HRESULT __safecall Set_KeepTogether(int pValue) = 0 ; 
	virtual HRESULT __safecall Get_KeepWithNext(int &Get_KeepWithNext_result) = 0 ; 
	virtual HRESULT __safecall Set_KeepWithNext(int pValue) = 0 ; 
	virtual HRESULT __safecall Get_LeftIndent(float &Get_LeftIndent_result) = 0 ; 
	virtual HRESULT __safecall Get_LineSpacing(float &Get_LineSpacing_result) = 0 ; 
	virtual HRESULT __safecall Get_LineSpacingRule(int &Get_LineSpacingRule_result) = 0 ; 
	virtual HRESULT __safecall Get_ListAlignment(int &Get_ListAlignment_result) = 0 ; 
	virtual HRESULT __safecall Set_ListAlignment(int pValue) = 0 ; 
	virtual HRESULT __safecall Get_ListLevelIndex(int &Get_ListLevelIndex_result) = 0 ; 
	virtual HRESULT __safecall Set_ListLevelIndex(int pValue) = 0 ; 
	virtual HRESULT __safecall Get_ListStart(int &Get_ListStart_result) = 0 ; 
	virtual HRESULT __safecall Set_ListStart(int pValue) = 0 ; 
	virtual HRESULT __safecall Get_ListTab(float &Get_ListTab_result) = 0 ; 
	virtual HRESULT __safecall Set_ListTab(float pValue) = 0 ; 
	virtual HRESULT __safecall Get_ListType(int &Get_ListType_result) = 0 ; 
	virtual HRESULT __safecall Set_ListType(int pValue) = 0 ; 
	virtual HRESULT __safecall Get_NoLineNumber(int &Get_NoLineNumber_result) = 0 ; 
	virtual HRESULT __safecall Set_NoLineNumber(int pValue) = 0 ; 
	virtual HRESULT __safecall Get_PageBreakBefore(int &Get_PageBreakBefore_result) = 0 ; 
	virtual HRESULT __safecall Set_PageBreakBefore(int pValue) = 0 ; 
	virtual HRESULT __safecall Get_RightIndent(float &Get_RightIndent_result) = 0 ; 
	virtual HRESULT __safecall Set_RightIndent(float pValue) = 0 ; 
	virtual HRESULT __safecall SetIndents(float StartIndent, float LeftIndent, float RightIndent) = 0 ; 
	virtual HRESULT __safecall SetLineSpacing(int LineSpacingRule, float LineSpacing) = 0 ; 
	virtual HRESULT __safecall Get_SpaceAfter(float &Get_SpaceAfter_result) = 0 ; 
	virtual HRESULT __safecall Set_SpaceAfter(float pValue) = 0 ; 
	virtual HRESULT __safecall Get_SpaceBefore(float &Get_SpaceBefore_result) = 0 ; 
	virtual HRESULT __safecall Set_SpaceBefore(float pValue) = 0 ; 
	virtual HRESULT __safecall Get_WidowControl(int &Get_WidowControl_result) = 0 ; 
	virtual HRESULT __safecall Set_WidowControl(int pValue) = 0 ; 
	virtual HRESULT __safecall Get_TabCount(int &Get_TabCount_result) = 0 ; 
	virtual HRESULT __safecall AddTab(float tbPos, int tbAlign, int tbLeader) = 0 ; 
	virtual HRESULT __safecall ClearAllTabs(void) = 0 ; 
	virtual HRESULT __safecall DeleteTab(float tbPos) = 0 ; 
	virtual HRESULT __safecall GetTab(int iTab, /* out */ float &ptbPos, /* out */ int &ptbAlign, /* out */ int &ptbLeader) = 0 ; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline _di_ITextPara _scw_Get_Duplicate() { _di_ITextPara r; HRESULT hr = Get_Duplicate(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property _di_ITextPara Duplicate = {read=_scw_Get_Duplicate, write=Set_Duplicate}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_Style() { int r; HRESULT hr = Get_Style(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int Style = {read=_scw_Get_Style, write=Set_Style}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_Alignment() { int r; HRESULT hr = Get_Alignment(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int Alignment = {read=_scw_Get_Alignment, write=Set_Alignment}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_Hyphenation() { int r; HRESULT hr = Get_Hyphenation(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int Hyphenation = {read=_scw_Get_Hyphenation, write=Set_Hyphenation}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline float _scw_Get_FirstLineIndent() { float r; HRESULT hr = Get_FirstLineIndent(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property float FirstLineIndent = {read=_scw_Get_FirstLineIndent}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_KeepTogether() { int r; HRESULT hr = Get_KeepTogether(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int KeepTogether = {read=_scw_Get_KeepTogether, write=Set_KeepTogether}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_KeepWithNext() { int r; HRESULT hr = Get_KeepWithNext(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int KeepWithNext = {read=_scw_Get_KeepWithNext, write=Set_KeepWithNext}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline float _scw_Get_LeftIndent() { float r; HRESULT hr = Get_LeftIndent(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property float LeftIndent = {read=_scw_Get_LeftIndent}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline float _scw_Get_LineSpacing() { float r; HRESULT hr = Get_LineSpacing(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property float LineSpacing = {read=_scw_Get_LineSpacing}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_LineSpacingRule() { int r; HRESULT hr = Get_LineSpacingRule(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int LineSpacingRule = {read=_scw_Get_LineSpacingRule}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_ListAlignment() { int r; HRESULT hr = Get_ListAlignment(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int ListAlignment = {read=_scw_Get_ListAlignment, write=Set_ListAlignment}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_ListLevelIndex() { int r; HRESULT hr = Get_ListLevelIndex(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int ListLevelIndex = {read=_scw_Get_ListLevelIndex, write=Set_ListLevelIndex}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_ListStart() { int r; HRESULT hr = Get_ListStart(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int ListStart = {read=_scw_Get_ListStart, write=Set_ListStart}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline float _scw_Get_ListTab() { float r; HRESULT hr = Get_ListTab(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property float ListTab = {read=_scw_Get_ListTab, write=Set_ListTab}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_ListType() { int r; HRESULT hr = Get_ListType(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int ListType = {read=_scw_Get_ListType, write=Set_ListType}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_NoLineNumber() { int r; HRESULT hr = Get_NoLineNumber(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int NoLineNumber = {read=_scw_Get_NoLineNumber, write=Set_NoLineNumber}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_PageBreakBefore() { int r; HRESULT hr = Get_PageBreakBefore(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int PageBreakBefore = {read=_scw_Get_PageBreakBefore, write=Set_PageBreakBefore}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline float _scw_Get_RightIndent() { float r; HRESULT hr = Get_RightIndent(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property float RightIndent = {read=_scw_Get_RightIndent, write=Set_RightIndent}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline float _scw_Get_SpaceAfter() { float r; HRESULT hr = Get_SpaceAfter(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property float SpaceAfter = {read=_scw_Get_SpaceAfter, write=Set_SpaceAfter}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline float _scw_Get_SpaceBefore() { float r; HRESULT hr = Get_SpaceBefore(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property float SpaceBefore = {read=_scw_Get_SpaceBefore, write=Set_SpaceBefore}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_WidowControl() { int r; HRESULT hr = Get_WidowControl(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int WidowControl = {read=_scw_Get_WidowControl, write=Set_WidowControl}; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_TabCount() { int r; HRESULT hr = Get_TabCount(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int TabCount = {read=_scw_Get_TabCount}; 
}; 
 
__dispinterface ITextParaDisp; 
typedef System::DelphiInterface _di_ITextParaDisp; 
__dispinterface INTERFACE_UUID("{8CC497C4-A1DF-11CE-8098-00AA0047BE5D}") ITextParaDisp  : public IDispatch  
{ 
	 
}; 
 
__interface INTERFACE_UUID("{8CC497C5-A1DF-11CE-8098-00AA0047BE5D}") ITextStoryRanges  : public IDispatch  
{ 
	 
public: 
	virtual HRESULT __safecall _NewEnum(System::_di_IInterface &_NewEnum_result) = 0 ; 
	virtual HRESULT __safecall Item(int Index, _di_ITextRange &Item_result) = 0 ; 
	virtual HRESULT __safecall Get_Count(int &Get_Count_result) = 0 ; 
	#pragma option push -w-inl 
	/* safecall wrapper */ inline int _scw_Get_Count() { int r; HRESULT hr = Get_Count(r); System::CheckSafecallResult(hr); return r; } 
	#pragma option pop 
	__property int Count = {read=_scw_Get_Count}; 
}; 
 
__dispinterface ITextStoryRangesDisp; 
typedef System::DelphiInterface _di_ITextStoryRangesDisp; 
__dispinterface INTERFACE_UUID("{8CC497C5-A1DF-11CE-8098-00AA0047BE5D}") ITextStoryRangesDisp  : public IDispatch  
{ 
	 
}; 
 
//-- var, const, procedure --------------------------------------------------- 
static const Shortint tomMajorVersion = 0x1; 
static const Shortint tomMinorVersion = 0x0; 
extern PACKAGE GUID LIBID_tom; 
extern PACKAGE GUID IID_ITextDocument; 
extern PACKAGE GUID IID_ITextRange; 
extern PACKAGE GUID IID_ITextSelection; 
extern PACKAGE GUID IID_ITextFont; 
extern PACKAGE GUID IID_ITextPara; 
extern PACKAGE GUID IID_ITextStoryRanges; 
static const Shortint tomFalse = 0x0; 
static const unsigned tomTrue = 0xffffffff; 
static const unsigned tomUndefined = 0xff676981; 
static const unsigned tomToggle = 0xff676982; 
static const unsigned tomAutoColor = 0xff676983; 
static const unsigned tomDefault = 0xff676984; 
static const unsigned tomBackward = 0xc0000001; 
static const int tomForward = 0x3fffffff; 
static const Shortint tomMove = 0x0; 
static const Shortint tomExtend = 0x1; 
static const Shortint tomNoSelection = 0x0; 
static const Shortint tomSelectionIP = 0x1; 
static const Shortint tomSelectionNormal = 0x2; 
static const Shortint tomSelectionFrame = 0x3; 
static const Shortint tomSelectionColumn = 0x4; 
static const Shortint tomSelectionRow = 0x5; 
static const Shortint tomSelectionBlock = 0x6; 
static const Shortint tomSelectionInlineShape = 0x7; 
static const Shortint tomSelectionShape = 0x8; 
static const Shortint tomSelStartActive = 0x1; 
static const Shortint tomSelAtEOL = 0x2; 
static const Shortint tomSelOvertype = 0x4; 
static const Shortint tomSelActive = 0x8; 
static const Shortint tomSelReplace = 0x10; 
static const Shortint tomEnd = 0x0; 
static const Shortint tomStart = 0x20; 
static const Shortint tomCollapseEnd = 0x0; 
static const Shortint tomCollapseStart = 0x1; 
static const Shortint tomNone = 0x0; 
static const Shortint tomSingle = 0x1; 
static const Shortint tomWords = 0x2; 
static const Shortint tomDouble = 0x3; 
static const Shortint tomDotted = 0x4; 
static const Shortint tomLineSpaceSingle = 0x0; 
static const Shortint tomLineSpace1pt5 = 0x1; 
static const Shortint tomLineSpaceDouble = 0x2; 
static const Shortint tomLineSpaceAtLeast = 0x3; 
static const Shortint tomLineSpaceExactly = 0x4; 
static const Shortint tomLineSpaceMultiple = 0x5; 
static const Shortint tomAlignLeft = 0x0; 
static const Shortint tomAlignCenter = 0x1; 
static const Shortint tomAlignRight = 0x2; 
static const Shortint tomAlignJustify = 0x3; 
static const Shortint tomAlignDecimal = 0x3; 
static const Shortint tomAlignBar = 0x4; 
static const Shortint tomSpaces = 0x0; 
static const Shortint tomDots = 0x1; 
static const Shortint tomDashes = 0x2; 
static const Shortint tomLines = 0x3; 
static const unsigned tomTabBack = 0xfffffffd; 
static const unsigned tomTabNext = 0xfffffffe; 
static const unsigned tomTabHere = 0xffffffff; 
static const Shortint tomListNone = 0x0; 
static const Shortint tomListBullet = 0x1; 
static const Shortint tomListNumberAsArabic = 0x2; 
static const Shortint tomListNumberAsLCLetter = 0x3; 
static const Shortint tomListNumberAsUCLetter = 0x4; 
static const Shortint tomListNumberAsLCRoman = 0x5; 
static const Shortint tomListNumberAsUCRoman = 0x6; 
static const Shortint tomListNumberAsSequence = 0x7; 
static const int tomListParentheses = 0x10000; 
static const int tomListPeriod = 0x20000; 
static const int tomListPlain = 0x30000; 
static const Shortint tomCharacter = 0x1; 
static const Shortint tomWord = 0x2; 
static const Shortint tomSentence = 0x3; 
static const Shortint tomParagraph = 0x4; 
static const Shortint tomLine = 0x5; 
static const Shortint tomStory = 0x6; 
static const Shortint tomScreen = 0x7; 
static const Shortint tomSection = 0x8; 
static const Shortint tomColumn = 0x9; 
static const Shortint tomRow = 0xa; 
static const Shortint tomWindow = 0xb; 
static const Shortint tomCell = 0xc; 
static const Shortint tomCharFormat = 0xd; 
static const Shortint tomParaFormat = 0xe; 
static const Shortint tomTable = 0xf; 
static const Shortint tomObject = 0x10; 
static const Shortint tomMatchWord = 0x2; 
static const Shortint tomMatchCase = 0x4; 
static const Shortint tomMatchPattern = 0x8; 
static const Shortint tomUnknownStory = 0x0; 
static const Shortint tomMainTextStory = 0x1; 
static const Shortint tomFootnotesStory = 0x2; 
static const Shortint tomEndnotesStory = 0x3; 
static const Shortint tomCommentsStory = 0x4; 
static const Shortint tomTextFrameStory = 0x5; 
static const Shortint tomEvenPagesHeaderStory = 0x6; 
static const Shortint tomPrimaryHeaderStory = 0x7; 
static const Shortint tomEvenPagesFooterStory = 0x8; 
static const Shortint tomPrimaryFooterStory = 0x9; 
static const Shortint tomFirstPageHeaderStory = 0xa; 
static const Shortint tomFirstPageFooterStory = 0xb; 
static const Shortint tomNoAnimation = 0x0; 
static const Shortint tomLasVegasLights = 0x1; 
static const Shortint tomBlinkingBackground = 0x2; 
static const Shortint tomSparkleText = 0x3; 
static const Shortint tomMarchingBlackAnts = 0x4; 
static const Shortint tomMarchingRedAnts = 0x5; 
static const Shortint tomShimmer = 0x6; 
static const Shortint tomWipeDown = 0x7; 
static const Shortint tomWipeRight = 0x8; 
static const Shortint tomAnimationMax = 0x8; 
static const Shortint tomLowerCase = 0x0; 
static const Shortint tomUpperCase = 0x1; 
static const Shortint tomTitleCase = 0x2; 
static const Shortint tomSentenceCase = 0x4; 
static const Shortint tomToggleCase = 0x5; 
static const Word tomReadOnly = 0x100; 
static const Word tomShareDenyRead = 0x200; 
static const Word tomShareDenyWrite = 0x400; 
static const Word tomPasteFile = 0x1000; 
static const Shortint tomCreateNew = 0x10; 
static const Shortint tomCreateAlways = 0x20; 
static const Shortint tomOpenExisting = 0x30; 
static const Shortint tomOpenAlways = 0x40; 
static const Shortint tomTruncateExisting = 0x50; 
static const Shortint tomRTF = 0x1; 
static const Shortint tomText = 0x2; 
static const Shortint tomHTML = 0x3; 
static const Shortint tomWordDocument = 0x4; 
 
}	/* namespace Tom_tlb */ 
using namespace Tom_tlb; 
#pragma option pop	// -w- 
#pragma option pop	// -Vx 
 
#pragma delphiheader end. 
//-- end unit ---------------------------------------------------------------- 
#endif	// tom_TLB