Alaska Software Inc. - cross button and text mode
Username: Password:
AuthorTopic: cross button and text mode
Atomekcross button and text mode
on Mon, 12 Jul 2010 11:55:01 +0200
hi

is there any way to prohibit close the main window in text mode application 
by cross button?

Tomasz Adamczyk
AUGE_OHRRe: cross button and text mode
on Wed, 14 Jul 2010 15:11:58 +0200
hi,

> is there any way to prohibit close the main window in text mode 
> application by cross button?

oCrt := XbpCrt() :new( oStatic,, {    0, 0 }, 43, 126 )
 not allow to move
   oCrt:move := { | aPos, x, obj | obj:SetPos( { 0, 0 } ) }
 not allow to close "X"
   oCrt:close     := { | mp1, mp2, obj | NIL }
 before :create
   oCrt:create()

greetings by OHR
Jimmy