Class

TfrmAddlSigners

Module

fAddlSigners

Last Modified

7/15/2014 3:26:36 PM

Scope

Interfaced

Inherits from

TfrmBase508Form

Declaration


TfrmAddlSigners = class(TfrmBase508Form)
  cmdOK: TButton;
  cmdCancel: TButton;
  cboSrcList: TORComboBox;
  DstList: TORListBox;
  SrcLabel: TLabel;
  DstLabel: TLabel;
  pnlBase: TPanel;
  btnRemoveSigners: TButton;
  lblAuthor: TOROffsetLabel;
  cboCosigner: TORComboBox;
  lblCosigner: TOROffsetLabel;
  txtAuthor: TCaptionEdit;
  pnlAdditional: TORAutoPanel;
  pnlButtons: TORAutoPanel;
  pnlTop: TORAutoPanel;
  btnAddSigners: TButton;
  btnRemoveAllSigners: TButton;
  procedure btnAddSignersClick(Sender: TObject);
  procedure NewPersonNeedData(Sender: TObject; const StartFrom: String;
    Direction, InsertAt: Integer);
  procedure cmdOKClick(Sender: TObject);
  procedure cmdCancelClick(Sender: TObject);
  procedure btnRemoveSignersClick(Sender: TObject);
  procedure FormCreate(Sender: TObject);
  procedure FormDestroy(Sender: TObject);
  procedure cboCosignerChange(Sender: TObject);
  procedure cboSrcListKeyDown(Sender: TObject; var Key: Word;
    Shift: TShiftState);
  procedure cboCosignerNeedData(Sender: TObject; const StartFrom: String;
    Direction, InsertAt: Integer);
  procedure cboCosignerExit(Sender: TObject);
  procedure DstListChange(Sender: TObject);
  procedure btnRemoveAllSignersClick(Sender: TObject);
  procedure cboSrcListChange(Sender: TObject);
private
  FSigners: TStringList ;
  FCosigner: int64;
  FExclusions: TStringList;
  FSigAction: integer;
  FChanged: Boolean;
  FNoteIEN: integer;
  FRefDate: TFMDateTime;
  FToday: string;
  FTabID: integer;
  function CosignerOK: Boolean;
  
end;

DFM Objects


frmAddlSigners : TfrmAddlSigners
 ├pnlBase : TPanel
 │ ├pnlButtons : TORAutoPanel
 │ │ ├cmdOK : TButton
 │ │ └cmdCancel : TButton
 │ ├pnlAdditional : TORAutoPanel
 │ │ ├SrcLabel : TLabel
 │ │ ├DstLabel : TLabel
 │ │ ├cboSrcList : TORComboBox
 │ │ ├DstList : TORListBox
 │ │ ├btnRemoveSigners : TButton
 │ │ ├btnAddSigners : TButton
 │ │ └btnRemoveAllSigners : TButton
 │ └pnlTop : TORAutoPanel
 │   ├lblAuthor : TOROffsetLabel
 │   ├lblCosigner : TOROffsetLabel
 │   ├cboCosigner : TORComboBox
 │   └txtAuthor : TCaptionEdit
 └amgrMain : TVA508AccessibilityManager

Class Hierarchy


Class Fields

Name Type Scope Comments
btnAddSigners TButton Public/Published -
btnRemoveAllSigners TButton Public/Published -
btnRemoveSigners TButton Public/Published -
cboCosigner TORComboBox Public/Published -
cboSrcList TORComboBox Public/Published -
cmdCancel TButton Public/Published -
cmdOK TButton Public/Published -
DstLabel TLabel Public/Published -
DstList TORListBox Public/Published -
FChanged Boolean Private -
FCosigner Int64 Private -
FExclusions TStringList Private -
FNoteIEN Integer Private -
FRefDate TFMDateTime Private -
FSigAction Integer Private -
FSigners TStringList Private -
FTabID Integer Private -
FToday UnicodeString Private -
lblAuthor TOROffsetLabel Public/Published -
lblCosigner TOROffsetLabel Public/Published -
pnlAdditional TORAutoPanel Public/Published -
pnlBase TPanel Public/Published -
pnlButtons TORAutoPanel Public/Published -
pnlTop TORAutoPanel Public/Published -
SrcLabel TLabel Public/Published -
txtAuthor TCaptionEdit Public/Published -

Methods

Name Declaration Scope Comments
btnAddSignersClick procedure btnAddSignersClick(Sender: TObject); Public/Published -
btnRemoveAllSignersClick procedure btnRemoveAllSignersClick(Sender: TObject); Public/Published -
btnRemoveSignersClick procedure btnRemoveSignersClick(Sender: TObject); Public/Published -
cboCosignerChange procedure cboCosignerChange(Sender: TObject); Public/Published -
cboCosignerExit procedure cboCosignerExit(Sender: TObject); Public/Published -
cboCosignerNeedData procedure cboCosignerNeedData(Sender: TObject; const StartFrom: String; Direction, InsertAt: Integer); Public/Published -
cboSrcListChange procedure cboSrcListChange(Sender: TObject); Public/Published -
cboSrcListKeyDown procedure cboSrcListKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); Public/Published -
cmdCancelClick procedure cmdCancelClick(Sender: TObject); Public/Published -
cmdOKClick procedure cmdOKClick(Sender: TObject); Public/Published -
CosignerOK function CosignerOK: Boolean; Private -
DstListChange procedure DstListChange(Sender: TObject); Public/Published -
FormCreate procedure FormCreate(Sender: TObject); Public/Published -
FormDestroy procedure FormDestroy(Sender: TObject); Public/Published -
NewPersonNeedData procedure NewPersonNeedData(Sender: TObject; const StartFrom: String; Direction, InsertAt: Integer); Public/Published -

Referenced By (2)

Module (line) Referrer Type
fAddlSigners (95) - Read
fAddlSigners (98) - Read