Index

Package: Ked

Description

package Game_Views.Ked is

Classes

Ked_View

type Ked_View is new Game_View with private;

Ancestors:

Primitive operations:

Delete (overriding Game_Views.Delete)
Do_Dialog_Action
Do_Dialog_Action
Events.Listeners.To_String (Inherited)
Game_Views.Construct (Inherited)
Game_Views.Get_Process_Name (Inherited)
Game_Views.Handle_Close_Request (Inherited)
Game_Views.Handle_Loading (Inherited)
Game_Views.Handle_Paused (Inherited)
Game_Views.Start_View (Inherited)
Game_Views.Stop_View (Inherited)
Game_Views.Tick (Inherited)
Handle_Close_Request
Handle_Event (overriding Game_Views.Handle_Event)
Handle_Paused
Objects.To_String (Inherited)
Set_Filename
Set_Gridsnap
Set_Modified
Start_View
Stop_View
Toggle_Palette
Update_Win_Title

Types

Dialog_Action

type Dialog_Action is ( DA_None, DA_New, DA_Open, DA_Import, DA_Quit, DA_Save );

A_Ked_View

type A_Ked_View is access all Ked_View'Class;

Subprograms & Entries

Do_Dialog_Action

procedure Do_Dialog_Action
( this: access Ked_View;
action: Dialog_Action;
saveChanges: Boolean );
Performs a dialog action. If the world has been modified and saveChanges is True, the dialog action will be postponed and the Save Changes confirmation dialog will be shown first.

Do_Dialog_Action

procedure Do_Dialog_Action
( this: access Ked_View;
saveChanges: Boolean );
Performs the previously requested dialog action, or nothing if one hasn't been requested yet. If saveChanges is true then changes will be saved before performing the dialog action if the current world has a filename. If the world doesn't have a filename, the previously requested dialog action will be postponed and the save world dialog will be shown first.

Get_Filename

function Get_Filename
( this: not null access Ked_View'Class ) return String;
Returns the filename of the currently open world.

Save_World

procedure Save_World
( this: access Ked_View;
filename: String );
Raises an exception on error.