` How to take over whole screen (Ole-Morton Heien ) - Icetips Article
Icetips - Templates, Tools & Utilities for Clarion Developers

Templates, Tools and Utilities
for Clarion Developers

Icetips Article

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

Par2: How to take over whole screen
2003-06-29 -- Ole-Morton Heien
 
Globall embed: Inside The Global Map Module('User32.dll') SetWindowPos(LONG,LONG,SIGNED,SIGNED,SIGNED,SIGNED,LONG),BOOL,PASCAL GetWindowLong(LONG,SIGNED),LONG,PASCAL,NAME('GetWindowLongA') SetWindowLong(LONG,SIGNED,LONG),LONG,PASCAL,NAME('SetWindowLongA') End In INIT of the frame right after opening the window: OrgStyle# = GetWindowLong(0{PROP:Handle},-16) OrgStyle# = BXOR(OrgStyle#,0C00000H) NewStyle# = SetWindowLong(0{PROP:Handle},-16,OrgStyle#) r# = SetWindowPos(0{PROP:Handle},0,0,,,24h) To find Max values i guess you can first do a 0{PROP:Maximized} = True and use the API GetWindowPos to read the Window size. Dont use GetPosition(0,X,Y,W,H) because if you uses toolbars the WindowSize is redused. Using GetWindowPos will give you the correct size. Bjarne Havnen notes: Just remove MDI from the window and set to maximize if it is not calling any MDI procedures.


Today is April 19, 2024, 3:16 am
This article has been viewed 35116 times.



Back to article list   Search Articles   Add Comment   Printer friendly

Login

User Name:

Password: