Class

TBAGlobals

Module

UBAGlobals

Last Modified

7/15/2014 3:26:34 PM

Scope

Interfaced

Inherits from

TObject

Declaration


TBAGlobals = class(TObject)
private
   FOrderNum: string;
  protected
public
   constructor Create;
published
   property  OrderNum: string read FOrderNum write FOrderNum;
   procedure AddBAPCEDiag(DiagStr:string);
   procedure ClearBAPCEDiagList;
end;

Class Hierarchy


TObject
 └TBAGlobals

Class Fields

Name Type Scope Comments
FOrderNum UnicodeString Private -

Properties

Name Type Scope Comments
OrderNum UnicodeString Published -

Constructors

Name Declaration Scope Comments
Create constructor Create; Public -

Methods

Name Declaration Scope Comments
AddBAPCEDiag procedure AddBAPCEDiag(DiagStr:string); Published This procedure is called from uPCE.pas only -- do not delete.....
ClearBAPCEDiagList procedure ClearBAPCEDiagList; Published -

Referenced By (1)

Module (line) Referrer Type
UBAGlobals (170) BAGlobals Read