Class

TRemoteSiteList

Module

uCore

Last Modified

7/15/2014 3:26:44 PM

Scope

Interfaced

Inherits from

TObject

Declaration


TRemoteSiteList = class
private
  FCount: integer;
  FSiteList: TList;
  FRemoteDataExists: Boolean;
  FNoDataReason: string;
public
  constructor Create;
  destructor  Destroy; override;
  procedure   Add(ASite: string);
  procedure   ChangePatient(const DFN: string);
  procedure   Clear;
  property    Count           : integer     read FCount;
  property    SiteList        : TList       read FSiteList;
  property    RemoteDataExists: Boolean     read FRemoteDataExists;
  property    NoDataReason    : string      read FNoDataReason;
end;

Class Hierarchy


TObject
 └TRemoteSiteList

Class Fields

Name Type Scope Comments
FCount Integer Private -
FNoDataReason UnicodeString Private -
FRemoteDataExists Boolean Private -
FSiteList Simple (unknown) Private -

Properties

Name Type Scope Comments
Count Integer Public -
NoDataReason UnicodeString Public -
RemoteDataExists Boolean Public -
SiteList Simple (unknown) Public -

Constructors

Name Declaration Scope Comments
Create constructor Create; Public -

Destructors

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

Methods

Name Declaration Scope Comments
Add procedure Add(ASite: string); Public -
ChangePatient procedure ChangePatient(const DFN: string); Public -
Clear procedure Clear; Public -

Referenced By (2)

Module (line) Referrer Type
fFrame (856) - Read
uCore (397) EmptySaved Read