Path: news.cs.au.dk!Morten.Grouleff.Mjolner.Informatics
From: Morten Grouleff <morten.grouleff@mjolner.dk>
Newsgroups: comp.lang.beta
Subject: Re: Værsgo' le jer ihjel ...
Date: 07 Nov 2000 12:52:20 +0100
Organization: Mjolner Informatics.
Lines: 66
Sender: mg@noatun
Message-ID: <yz966m06lu3.fsf@mjolner.dk>
References: <8u8pn0$65mgq$1@gjallar.cs.au.dk>
NNTP-Posting-Host: bifrost.mjolner.dk
Mime-Version: 1.0
Content-Type: text/plain; charset=iso-8859-1
Content-Transfer-Encoding: 8bit
X-Trace: gjallar.cs.au.dk 973597940 6481901 130.225.8.27 (7 Nov 2000 11:52:20 GMT)
X-Complaints-To: usenet@cs.au.dk
NNTP-Posting-Date: Tue, 7 Nov 2000 11:52:20 +0000 (UTC)
User-Agent: Gnus/5.0803 (Gnus v5.8.3) Emacs/20.5
Xref: news.cs.au.dk comp.lang.beta:12630

Atle <trollet@skynet.be> writes:

[...]

> I now have to generate diagnoses from my symptom selection, but my main.bet is getting crowded, and also, I wanted a new window for
> this.
> 
> So I started up a new file with ORIGIN in guienv like this
> 
> -- Lib : Attributes --
> 
> Diagnosis : GUIenv
> (#
> 	...
> 
> 	(* New menus, 
> 	new TextScrollLists 
> 	and stuff here *)
> #)

You should have only one pattern with the GUIEnv prefix in your program.
In the above case, the proper prefix is probably Window.

One way to do this is this:

winlib1.bet:

ORIGIN '~beta/guienv/guienv';
INCLUDE '~beta/guienv/controls';
-- guienvLib: attributes --
MyWindow1: Window
(#
    Ok: @pushButton
    ....
#)

winlib2.bet:

ORIGIN '~beta/guienv/guienv';
INCLUDE '~beta/guienv/controls';
-- guienvLib: attributes --
MyWindow2: Window
(#
    Cancel: @pushButton
    ....
#)


myprogram.bet:
ORIGIN '~beta/guienv/guienv';
-- program:descriptor --
GUIEnv
(#
 win1: @MyWindow1;
 win2: @MyWindow2;

do win1.open;
#)

To switch between the two, try "win1.hide; win2.show" once they've both
been opened.

-- 
Morten Grouleff,  M.Sc.,  Software Engineer,  Mjølner Informatics.
Phone: +45 70274343.  Fax: +45 70274344
Web: <http://www.mjolner.com>