[Элементы GUI] Разный и не применяется размер шрифта на кнопках

GUICreate("Быстрый запуск",480,250)
GUISetFont(19,400)

$ButtonS4=GUICtrlCreateButton ("Уд. стататические маршруты", 200,110,110,25,BitOR($BS_CENTER, $BS_MULTILINE))
GUICtrlSetFont(-1,8,400)
$ButtonS5=GUICtrlCreateButton ("Восстановить host", 200,140,110,25,BitOR($BS_CENTER, $BS_MULTILINE))
GUICtrlSetFont(-1,8,400)

$ButtonS4=GUICtrlCreateButton ("", 200,110,110,25,BitOR($BS_CENTER, $BS_MULTILINE))
;GUICtrlSetFont(-1,8,400)
 $aSize = _StringSize("Уд. стататические маршруты")
GUICtrlSetData($ButtonS4, $aSize[0])

#include <GUIConstantsEx.au3>
#include 'StringSize.au3'

Dim $aFont[5] = [4, 'Arial', 'Tahoma', 'Courier New', 'Comic Sans MS']
Dim $aSize[5] = [4, 9, 12, 10, 15]
Dim $aWeight[3] = [2, 400, 600]
$sText = ''

$hGUI = GUICreate('String Sizing Test', 500, 200)
$iRandom = Random(5, 20, 1)
ConsoleWrite('$iRandom: ' & $iRandom * 2 & @LF)
For $j = 1 To $iRandom
	$sText &= Chr(Random(65, 90, 1)) ;A-Z
	$sText &= Chr(Random(97, 122, 1)) ;a-z
Next
$iSize = $aSize[Random(1, 4, 1)]
ConsoleWrite('$iSize: ' & $iSize & @LF)
$iWeight = $aWeight[Random(1, 2, 1)]
ConsoleWrite('$iWeight: ' & $iWeight & @LF)
$sFont = $aFont[Random(1, 4, 1)]
ConsoleWrite('$sFont: ' & $sFont & @LF)
$aStringSize = _StringSize($sText, $iSize, $iWeight, 0, $sFont, 0, $hGUI)
$iX = Int((500 - Int($aStringSize[2] * 1.1)) / 2)
$nButton = GUICtrlCreateButton($aStringSize[0], $iX, 50, Int($aStringSize[2] * 1.1), $aStringSize[3])
GUICtrlSetFont(-1, $iSize, $iWeight, 0, $sFont)
GUISetState()
While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $nButton
			MsgBox(64, 'Info', 'Click')
	EndSwitch
WEnd