Class

TPRFActions

Module

fNoteProps

Last Modified

7/15/2014 3:26:38 PM

Comments

This object holds a List of Actions as Returned VIA the RPCBroker

Scope

Interfaced

Inherits from

TObject

Declaration


TPRFActions = class(TObject)
private
  FPRFActionList : TStringList;
public
  //procedure to show the Action in a ListView, requires a listview parameter
  procedure ShowActionsOnList(DisplayList : TCaptionListView);
  //procedure to load the actions, this will call the RPC
  procedure Load(TitleIEN : Int64; DFN : String);
  //returns true if the Action at the Index passed is associated with a note
  function SelActionHasNote(lstIndex : integer) : boolean;
  //return the Action IEN at the Index passed
  function GetActionIEN(lstIndex : integer) : String;
  //return the PRF IEN at the Index passed
  function GetPRF_IEN(lstIndex : integer) : integer;
  constructor Create();
  destructor Destroy(); override;
end;

Class Hierarchy


TObject
 └TPRFActions

Class Fields

Name Type Scope Comments
FPRFActionList TStringList Private -

Constructors

Name Declaration Scope Comments
Create constructor Create(); Public TPRFActions

Destructors

Name Declaration Scope Comments
Destroy destructor Destroy(); override; Public -

Methods

Name Declaration Scope Comments
GetActionIEN function GetActionIEN(lstIndex : integer) : String; Public Return the Action IEN at the Index passed
GetPRF_IEN function GetPRF_IEN(lstIndex : integer) : integer; Public Return the PRF IEN at the Index passed
Load procedure Load(TitleIEN : Int64; DFN : String); Public Procedure to load the actions, this will call the RPC
SelActionHasNote function SelActionHasNote(lstIndex : integer) : boolean; Public Returns true if the Action at the Index passed is associated with a note
ShowActionsOnList procedure ShowActionsOnList(DisplayList : TCaptionListView); Public Procedure to show the Action in a ListView, requires a listview parameter

Referenced By (2)

Module (line) Referrer Type
fNoteProps (112) TfrmNoteProperties Read
fNoteProps (828) - Read