Class

TCPRSDialogComponent

Module

uDlgComponents

Last Modified

7/15/2014 3:26:44 PM

Scope

Interfaced

Inherits from

TInterfacedObject

Declaration


TCPRSDialogComponent = class(TInterfacedObject, ICPRSDialogComponent)
private
  FRequiredField: boolean;
  FComponent: TControl;
  FBeforeText: string;
  FAfterText: string;
  FSRBreak: boolean;
  FComponentName: string;
  FFollowOnCaption: string;
public
  constructor Create(AComponent: TControl; AComponentName: string;
                     FollowOnCaption: string = '');
  function Component: TControl;
  function GetBeforeText: string;
  procedure SetBeforeText(Value: string);
  function GetAfterText: string;
  procedure SetAfterText(value: string);
  function GetRequiredField: boolean;
  procedure SetRequiredField(Value: boolean);
  function AccessText: string;
  function GetSRBreak: boolean;
  procedure SetSRBreak(Value: boolean);
  property BeforeText: string read GetBeforeText write SetBeforeText;
  property AfterText: string read GetAfterText write SetAfterText;
  property SRBreak: boolean read GetSRBreak write SetSRBreak;
  property RequiredField: boolean read GetRequiredField write SetRequiredField;
end;

Class Hierarchy


Class Fields

Name Type Scope Comments
FAfterText UnicodeString Private -
FBeforeText UnicodeString Private -
FComponent TControl Private -
FComponentName UnicodeString Private -
FFollowOnCaption UnicodeString Private -
FRequiredField Boolean Private -
FSRBreak Boolean Private -

Properties

Name Type Scope Comments
AfterText UnicodeString Public -
BeforeText UnicodeString Public -
RequiredField Boolean Public -
SRBreak Boolean Public -

Constructors

Name Declaration Scope Comments
Create constructor Create(AComponent: TControl; AComponentName: string; FollowOnCaption: string = ''); Public -

Methods

Name Declaration Scope Comments
AccessText function AccessText: string; Public -
Component function Component: TControl; Public TCPRSDialogData
GetAfterText function GetAfterText: string; Public -
GetBeforeText function GetBeforeText: string; Public -
GetRequiredField function GetRequiredField: boolean; Public -
GetSRBreak function GetSRBreak: boolean; Public -
SetAfterText procedure SetAfterText(value: string); Public -
SetBeforeText procedure SetBeforeText(Value: string); Public -
SetRequiredField procedure SetRequiredField(Value: boolean); Public -
SetSRBreak procedure SetSRBreak(Value: boolean); Public -

Referenced By (12)

Module (line) Referrer Type
mTemplateFieldButton (118) - Read
uDlgComponents (486) - Read
uDlgComponents (513) - Read
uDlgComponents (527) - Read
uDlgComponents (541) - Read
uDlgComponents (555) - Read
uDlgComponents (570) - Read
uDlgComponents (598) - Read
uDlgComponents (623) - Read
uDlgComponents (645) - Read
uDlgComponents (681) - Read
uDlgComponents (774) - Read