Autoit.ES

Código: Seleccionar todo

#include <StaticConstants.au3>

$form = GUICreate("",200,150)
$label = GUICtrlCreateLabel("Texto texto texto",0,0,200,25)
$boton = GUICtrlCreateButton("Centrar",0,50,200,100)
GUISetState()

While 1
	Switch GUIGetMsg()
	Case -3
		Exit
	Case $boton
		if GUICtrlRead($boton) = "Centrar" Then
			GUICtrlSetData($boton,"Izquierda")
			GUICtrlSetStyle($label,$SS_CENTER)
			ContinueLoop
		EndIf
		if GUICtrlRead($boton) = "Izquierda" Then
			GUICtrlSetStyle($label,$SS_LEFT)
			GUICtrlSetData($boton,"Derecha") 
			ContinueLoop
		EndIf
		If GUICtrlRead($boton) = "Derecha" Then
			GUICtrlSetStyle($label,$SS_RIGHT)
			GUICtrlSetData($boton,"Centrar")
			ContinueLoop
		EndIf
	EndSwitch
WEnd