Database Search

TechHome

• Activate App without Windowname
• Active Window Height and Width in Pixels
• Capturing info from Scrolling Screen
• Center Window Without Resizing
• Change Position of Message and Display Box
• Close all active Windows
• Close all windows of a particular application type
• Detecting Owner or Parent Window
• Distinguish between Two Windows with Same Name
• Explanation of Child Windows
• Figure out parent and child windows
• Figure out when an Untitled Window has Closed
• Find Windows Location on Remote Win95 Machine
• Get Active Child Window
• Get Array of Window Ids With Matching Title
• Get Process ID for Unknown Window Title
• Get the Size of the Active Window
• Get Unknown Windowname
• GetWorkArea Window Resize
• How to get a previously active window
• Hwnd to WinID Function Conversions
• Keep a Window On Top
• Loop Forever until a Window Appears
• Make Message non active window
• Minimize All Windows
• Obtain the Window Class Name
• Probe Windows Code
• Process depending upon Multiple Windows
• Reading Buttons and Child Windows
• Recognize when a Windows Close Box has Ungrayed
• Use WinGetActive to Get Active Window
• WinClose Question
• Window Information EXE Fails to Launch
• Window placement on multi monitor screen
• WinExist and WinWaitClose Problems
• WinIDGet to Handle Changing Window Name
• WinItemize and Dont Show System Hidden Windows
• WinItemize Return Order
• WinPlace on High Resolution Monitor
• WinPlaceGet and WinPlaceSet Negative Values Issue

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

Center Window Without Resizing

 Keywords: WinPlace WinPlaceGet WinPlaceSet WinPosition Center @NoResize No Resize 1000x1000 Width Height Window Position Coordinates X Y Upper Lower

;Center Window Without Resizing
partialwinname = "~Notepad"
Run( 'notepad.exe','')

;Get width and height of window
pos = WinPosition(partialwinname)
ux = ItemExtract(1,pos,",")
uy = ItemExtract(2,pos,",")
lx = ItemExtract(3,pos,",")
ly = ItemExtract(4,pos,",")
width = lx -ux
height = ly - uy

;calculate center based on 1000x1000 virtual screen
centerUX = Int( (1000 - width) / 2.0 )
centerUY = Int( (1000 - height) / 2.0)
centerLY  = centerUX+width
centerLY  = centerUY+height

newpos = centerUX : " " : centerUY : " " : centerLY : " " : centerLY
WinPlaceSet( @NORMAL, partialwinname, newpos )

;Or
;newpos = centerUX : "," : centerUY : "," : @NoResize : "," :  @NoResize
;WinPlace( %newpos%, partialwinname )
Exit

Sample using an array

strWinName = "Untitled - Notepad"
arrCoord = Arrayize (WinPlaceGet (@NORMAL, strWinName), " ")
intLenX = arrCoord[2] - arrCoord[0]
intLenY = arrCoord[3] - arrCoord[1]
intPosX = (1000 - intLenX) / 2
intPosY = (1000 - intLenY) / 2
blnResult = WinPlace (intPosX, intPosY, intPosx + intLenX, intPosY + intLenY, strWinName)

Article ID:   W18457

Filename:   Center Window Without Resizing.txt

File Created: 2012:04:23:09:23:50

Last Updated: 2012:04:23:09:23:50