Database Search

TechHome

	Boxes Examples from Users
	Progress Bars

• Awesome ListBox in Boxes example
• Box - progress bar
• Box Command Stack Full
• Box coordinates
• Box Text Resize Problem
• Box Window with No Caption
• BoxButtonDraw and Font Sizes
• BoxColor in 2nd Box not Full Size
• BoxDataClear and Stack Management
• BoxDrawText with Erase Flag Not Working
• BoxDrawText Wrap
• BoxesUp Width Limitation
• BoxShut and Iconized Name Change
• BoxText Last Error 12000
• Centering BoxesUp and Some General Explanation Too
• Checking Button Status before BoxButtonWait
• Clarification on BoxUpdates Function
• Dialog with Box Functions
• Display a Box While Processing in Background
• Dynamically Create a Box with more than 16 buttons
• FTP Example Script from User
• Green Color Choosing Example
• Have Child Script Update Parent Box
• IntControl 1008 Capture Close Request
• ListBox in BoxesUp - Cool!
• Mixed Screen Colors with Boxes Functions
• Multiple Items and the Boxes Functions Example
• Resize Box to Text Size
• Sample Drawing Program
• Scrolling Status Screen Box
• Scrolling Text
• Txt Alignment in BoxDrawText
• Using Courier Font in Boxes
• Using Other Fonts in Boxes
• Where are the docs for drawing those pretty boxes

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

Box Window with No Caption

Keywords: 	  Box Window with No Caption

WinTitle("", "Linking to FileNET...")

; Remove title bar from main program window

WS_CAPTION=12582912  ; Hex 00C00000  (Search MSDN for Q111011 for more parameter values)
GWL_STYLE=-16
MyWin=DllHwnd("Linking to FileNET...")
User32=StrCat(DirWindows(1),"USER32.DLL")
OldStyle=DllCall(User32, long:"GetWindowLongA", long:MyWin, long:GWL_STYLE)

NewStyle=OldStyle & ~WS_CAPTION
DllCall(User32, long:"SetWindowLongA", long:MyWin, long:GWL_STYLE, long:NewStyle)

BoxColor(1, "200,204,248", 0)
BoxDrawRect(1, "0,0,1000,1000", 1)
BoxTextColor(1, "0,0,0")
BoxDrawText(1, "0,0,1000,1000", "Linking to FileNET...", @TRUE, 5)
BoxesUp("400,420,600,460", @NORMAL)

; Do some processing here (just a delay for this demo)

TimeDelay(8)

; Display the results of processing here (just an example message for this demo)

BoxDestroy(1)
WinTitle("", "Document Title")
Message("Document Title", "The document title is XYZ")

Exit

Article ID:   W14830

File Created: 2001:11:08:12:40:12

Last Updated: 2001:11:08:12:40:12