AREXX ZoomWindow

3 posts / 0 new

Last post

Fri, 2015-07-10 05:46

mritter0

Offline

Last seen: 2 years 6 months ago

Joined: 2014-04-21 21:15

AREXX ZoomWindow

I have started adding some ARexx code to my project. ZOOMWINDOW and UNZOOMWINDOW, what are the Intuition calls for these?

ZipWindow() sets it to the "alternate" position. But how I unzoom it? ZipWindow(ZOOM) and ZipWindow(UNZOOM) would be nice.

Fri, 2015-07-10 12:53

broadblues

Offline

Last seen: 4 years 9 months ago

Joined: 2012-05-02 21:48

Well if your arexx function

Well if your arexx function is to imitate the "zoom gadget" then ZOOM and UNZOOM is not meaningful, there is simply ZOOM. It toggles between two alternate states.

Having siad that just to be completely inconsistant with the way the GUI works Workbench has such a function, in it's arexx interface.

What you can do is chack the window flags if the zoom button has been clicked then WINF_ZOOMED is set so in pseudo code your two arexx function would look like

ZOOMWINDOW:

if( ! window->flags & WINF_ZOOMED) ZipWindow(window)

UNZOOMWINDOW:

if( window->flags & WINF_ZOOMED) ZipWindow(window)

IMHO from a script being able to set the window size explicity is far more useful.

Fri, 2015-07-10 17:05

mritter0

Offline

Last seen: 2 years 6 months ago

Joined: 2014-04-21 21:15

That's what I came up with,

That's what I came up with, too. I am just filling out the "basic" functions for now.

if (!MainWindow->Flags & WMF_ZOOMED)
    IIntuition->ZipWindow(MainWindow);
 
if (MainWindow->Flags & WMF_ZOOMED)
    IIntuition->ZipWindow(MainWindow);

Yes, CHANGEWINDOW is really the way to go.

Thanks.

Search form

User login