Autoit.ES

Código: Seleccionar todo

; #FUNCTION# ====================================================================================================================
; Name...........: _GUICtrlButton_Create
; Description ...: Creates a Button control
; Syntax.........: _GUICtrlButton_Create($hWnd, $sText, $iX, $iY, $iWidth, $iHeight[, $iStyle = -1[, $iExStyle = -1]])
; Parameters ....: $hWnd                       - Handle to parent or owner window
;                  $sText                      - Text to add to Button
;                  $iX                         - Horizontal position of the control
;                  $iY                         - Vertical position of the control
;                  $iWidth                     - Control width
;                  $iHeight                    - Control height
;                  $iStyle                     - Control style:
;                  |  $BS_AUTO3STATE      - Creates a three-state check box in which the state cycles through selected, unavailable, and cleared each time the user selects the check box.
;                  |  $BS_AUTOCHECKBOX    - Creates a check box in which the check state switches between selected and cleared each time the user selects the check box.
;                  |  $BS_AUTORADIOBUTTON - Same as a radio button, except that when the user selects it, the button automatically highlights itself and removes the selection from any other radio buttons with the same style in the same group.
;                  |  $BS_FLAT            - Specifies that the button is two-dimensional; it does not use the default shading to create a 3-D image.
;                  |  $BS_GROUPBOX        - Creates a rectangle in which other buttons can be grouped. Any text associated with this style is displayed in the rectangle’s upper-left corner.
;                  |  $BS_PUSHLIKE        - Makes a button (such as a check box, three-state check box, or radio button) look and act like a push button. The button looks raised when it isn't pushed or checked, and sunken when it is pushed or checked.
;                  -
;                  |  $BS_DEFPUSHBUTTON   - Creates a push button with a heavy black border. If the button is in a dialog box, the user can select the button by pressing the ENTER key, even when the button does not have the input focus. This style is useful for enabling the user to quickly select the most likely option, or default.
;                  -
;                  |  $BS_BOTTOM          - Places the text at the bottom of the button rectangle.
;                  |  $BS_CENTER          - Centers the text horizontally in the button rectangle.
;                  |  $BS_LEFT            - Left-aligns the text in the button rectangle on the right side of the check box.
;                  |  $BS_MULTILINE       - Wraps the button text to multiple lines if the text string is too long to fit on a single line in the button rectangle.
;                  |  $BS_RIGHT           - Right-aligns text in the button rectangle on the right side of the check box.
;                  |  $BS_RIGHTBUTTON     - Positions a check box square on the right side of the button rectangle.
;                  |  $BS_TOP             - Places text at the top of the button rectangle.
;                  |  $BS_VCENTER         - Vertically centers text in the button rectangle.
;                  -
;                  |  $BS_ICON            - Specifies that the button displays an icon.
;                  |  $BS_BITMAP          - Specifies that the button displays a bitmap.
;                  -
;                  |  $BS_NOTIFY          - Enables a button to send BN_KILLFOCUS and BN_SETFOCUS notification messages to its parent window. Note that buttons send the BN_CLICKED notification message regardless of whether it has this style. To get BN_DBLCLK notification messages, the button must have the BS_RADIOBUTTON or BS_OWNERDRAW style.
;                  -
;                  |  Vista Sytles:
;                  |    $BS_SPLITBUTTON    - Creates a split button. A split button has a drop down arrow
;                  |    $BS_DEFSPLITBUTTON - Creates a split button that behaves like a $BS_PUSHBUTTON style button, but also has a distinctive appearance.
;                  |    $BS_COMMANDLINK    - Creates a command link button
;                  |    $BS_DEFCOMMANDLINK - Creates a command link button that behaves like a $BS_PUSHBUTTON style button.
;                  -
;                  |Default: ( -1) : none
;                  |Forced : $WS_CHILD, $WS_TABSTOP, $WS_VISIBLE, $BS_NOTIFY
;                  -
;                  $iExStyle    - Control extended style. These correspond to the standard $WS_EX_ constants.
; Return values .: Success      - Handle to the Button control
;                  Failure      - 0
; Author ........: Gary Frost
; Modified.......:
; Remarks .......: Above constants require ButtonConstants.au3
;+
;                  This function is for Advanced users and for learning how the control works.
; Related .......: _GUICtrlButton_Destroy
; Link ..........:
; Example .......: Yes
; ===============================================================================================================================
Func _GUICtrlButton_Create($hWnd, $sText, $iX, $iY, $iWidth, $iHeight, $iStyle = -1, $iExStyle = -1)
	If Not IsHWnd($hWnd) Then
		; Invalid Window handle for _GUICtrlButton_Create 1st parameter
		Return SetError(1, 0, 0)
	EndIf
	If Not IsString($sText) Then
		; 2nd parameter not a string for _GUICtrlButton_Create
		Return SetError(2, 0, 0)
	EndIf

	Local $iForcedStyle = BitOR($__BUTTONCONSTANT_WS_TABSTOP, $__UDFGUICONSTANT_WS_VISIBLE, $__UDFGUICONSTANT_WS_CHILD, $BS_NOTIFY)

	If $iStyle = -1 Then
		$iStyle = $iForcedStyle
	Else
		$iStyle = BitOR($iStyle, $iForcedStyle)
	EndIf
	If $iExStyle = -1 Then $iExStyle = 0
	Local $nCtrlID = __UDF_GetNextGlobalID($hWnd)
	If @error Then Return SetError(@error, @extended, 0)
	Local $hButton = _WinAPI_CreateWindowEx($iExStyle, $__BUTTONCONSTANT_ClassName, $sText, $iStyle, $iX, $iY, $iWidth, $iHeight, $hWnd, $nCtrlID)
	_SendMessage($hButton, $__BUTTONCONSTANT_WM_SETFONT, _WinAPI_GetStockObject($__BUTTONCONSTANT_DEFAULT_GUI_FONT), True)
	Return $hButton
EndFunc   ;==>_GUICtrlButton_Create