Last Modified

7/15/2014 3:26:40 PM



Inherits from



TfrmOptionsReminders = class(TfrmBase508Form)
  pnlBottom: TPanel;
  btnOK: TButton;
  btnCancel: TButton;
  lstDisplayed: TORListBox;
  lstNotDisplayed: TORListBox;
  btnUp: TButton;
  btnDown: TButton;
  btnDelete: TButton;
  btnAdd: TButton;
  lblDisplayed: TLabel;
  lblNotDisplayed: TLabel;
  bvlBottom: TBevel;
  radSort: TRadioGroup;
  procedure FormCreate(Sender: TObject);
  procedure lstDisplayedChange(Sender: TObject);
  procedure lstNotDisplayedChange(Sender: TObject);
  procedure btnUpClick(Sender: TObject);
  procedure btnDownClick(Sender: TObject);
  procedure btnDeleteClick(Sender: TObject);
  procedure btnAddClick(Sender: TObject);
  function GetFirstSelection(aList: TORListBox): integer;
  procedure SetItem(aList: TORListBox; index: integer);
  procedure MoveSelected(aList: TORListBox; items: TStrings);
  procedure btnOKClick(Sender: TObject);
  procedure radSortClick(Sender: TObject);
  { Private declarations }
  procedure CheckEnable;
  { Public declarations }

DFM Objects

frmOptionsReminders : TfrmOptionsReminders
 ├lblDisplayed : TLabel
 ├lblNotDisplayed : TLabel
 ├pnlBottom : TPanel
 │ ├bvlBottom : TBevel
 │ ├btnOK : TButton
 │ └btnCancel : TButton
 ├lstDisplayed : TORListBox
 ├lstNotDisplayed : TORListBox
 ├btnUp : TButton
 ├btnDown : TButton
 ├btnDelete : TButton
 ├btnAdd : TButton
 ├radSort : TRadioGroup
 └amgrMain : TVA508AccessibilityManager

Class Hierarchy

Class Fields

Name Type Scope Comments
btnAdd TButton Public/Published -
btnCancel TButton Public/Published -
btnDelete TButton Public/Published -
btnDown TButton Public/Published -
btnOK TButton Public/Published -
btnUp TButton Public/Published -
bvlBottom TBevel Public/Published -
lblDisplayed TLabel Public/Published -
lblNotDisplayed TLabel Public/Published -
lstDisplayed TORListBox Public/Published -
lstNotDisplayed TORListBox Public/Published -
pnlBottom TPanel Public/Published -
radSort TRadioGroup Public/Published -


Name Declaration Scope Comments
btnAddClick procedure btnAddClick(Sender: TObject); Public/Published -
btnDeleteClick procedure btnDeleteClick(Sender: TObject); Public/Published -
btnDownClick procedure btnDownClick(Sender: TObject); Public/Published -
btnOKClick procedure btnOKClick(Sender: TObject); Public/Published -
btnUpClick procedure btnUpClick(Sender: TObject); Public/Published -
CheckEnable procedure CheckEnable; Private
Private declarations
allow buttons to be enabled or not depending on selections
FormCreate procedure FormCreate(Sender: TObject); Public/Published -
GetFirstSelection function GetFirstSelection(aList: TORListBox): integer; Public/Published -
lstDisplayedChange procedure lstDisplayedChange(Sender: TObject); Public/Published -
lstNotDisplayedChange procedure lstNotDisplayedChange(Sender: TObject); Public/Published -
MoveSelected procedure MoveSelected(aList: TORListBox; items: TStrings); Public/Published -
radSortClick procedure radSortClick(Sender: TObject); Public/Published -
SetItem procedure SetItem(aList: TORListBox; index: integer); Public/Published -

Referenced By (3)

Module (line) Referrer Type
fOptionsReminders (44) frmOptionsReminders Read
fOptionsReminders (57) - Read
fOptionsReminders (63) - Read