AminetAminet
Search:
84473 packages online
About
Recent
Browse
Search
Upload
Setup
Services

util/shell/FakeClose.lha

Mirror:Random
Showing:ppc-morphosgeneric
No screenshot available
Short:Fake pressing the close-gadget
Author:Maos at netwow.com (Mårten Olsson)
Uploader:Maos netwow com (Mårten Olsson)
Type:util/shell
Version:1.0
Architecture:m68k-amigaos
Required:Dos.library version 36
Date:1999-12-09
Download:http://aminet.net/util/shell/FakeClose.lha - View contents
Readme:http://aminet.net/util/shell/FakeClose.readme
Downloads:1459

This little tool fakes pressing the close-gadget of a window and pressing a
gadget
in the requester that pops up. By default this is set to correspond to what is
needed to close the workbench (but you have make it possible for the workbench
to
close, otherwise it will just "beep" you (workbench that is, not my program)),
but
this can be changed by giving it the name of the window to "close" the name of
the
requester-window and the text in the "ok"-button. One little problem is that
it take the first window it can find with this name (even if it's on another
screen).

I take NO responsibility for this program at all.

Technically it looks in IntuitionBase->FirstScreen, checks the screens
->FirstWindow
entry and goes thru the window ->NextWindow comparing the given title with the
windows
->Title. If it is not found on the first screen it looks in the screens
->NextScreen.
Creates a fake IntuiMessage of class IDCMP_CLOSEWINDOW and send to the windows
userports,
and then waits for the Reply. Then makes a second search for the requester name.
Goes
in the windows ->FirstGadget and goes thru the list via ->NextGadget, and
compares the
given button text with ->GadgetText->IText. Then send a new faked IntuiMessage
of class
GADGETDOWN. Wait for reply and quits.

I relly have tried to make it so harmless I can but it's not perfect.


Contents of util/shell/FakeClose.lha
 PERMSSN    UID  GID    PACKED    SIZE  RATIO     CRC       STAMP          NAME
---------- ----------- ------- ------- ------ ---------- ------------ -------------
[generic]                13012   30028  43.3% -lh5- 2749 Dec  8  1999 FakeClose
[generic]                  784    1536  51.0% -lh5- dc7e Dec  8  1999 FakeClose.readme
---------- ----------- ------- ------- ------ ---------- ------------ -------------
 Total         2 files   13796   31564  43.7%            Dec  9  1999

Aminet © 1992-2024 Urban Müller and the Aminet team. Aminet contact address: <aminetaminet net>