Delete minimize button (John Christ III )

Icetips Article

Back to article list Search Articles Add Comment Printer friendly Direct link

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

Today is April 25, 2024, 7:19 am
This article has been viewed 35114 times.

Back to article list Search Articles Add Comment Printer friendly

Templates, Tools and Utilities for Clarion Developers
	Home Products Download Documentation Demos Support Articles About Buy ALL PRODUCTS Build Automator Checkbox Fixer Icetips Utilities Magic Buttons Magic Entries Magic Locks OutlookBar Power ToolBar Report Previewer SQL Templates TaskPanel Window Fixer XP Theme Xplore GOLD SUBSCRIPTION SILVER SUBSCRIPTION SOLO SUBSCRIPTION Compare Gold/Silver Products Documentation Demos Free SQL Stuff Other Free Stuff PAR2 files Tips & Tricks - NEW Icetips Blog Icetips News Icetips on Facebook Icetips on Twitter Icetips on Youtube All Articles Search articles Top Ten articles Articles by Category Video tutorials What is Clarion? Support Options Live Support Email & Mail Icetips Blog Icetips on Twitter Gold Subscription Silver Subscription Solo Subscription Recurring Subscription Compare Gold & Silver Renew Your Subscription Multiple Copy Pricing

Templates, Tools and Utilitiesfor Clarion Developers

Icetips Article

Templates, Tools and Utilities
for Clarion Developers