` Printed Icetips Article

Icetips Article

Par2: Delete minimize button
2005-01-26 -- John Christ III

> How does one get rid of it without losing the X or the window icon?

Global, Before File Declarations:

GWL_STYLE        EQUATE(-16)
WS_MINIMIZEBOX   EQUATE(00020000h)

Inside the Global Map:

MODULE('windows.lib')
  SetWindowLong(ULONG, LONG, LONG), LONG, PASCAL, PROC, |
      NAME('SetWindowLongA')
  GetWindowLong(ULONG, LONG), LONG, PASCAL, |
      NAME('GetWindowLongA')
END

Init, Open the window embed:

SetWindowLong(0{PROP:Handle},                        |
              GWL_STYLE,                             |
              BAND(BXOR(WS_MINIMIZEBOX, 0FFFFFFFFh), |
              GetWindowLong(0{PROP:Handle}, GWL_STYLE)))
DISPLAY

Printed November 21, 2024, 11:47 am
This article has been viewed/printed 35225 times.