Class TCustomRichEdit98 (unit RichEdit2)

Inherits from

TCustomRichEdit

Constructors


constructor Create(AOwner: TComponent);

Public declarations

TCustomRichEdit98



Functions

function CanRedo: Boolean;


function CanUndo: Boolean;


destructor Destroy;


function FindText(const SearchStr: string; StartPos, Length: Integer; Options: TSearchTypes98): Integer;


function FindWideText(const SearchStr: WideString; StartPos, Length: Integer; Options: TSearchTypes98): Integer;


function GetWordAtPos(Pos: Integer; var Start, Len: Integer): String;


procedure Redo;


function RedoName: TUndoName;


procedure SetCaret(Line, Column: Integer);


procedure SetUndoLimit(Value: Integer);


procedure Undo;


function UndoName: TUndoName;


procedure CMFontChanged(var Message: TMessage);


procedure CreateParams(var Params: TCreateParams);


procedure CreateWnd;

Protected declarations

procedure DefineProperties(Filer: TFiler);


procedure EMGetLine(var Message: TMessage);


procedure EMGetSelText(var Message: TMessage);


procedure EMGetTextRange(var Message: TMessage);


procedure EMReplaceSel(var Message: TMessage);


function GetColumn: Integer;


function GetFirstVisibleLine: Integer;


function GetLine: Integer;


function GetWideSelText: WideString;


function GetWideText: WideString;


procedure ReadData(Reader: TReader);


procedure SetAutoURLDetect(Value: Boolean);


procedure SetColumn(Value: Integer);


procedure SetLanguage(Value: TLanguage);


procedure SetLine(Value: Integer);


procedure SetWideSelText(Value: WideString);


procedure SetWideText(Value: WideString);

Writer.

procedure WMGetText(var Message: TWMGetText);


procedure WMNCDestroy(var Message: TWMNCDestroy);


procedure WMSetFont(var Message: TWMSetFont);


procedure WMSetText(var Message: TWMSetText);


procedure WriteData(Writer: TWriter);

Reader.

procedure CNNotify(var Message: TWMNotify);


procedure SetDefAttributes(Value: TTextAttributes98);


procedure SetRichEditStrings(Value: TStrings);


procedure SetSelAttributes(Value: TTextAttributes98);


procedure SetShowSelBar(Value: Boolean);


Properties

property AutoURLDetect : Boolean


property Col : Integer


property DefAttributes : TTextAttributes98


property FirstVisibleLine : Integer


property Language : TLanguage


property Line : Integer


property Paragraph : TParaAttributes98


property SelAttributes : TTextAttributes98


property ShowSelectionBar : Boolean


property WideLines : TWideStrings


property WideSelText : WideString


property WideText : WideString


property Lines : TStrings


Events

event OnURLClick : TURLClickEvent


Variables

FAutoURLDetect : Boolean;


FCP : Word;


FDefAttributes : TTextAttributes98;


FLanguage : TLanguage;


FLibHandle : THandle;

Private declarations

FOnURLClick : TURLClickEvent;


FParagraph : TParaAttributes98;


FPlainText : Boolean;


FRichEditStrings : TStrings;


FScreenLogPixels : Integer;


FSelAttributes : TTextAttributes98;


FShowSelBar : Boolean;


FWide : Boolean;


FWideStrings : TWideStrings;



Constructors


constructor Create(AOwner: TComponent);

Public declarations

TCustomRichEdit98


Functions


function CanRedo: Boolean;


function CanUndo: Boolean;


destructor Destroy;


function FindText(const SearchStr: string; StartPos, Length: Integer; Options: TSearchTypes98): Integer;


function FindWideText(const SearchStr: WideString; StartPos, Length: Integer; Options: TSearchTypes98): Integer;


function GetWordAtPos(Pos: Integer; var Start, Len: Integer): String;


procedure Redo;


function RedoName: TUndoName;


procedure SetCaret(Line, Column: Integer);


procedure SetUndoLimit(Value: Integer);


procedure Undo;


function UndoName: TUndoName;


procedure CMFontChanged(var Message: TMessage);


procedure CreateParams(var Params: TCreateParams);


procedure CreateWnd;

Protected declarations


procedure DefineProperties(Filer: TFiler);


procedure EMGetLine(var Message: TMessage);


procedure EMGetSelText(var Message: TMessage);


procedure EMGetTextRange(var Message: TMessage);


procedure EMReplaceSel(var Message: TMessage);


function GetColumn: Integer;


function GetFirstVisibleLine: Integer;


function GetLine: Integer;


function GetWideSelText: WideString;


function GetWideText: WideString;


procedure ReadData(Reader: TReader);


procedure SetAutoURLDetect(Value: Boolean);


procedure SetColumn(Value: Integer);


procedure SetLanguage(Value: TLanguage);


procedure SetLine(Value: Integer);


procedure SetWideSelText(Value: WideString);


procedure SetWideText(Value: WideString);

Writer.WriteListEnd;


procedure WMGetText(var Message: TWMGetText);


procedure WMNCDestroy(var Message: TWMNCDestroy);


procedure WMSetFont(var Message: TWMSetFont);


procedure WMSetText(var Message: TWMSetText);


procedure WriteData(Writer: TWriter);

Reader.ReadListEnd;


procedure CNNotify(var Message: TWMNotify);


procedure SetDefAttributes(Value: TTextAttributes98);


procedure SetRichEditStrings(Value: TStrings);


procedure SetSelAttributes(Value: TTextAttributes98);


procedure SetShowSelBar(Value: Boolean);


Properties


property AutoURLDetect : Boolean


property Col : Integer


property DefAttributes : TTextAttributes98


property FirstVisibleLine : Integer


property Language : TLanguage


property Line : Integer


property Paragraph : TParaAttributes98


property SelAttributes : TTextAttributes98


property ShowSelectionBar : Boolean


property WideLines : TWideStrings


property WideSelText : WideString


property WideText : WideString


property Lines : TStrings


Events


event OnURLClick : TURLClickEvent


Variables


FAutoURLDetect : Boolean;


FCP : Word;


FDefAttributes : TTextAttributes98;


FLanguage : TLanguage;


FLibHandle : THandle;

Private declarations


FOnURLClick : TURLClickEvent;


FParagraph : TParaAttributes98;


FPlainText : Boolean;


FRichEditStrings : TStrings;


FScreenLogPixels : Integer;


FSelAttributes : TTextAttributes98;


FShowSelBar : Boolean;


FWide : Boolean;


FWideStrings : TWideStrings;