Index

Package: Events

Description

package Events is

Classes

Event (abstract)

type Event is abstract new Object with private;

Ancestors:

Immediate Children:

Events.Application.Close_Request_Event

Primitive operations:

Construct
Objects.Adjust (Inherited)
Objects.Construct (Inherited)
Objects.Delete (Inherited)
Objects.Object_Read (Inherited)
Objects.Object_Write (Inherited)
To_String (overriding Objects.To_String)

Types

Event_Id

type Event_Id is private;

Event_Type

type Event_Type is private;

Response_Type

type Response_Type is private;

A_Event

type A_Event is access all Event'Class;

Constants & Global variables

Subprograms & Entries

=

function "="
( l, r: Event_Id ) return Boolean;

To_Event_Id

function To_Event_Id
( evtName: String ) return Event_Id;

=

function "="
( l, r: Event_Type ) return Boolean;

Get_Message

function Get_Message
( response: Response_Type ) return String;

Get_Status

function Get_Status
( response: Response_Type ) return Status;

Set_Message

procedure Set_Message
( response: in out Response_Type;
msg: String );

Set_Status

procedure Set_Status
( response: in out Response_Type;
stat: Status );

Get_Name

function Get_Name
( this: not null access Event'Class ) return String;

Get_Id

function Get_Id
( this: not null access Event'Class ) return Event_Id;

Copy

function Copy
( src: A_Event ) return A_Event;

Delete

procedure Delete
( this: in out A_Event );