| |    | 85019 packages online | 
 | 
|  | 
| 
 | 
|  |  |  | | No screenshot available | 
 |  | 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
 | 
 |  | 
|  | 
| Page generated in 0.02 seconds | 
| Aminet © 1992-2024 Urban 
Müller and the Aminet team.
Aminet contact address: <aminet  aminet net> |