Class TRkTabStopEditDlg (unit RkTabEdt)

Inherits from

TForm

Constructors



Functions

procedure BtnAddClick( Sender : TObject );


procedure BtnDeleteClick( Sender : TObject );

Update the track bar

procedure FormCreate( Sender : TObject );

= TRkTabStopProperty.

procedure FormShow( Sender : TObject );

Update TrackBar position to reflect currently selected tab stop

procedure LstTabsClick( Sender : TObject );

========================================================================= TRkTabStopEditDlg.

procedure TrkTabPosChange( Sender : TObject );

========================================================================= TRkTabStopEditDlg.

Properties

Events

Variables

BtnAdd : TBitBtn;


BtnCancel : TButton;


BtnDelete : TBitBtn;


BtnOK : TButton;


GrpPreview : TGroupBox;


GrpTabStops : TGroupBox;


Label3 : TLabel;


LblMax : TLabel;


LblMin : TLabel;


LblTabNum : TLabel;


LstPreview : TRkTabbedListBox;


LstTabs : TListBox;


TrkTabPos : TRkTrackBar;


FUpdating : Boolean;



Constructors


Functions


procedure BtnAddClick( Sender : TObject );


procedure BtnDeleteClick( Sender : TObject );

Update the track bar


procedure FormCreate( Sender : TObject );

= TRkTabStopProperty.Edit =} {===============================} {== TRkTabStopEditDlg Methods ==} {===============================


procedure FormShow( Sender : TObject );

Update TrackBar position to reflect currently selected tab stop


procedure LstTabsClick( Sender : TObject );

========================================================================= TRkTabStopEditDlg.LstTabsClick This method updates the Min and Max values of the track bar to reflect the range a particular tab stop may move. A tab stop may not move past a tab stop that exists before or after it in the list. Setting the track bar range ensures that this cannot happen. The FUpdating flag is set at the beginning of this method to prevent a change in the TrackBar's Min or Max value from causing the TrkTabPosChange event from altering the display. =========================================================================


procedure TrkTabPosChange( Sender : TObject );

========================================================================= TRkTabStopEditDlg.TrkTabPosChange As the track bar is moved, the value of the selected tab stop is updated. The change is immediately reflected in the tab and preview list boxes. =========================================================================


Properties


Events


Variables


BtnAdd : TBitBtn;


BtnCancel : TButton;


BtnDelete : TBitBtn;


BtnOK : TButton;


GrpPreview : TGroupBox;


GrpTabStops : TGroupBox;


Label3 : TLabel;


LblMax : TLabel;


LblMin : TLabel;


LblTabNum : TLabel;


LstPreview : TRkTabbedListBox;


LstTabs : TListBox;


TrkTabPos : TRkTrackBar;


FUpdating : Boolean;