Class

TClinProcTitles

Module

uConsults

Last Modified

7/15/2014 3:26:36 PM

Scope

Interfaced

Inherits from

TObject

Declaration


TClinProcTitles = class
  DfltTitle: Integer;
  DfltTitleName: string;
  ShortList: TStringList;
  constructor Create;
  destructor Destroy; override;
end;

Class Hierarchy


TObject
 └TClinProcTitles

Class Fields

Name Type Scope Comments
DfltTitle Integer Public/Published -
DfltTitleName UnicodeString Public/Published -
ShortList TStringList Public/Published -

Constructors

Name Declaration Scope Comments
Create constructor Create; Public/Published Creates an object to store ClinProc titles so only obtained from server once

Destructors

Name Declaration Scope Comments
Destroy destructor Destroy; override; Public/Published Frees the lists that were used to store the ClinProc titles

Referenced By (2)

Module (line) Referrer Type
rConsults (107) uClinProcTitles Read
rConsults (208) - Read