| Class TStringsViewer (unit Strngvwr) |
TCustomControl
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
procedure Clear;
procedure CopyToClipboard;
procedure CutToClipboard;
procedure SelectAll;
destructor Destroy;
procedure Loaded;
procedure Paint;
procedure Clicked(Sender: TObject);
procedure DblClicked(Sender: TObject);
procedure GraphicMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
procedure GraphicMouseMove(Sender: TObject;Shift: TShiftState;
X, Y: Integer);
procedure GraphicMouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
procedure HScrollBarEnter(Sender: Tobject);
procedure KeyDown(Sender: TObject;var Key: word;Shift: TShiftState);
procedure KeyPressed(Sender: TObject;var Key: char);
procedure KeyUp(Sender: TObject;var Key: word;Shift: TShiftState);
procedure PaintCanvas(Sender: TObject);
procedure SetColor(c: TColor);
procedure SetFont(f: TFont);
procedure SetLines(l: TSVStrings);
procedure StringsChanged(Sender: TObject);
procedure VScrollBarClick(Sender: TObject; ScrollCode: TScrollCode;
var ScrollPos: Integer);| Properties |
property Align :
property Color : TColor
property Font : TFont
property HelpContext :
property Hint :
property Lines : TSVStrings
property PopupMenu :
property ShowHint :
property TabOrder :
property TabStop : | Events |
event OnChange : TNotifyEvent
event OnClick : TNotifyEvent
event OnDblClick : TNotifyEvent
event OnDragDrop :
event OnDragOver :
event OnEndDrag :
event OnEnter :
event OnExit :
event OnKeyDown : TKeyEvent
event OnKeyPress : TKeyPressEvent
event OnKeyUp : TKeyEvent
event OnLinkClicked : TSVLinkEvent
event OnMouseDown : TMouseEvent
event OnMouseMove : TMouseMoveEvent
event OnMouseUp : TMouseEvent| Variables |
Modified : Boolean;
CanMark : Boolean;
FColor : TColor;
fdx : integer;
fdy : integer;
FFont : TFont;
FLines : TSVStrings;
FOnChange : TNotifyEvent;
FOnClick : TNotifyEvent;
FOnDblClick : TNotifyEvent;
FonKeyDown : TKeyEvent;
FOnKeyPress : TKeyPressEvent;
FOnKeyUp : TKeyEvent;
FOnLink : TSVLinkEvent;
FOnMouseDown : TMouseEvent;
FOnMouseMove : TMouseMoveEvent;
FOnMouseUp : TMouseEvent;
Graphic : TSVCanvas;
HScrollBar : TScrollBar;
Links : array[1..1000] of TSVLinkPtr;
Marked : Boolean;
Marking : Boolean;
Mkc0 : integer;
Mkc1 : integer;
MkL0 : integer;
MkL1 : integer;
NumLinks : integer;
Panel : TPanel;
VScrollBar : TScrollBar;| Constructors |
constructor Create(AOwner: TComponent);| Functions |
procedure Clear;
procedure CopyToClipboard;
procedure CutToClipboard;CTRL+C,CTRL+X
procedure SelectAll;
destructor Destroy;
procedure Loaded;
procedure Paint;
procedure Clicked(Sender: TObject);
procedure DblClicked(Sender: TObject);
procedure GraphicMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
procedure GraphicMouseMove(Sender: TObject;Shift: TShiftState;
X, Y: Integer);
procedure GraphicMouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
procedure HScrollBarEnter(Sender: Tobject);
procedure KeyDown(Sender: TObject;var Key: word;Shift: TShiftState);
procedure KeyPressed(Sender: TObject;var Key: char);
procedure KeyUp(Sender: TObject;var Key: word;Shift: TShiftState);
procedure PaintCanvas(Sender: TObject);
procedure SetColor(c: TColor);
procedure SetFont(f: TFont);
procedure SetLines(l: TSVStrings);
procedure StringsChanged(Sender: TObject);
procedure VScrollBarClick(Sender: TObject; ScrollCode: TScrollCode;
var ScrollPos: Integer);draw link
| Properties |
property Align :
property Color : TColor
property Font : TFont
property HelpContext :
property Hint :
property Lines : TSVStrings
property PopupMenu :
property ShowHint :
property TabOrder :
property TabStop : | Events |
event OnChange : TNotifyEvent
event OnClick : TNotifyEvent
event OnDblClick : TNotifyEvent
event OnDragDrop :
event OnDragOver :
event OnEndDrag :
event OnEnter :
event OnExit :
event OnKeyDown : TKeyEvent
event OnKeyPress : TKeyPressEvent
event OnKeyUp : TKeyEvent
event OnLinkClicked : TSVLinkEvent
event OnMouseDown : TMouseEvent
event OnMouseMove : TMouseMoveEvent
event OnMouseUp : TMouseEvent| Variables |
Modified : Boolean;
CanMark : Boolean;
FColor : TColor;
fdx : integer;
fdy : integer;
FFont : TFont;
FLines : TSVStrings;
FOnChange : TNotifyEvent;
FOnClick : TNotifyEvent;
FOnDblClick : TNotifyEvent;
FonKeyDown : TKeyEvent;
FOnKeyPress : TKeyPressEvent;
FOnKeyUp : TKeyEvent;
FOnLink : TSVLinkEvent;
FOnMouseDown : TMouseEvent;
FOnMouseMove : TMouseMoveEvent;
FOnMouseUp : TMouseEvent;
Graphic : TSVCanvas;
HScrollBar : TScrollBar;
Links : array[1..1000] of TSVLinkPtr;
Marked : Boolean;
Marking : Boolean;
Mkc0 : integer;
Mkc1 : integer;
MkL0 : integer;
MkL1 : integer;
NumLinks : integer;
Panel : TPanel;
VScrollBar : TScrollBar;