Class

TVitalEdit

Module

uDlgComponents

Last Modified

7/15/2014 3:26:44 PM

Scope

Interfaced

Inherits from

TEdit

Declaration


TVitalEdit = class(TEdit, ICPRSDialogComponent)
private
  FLinkedCombo: TVitalComboBox;
  FCPRSDialogInfo: ICPRSDialogComponent;
public
  constructor Create(AOwner: TComponent); override;
  destructor Destroy; override;
  property CPRSDialogData: ICPRSDialogComponent read FCPRSDialogInfo implements ICPRSDialogComponent;
  property LinkedCombo: TVitalComboBox read FLinkedCombo write FLinkedCombo;
end;

Class Hierarchy


Class Fields

Name Type Scope Comments
FCPRSDialogInfo Private -
FLinkedCombo TVitalComboBox Private -

Properties

Name Type Scope Comments
CPRSDialogData Public -
LinkedCombo TVitalComboBox Public -

Constructors

Name Declaration Scope Comments
Create constructor Create(AOwner: TComponent); override; Public TVitalEdit

Destructors

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

Referenced By (9)

Module (line) Referrer Type
uDlgComponents (204) TVitalComboBox Read
uDlgComponents (210) TVitalComboBox Read
uReminders (694) - Read
uReminders (4110) - Read
uReminders (6593) - Read
uReminders (6595) - Read
uReminders (6726) - Read
uReminders (6731) - Read
uReminders (6733) - Read