Seltsames Problem mit GUISetFont

[autoit]

#include <GUIConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include<Array.au3>
#include <WinAPI.au3>

[/autoit] [autoit][/autoit] [autoit]

Opt("GUICoordMode", 1)
Global $HA = @DesktopHeight -200
Global $VA = @DesktopWidth -800

[/autoit] [autoit][/autoit] [autoit]

Global $Farbe = 0x00BFFF
Global $binfo = "Aktiviere DVB Viewer|Aktiviere Tastatur|Aktiviere Winamp|Aktiviere PowerDVD|Anwendungs-Stop|Shutdown|Reboot|1080p50|1080p24|720p50" ;Buttonbeschriftung für jeden Button mit | getrennt eingeben -> Anzahl der Beschriftungen bestimmt gleichzeitig die Anzahl der Buttons
Global $abfinfo = StringSplit($binfo, '|')
Global $banzahl = $abfinfo[0]
Global $babstandleft = 10 ;Abstand links und rechts zur HauptGUI
Global $babstandtop = 10 ;Abstand zwischen den Buttons
Global $bwidth = $VA - 2* $babstandleft ;Button Left ausrechnen
Global $bheight = $HA / $banzahl - $babstandtop* ($banzahl +1) / $banzahl ;Button Höhe in Abhängigkeit zur Auflösung ausrechnen
Global $HauptGUI = GUICreate("HTPC", $VA, $HA, -1, -1)

[/autoit] [autoit][/autoit] [autoit]

;Buttons erstellen und Button TOP ausrechnen
For $i = 1 to $banzahl
Global $Button = GUICtrlCreateButton($abfinfo[$i], $babstandleft, $i*$babstandtop+ ($i -1)* $bheight, $bwidth, $bheight)
GUISetFont(20)
GUICtrlSetBkColor(-1, $Farbe)
next

[/autoit] [autoit][/autoit] [autoit]

GUISetState(@SW_SHOW, $HauptGUI)

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

While 1

[/autoit] [autoit][/autoit] [autoit]

$msg = GUIGetMsg()
switch $msg
case $GUI_EVENT_Close
Exit
case 3 ;Handle des ersten Buttons
Exit
EndSwitch
WEnd

[/autoit] [autoit][/autoit] [autoit][/autoit]