Database Search

TechHome

• Check for Window Containing Specific Text
• Disable Menu Items on Windows
• Get and Save Window Position
• Get EXE Path of the Active Window
• UDF - Center Window
• UDF - HideShow MinMax buttons
• UDF - WinWaitListExist
• udfEnumDisplayMonitors
• udfWinTitleHide
• Wait on Multiple Windows
• WFndWnd function emulation
• WinStyleTest UDF
• WinWaitListExist UDF

Can't find the information you are looking for here? Then leave a message over on our WinBatch Tech Support Forum.

udfWinTitleHide

 Keywords: WinTitle Window Message Title TitleBar Hide Remove Delete  

Sample one:

#DefineFunction udfWinTitleHide( WindowTitle )
   ;Hide Title Bar, set to noswap/nomove
   DlgName=DllHwnd(WindowTitle)
   WS_CAPTION=12582912 ;12582912 Hex 00C00000 (Search MSDN for Q111011 for more parameter values)
   GWL_STYLE=-16
   SWP_FRAMECHANGED   =   32
   HWND_TOP   =   0
   SWP_NOMOVE   =   2
   SWP_NOSIZE   =   1
   User32=StrCat(DirWindows(1),"USER32.DLL")
   OldStyle=DllCall(User32, long:"GetWindowLongA", long:DlgName, long:GWL_STYLE)
   NewStyle=OldStyle & ~WS_CAPTION
   DllCall(User32, long:"SetWindowLongA", long:DlgName, long:GWL_STYLE, long:NewStyle)
   DllCall(User32, long:"SetWindowPos", long:DlgName, long:HWND_TOP, long:0, long:0, long:0, long:0, long:SWP_FRAMECHANGED|SWP_NOMOVE|SWP_NOSIZE)
   Return 1
#EndFunction

title = 'Monitor'
WinTitle( '', title )

;Remove title bar before displaying box
udfWinTitleHide( title )

; Define Background
BoxColor( 1, '255,255,255', 4 )
BoxDrawRect( 1, '0,0,1000,1000', 2 )

;Define Text
BoxTextColor(1,'255,255,255')
BoxDrawText(1, '0,0,1000,1000', 'No Title Example', @TRUE , 1|4)

;Display Box
BoxesUp('0,0,1000,100', @NORMAL)
TimeDelay(1)
Exit

Sample Two:

#DefineFunction udfWinTitleHide( WindowTitle )
   ;Hide Title Bar, set to noswap/nomove
   DlgName=DllHwnd(WindowTitle)
   WS_CAPTION=12582912 ;12582912 Hex 00C00000 (Search MSDN for Q111011 for more parameter values)
   GWL_STYLE=-16
   SWP_FRAMECHANGED   =   32
   HWND_TOP   =   0
   SWP_NOMOVE   =   2
   SWP_NOSIZE   =   1
   User32=StrCat(DirWindows(1),"USER32.DLL")
   OldStyle=DllCall(User32, long:"GetWindowLongA", long:DlgName, long:GWL_STYLE)
   NewStyle=OldStyle & ~WS_CAPTION
   DllCall(User32, long:"SetWindowLongA", long:DlgName, long:GWL_STYLE, long:NewStyle)
   DllCall(User32, long:"SetWindowPos", long:DlgName, long:HWND_TOP, long:0, long:0, long:0, long:0, long:SWP_FRAMECHANGED|SWP_NOMOVE|SWP_NOSIZE)
   Return 1
#EndFunction


title = '~Notepad'

Run( 'Notepad.exe', '' )
WinWaitExist(title, 5)

;Remove title bar
udfWinTitleHide( title )
Pause('udfWinTitleHide','Title has been removed! Choose the menu File|Exit to close')
Exit

Article ID:   W18420

Filename:   udfWinTitleHide.txt

File Created: 2010:12:09:12:33:48

Last Updated: 2010:12:09:12:33:48