Class TChkStrLstDlg (unit ChkStrEd)

Inherits from

TForm

Constructors



Functions

procedure btnCopyClick( Sender : TObject );


procedure btnCutClick( Sender : TObject );


procedure btnDeleteClick(Sender: TObject);


procedure btnFontClick( Sender : TObject );

Save New Default Settings

procedure btnOkClick( Sender : TObject );


procedure btnPasteClick( Sender : TObject );


procedure btnUndoClick( Sender : TObject );


procedure cmdDownClick(Sender: TObject);


procedure cmdUpClick(Sender: TObject);


procedure FormCreate( Sender : TObject );


procedure FormDestroy( Sender : TObject );

Load settings from DELPHI.

procedure grdEditClick(Sender: TObject);

Disable the Close menu item, so dialog cannot be closed

procedure grdEditDblClick(Sender: TObject);


procedure grdEditDrawCell(Sender: TObject; Col, Row: Longint; Rect: TRect; State: TGridDrawState);


procedure grdEditKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);


procedure grdEditKeyPress(Sender: TObject; var Key: Char);


procedure grdEditMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);


procedure grdEditMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);


procedure SetGridToText;


procedure SetTextToGrid;


procedure ClearRow(Row: Integer);


procedure EnableButtons( Enable : Boolean );

Clipboard contains Text

procedure ResizeGrid;


procedure UpdateClipboardStatus;


procedure UpdateLineColStatus;


Properties

Events

Variables

btnCancel : TButton;


btnCopy : TSpeedButton;


btnCut : TSpeedButton;


btnDelete : TSpeedButton;


btnFont : TSpeedButton;


btnOk : TButton;


btnPaste : TSpeedButton;


btnUndo : TSpeedButton;


chkDefault : TCheckBox;


cmdDown : TSpeedButton;


cmdUp : TSpeedButton;


dlgFont : TFontDialog;


edtStrings : TMemo;


grdEdit : TStringGrid;


lblCount : TLabel;


lblLine : TLabel;


lblLineNr : TLabel;


mnuCopy : TMenuItem;


mnuCut : TMenuItem;


mnuEdit : TPopupMenu;


mnuPaste : TMenuItem;


mnuUndo : TMenuItem;


pnlStringList : TPanel;


pnlToolbar : TPanel;


DelphiIni : TIniFile;


FPropName : string;



Constructors


Functions


procedure btnCopyClick( Sender : TObject );


procedure btnCutClick( Sender : TObject );


procedure btnDeleteClick(Sender: TObject);


procedure btnFontClick( Sender : TObject );

Save New Default Settings


procedure btnOkClick( Sender : TObject );


procedure btnPasteClick( Sender : TObject );


procedure btnUndoClick( Sender : TObject );


procedure cmdDownClick(Sender: TObject);


procedure cmdUpClick(Sender: TObject);


procedure FormCreate( Sender : TObject );


procedure FormDestroy( Sender : TObject );

Load settings from DELPHI.INI File


procedure grdEditClick(Sender: TObject);

Disable the Close menu item, so dialog cannot be closed


procedure grdEditDblClick(Sender: TObject);


procedure grdEditDrawCell(Sender: TObject; Col, Row: Longint; Rect: TRect; State: TGridDrawState);


procedure grdEditKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);


procedure grdEditKeyPress(Sender: TObject; var Key: Char);


procedure grdEditMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);


procedure grdEditMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);


procedure SetGridToText;


procedure SetTextToGrid;


procedure ClearRow(Row: Integer);


procedure EnableButtons( Enable : Boolean );

Clipboard contains Text


procedure ResizeGrid;


procedure UpdateClipboardStatus;


procedure UpdateLineColStatus;


Properties


Events


Variables


btnCancel : TButton;


btnCopy : TSpeedButton;


btnCut : TSpeedButton;


btnDelete : TSpeedButton;


btnFont : TSpeedButton;


btnOk : TButton;


btnPaste : TSpeedButton;


btnUndo : TSpeedButton;


chkDefault : TCheckBox;


cmdDown : TSpeedButton;


cmdUp : TSpeedButton;


dlgFont : TFontDialog;


edtStrings : TMemo;


grdEdit : TStringGrid;


lblCount : TLabel;


lblLine : TLabel;


lblLineNr : TLabel;


mnuCopy : TMenuItem;


mnuCut : TMenuItem;


mnuEdit : TPopupMenu;


mnuPaste : TMenuItem;


mnuUndo : TMenuItem;


pnlStringList : TPanel;


pnlToolbar : TPanel;


DelphiIni : TIniFile;


FPropName : string;