File: cmode.sru
Size: 483
Date: Mon, 07 Apr 2008 21:32:51 +0200
$PBExportHeader$cmode.sru
forward
global type cmode from nonvisualobject
end type
end forward

global type cmode from nonvisualobject
end type
global cmode cmode

type variables
Public:
CONSTANT long UNSET = -1
CONSTANT long NORMAL = 0
CONSTANT long EDIT = 1
CONSTANT long ERROR = 2
end variables
on cmode.create
call super::create
TriggerEvent( this, "constructor" )
end on

on cmode.destroy
TriggerEvent( this, "destructor" )
call super::destroy
end on

  • nonvisualobject cmode(sru)