Path: news.cs.au.dk!news.net.uni-c.dk!newsfeed1.uni2.dk!newsfeed.tli.de!main.de.uu.net!news-reader.dortmund.de.uu.net!not-for-mail
From: "Sascha Kimmel" <kimmel@tricos.com>
Newsgroups: comp.lang.beta
Subject: Re: @Window in SLOTS ?
Date: 23 Feb 1999 09:50:20 GMT
Organization: Customer of UUNET Deutschland GmbH, Dortmund, Germany
Lines: 75
Message-ID: <7attks$i47$1@goof.de.uu.net>
References: <7aort6$p1k$1@sun579.rz.ruhr-uni-bochum.de> <yz9lnhptrkk.fsf@grouleff.dk>
NNTP-Posting-Host: 193.96.182.58
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Xref: news.cs.au.dk comp.lang.beta:11839

Morten Grouleff <mg@mjolner.dk> schrieb in Nachricht
yz9lnhptrkk.fsf@grouleff.dk...///
>"Sascha Kimmel" <webmaster@tricos.com> writes:
>
>> I have some windows which I want to use in further programs, too.
>> For example:
>>
>> win:@window
>> (#
>> open:(# do '100,200)->size; 'TESTwindow'->title; #);
>>
>> Cancel:@pushButton:(# ... #);
>> ...
>> #);
>>
>> How I can use the fragment language to implement this functionality?
>> If I use Lib: Attributes, I tried using SLOT Descriptor, Attributes,
DoPart
>> but none did work the right way.
>
>You cannot have instances in Lib slots.

That is what the BETA compiler said, too :)

>I'm not quite sure I understand your problem.  Is your problem that you
>have multiple windows that communicate, e.g. opening each other, setting
>contents of fields, and such?

This would be a nice feature.
But I would like to have a lib with standard windows, e.g. a LIB containing
an ABOUT-window, whose contents are generated dynamically. In such a way as
I can use noteUser, AlertUser and so on.
An example:

ORIGIN '....guienv';
INCLUDE 'aboutwindow';

guienv
(#
        MyAboutWindow : AboutWindow
        (#
            do
            'About Testprogram'->title;
            '1.0'->version;

            [...]
        #);

    do MyAboutWindow.open;

#);

>
>You could declare them as patterns in the guienvLib slot.
>
>loginWindow: window(# status: ^statusWindow; ... #);
>statusWindow: window(# other: ^otherWindow; ... #);
>otherWindow: window(# ... #);
>
>In your program:descriptor, instantiate the windows you need and assign
>references to the others to local references in them.

Could you please give me an example of that?

>
>Does that help solve your problem?

Partially, I think.
Thank your for your quick help!

Regards,
S. Kimmel