Class

TGrdLab508Manager

Module

fLabs

Last Modified

7/15/2014 3:26:38 PM

Scope

Interfaced

Inherits from

TVA508ComponentManager

Declaration


TGrdLab508Manager = class(TVA508ComponentManager)
private
  function GetTextToSpeak(sg: TCaptionStringGrid): String;
  function ToBlankIfEmpty(aString : String) : String;
public
  constructor Create; override;
  function GetValue(Component: TWinControl): string; override;
  function GetItem(Component: TWinControl): TObject; override;
end;

Class Hierarchy


Constructors

Name Declaration Scope Comments
Create constructor Create; override; Public TGrdLab508Manager

Methods

Name Declaration Scope Comments
GetItem function GetItem(Component: TWinControl): TObject; override; Public -
GetTextToSpeak function GetTextToSpeak(sg: TCaptionStringGrid): String; Private -
GetValue function GetValue(Component: TWinControl): string; override; Public -
ToBlankIfEmpty function ToBlankIfEmpty(aString : String) : String; Private -

Referenced By (2)

Module (line) Referrer Type
fLabs (205) TfrmLabs Read
fLabs (420) - Read