Class TDBRichEdit (unit DBRichE)

Inherits from

TCustomRichEdit

This is a component that adds the data aware properties of TDBMemo to TRichEdit, providing the capability to store formated text in a Paradox binary field. It fills the need to provide the capacity to save the text to print labels in a product database. // 3/10/96 Phillip J. Palan, cis 102334,2053 //

Constructors


constructor Create(AOwner: TComponent);



Functions

destructor Destroy;


procedure LoadMemo;


procedure Change;


procedure Notification(AComponent: TComponent; Operation: TOperation);


procedure WndProc(var Message: TMessage);


procedure CMEnter(var Message: TCMEnter);


procedure CMExit(var Message: TCMExit);


procedure CMGetDataLink(var Message: TMessage);


procedure DataChange(Sender: TObject);


procedure EditingChange(Sender: TObject);


function GetDataField: string;


function GetDataSource: TDataSource;


function GetField: TField;


function GetReadOnly: Boolean;


procedure SetAutoDisplay(Value: Boolean);


procedure SetDataField(const Value: string);


procedure SetDataSource(Value: TDataSource);


procedure SetFocused(Value: Boolean);


procedure SetReadOnly(Value: Boolean);


procedure UpdateData(Sender: TObject);


procedure WMCut(var Message: TMessage);


procedure WMLButtonDblClk(var Message: TWMLButtonDblClk);


procedure WMPaint(var Message: TWMPaint);


procedure WMPaste(var Message: TMessage);


Properties

property Align :


property Alignment :


property AutoDisplay : Boolean


property BorderStyle :


property Color :


property Ctl3D :


property DataField : string


property DataSource : TDataSource


property DragMode :


property Enabled :


property Font :


property HideScrollBars :


property HideSelection :


property Lines :


property MaxLength :


property ParentColor :


property ParentCtl3D :


property ParentFont :


property PlainText :


property PopupMenu :


property ReadOnly : Boolean


property ScrollBars :


property ShowHint :


property TabOrder :


property TabStop :


property Visible :


property WantReturns :


property WantTabs :


property WordWrap :


property Field : TField


Events

event OnChange :


event OnDragDrop :


event OnDragOver :


event OnEndDrag :


event OnEnter :


event OnExit :


event OnKeyDown :


event OnKeyPress :


event OnKeyUp :


event OnMouseDown :


event OnMouseMove :


event OnMouseUp :


event OnProtectChange :


event OnResizeRequest :


event OnSaveClipboard :


event OnSelectionChange :


event OnStartDrag :


Variables

FAutoDisplay : Boolean;


FDataLink : TFieldDataLink;


FFocused : Boolean;


FMemoLoaded : Boolean;


FPaintControl : TPaintControl;



Constructors


constructor Create(AOwner: TComponent);


Functions


destructor Destroy;


procedure LoadMemo;


procedure Change;


procedure Notification(AComponent: TComponent; Operation: TOperation);


procedure WndProc(var Message: TMessage);


procedure CMEnter(var Message: TCMEnter);


procedure CMExit(var Message: TCMExit);


procedure CMGetDataLink(var Message: TMessage);


procedure DataChange(Sender: TObject);


procedure EditingChange(Sender: TObject);


function GetDataField: string;


function GetDataSource: TDataSource;


function GetField: TField;


function GetReadOnly: Boolean;


procedure SetAutoDisplay(Value: Boolean);


procedure SetDataField(const Value: string);


procedure SetDataSource(Value: TDataSource);


procedure SetFocused(Value: Boolean);


procedure SetReadOnly(Value: Boolean);


procedure UpdateData(Sender: TObject);


procedure WMCut(var Message: TMessage);


procedure WMLButtonDblClk(var Message: TWMLButtonDblClk);


procedure WMPaint(var Message: TWMPaint);


procedure WMPaste(var Message: TMessage);


Properties


property Align :


property Alignment :


property AutoDisplay : Boolean


property BorderStyle :


property Color :


property Ctl3D :


property DataField : string


property DataSource : TDataSource


property DragMode :


property Enabled :


property Font :


property HideScrollBars :


property HideSelection :


property Lines :


property MaxLength :


property ParentColor :


property ParentCtl3D :


property ParentFont :


property PlainText :


property PopupMenu :


property ReadOnly : Boolean


property ScrollBars :


property ShowHint :


property TabOrder :


property TabStop :


property Visible :


property WantReturns :


property WantTabs :


property WordWrap :


property Field : TField


Events


event OnChange :


event OnDragDrop :


event OnDragOver :


event OnEndDrag :


event OnEnter :


event OnExit :


event OnKeyDown :


event OnKeyPress :


event OnKeyUp :


event OnMouseDown :


event OnMouseMove :


event OnMouseUp :


event OnProtectChange :


event OnResizeRequest :


event OnSaveClipboard :


event OnSelectionChange :


event OnStartDrag :


Variables


FAutoDisplay : Boolean;


FDataLink : TFieldDataLink;


FFocused : Boolean;


FMemoLoaded : Boolean;


FPaintControl : TPaintControl;