Hallo!
Bis auf das letzte alle gelöst, indem ich die Font früher gesetzt habe.
C
#cs ----------------------------------------------------------------------------
AutoIt Version: 3.2.0.1
Author: Dr.Galvany
Script Function:
Template AutoIt script.
#ce ----------------------------------------------------------------------------
Func Terminate()
Exit
EndFunc ;==>Terminate
Opt("TrayIconDebug", 1) ;0=no info, 1=debug line info
Opt("WinTitleMatchMode", 1) ;1=start, 2=subStr, 3=exact, 4=...
HotKeySet("{ESC}", "Terminate")
; Script Start - Add your code below here
#include <GUIConstants.au3>
$Form1 = GUICreate("Chemie-Rechner", 429, 277, 447, 290)
GUISetFont(10, 400, 0, "MS Sans Serif")
GUISetBkColor(0xA6CAF0)
$Input1 = GUICtrlCreateInput("Liter", 77, 112, 81, 24, BitOR($ES_CENTER,$ES_AUTOHSCROLL), BitOR($WS_EX_CLIENTEDGE,$WS_EX_STATICEDGE))
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
GUICtrlCreateLabel("Badvolumen", 72, 80, 94, 20)
GUICtrlSetColor(-1, 0x800080)
GUICtrlSetBkColor(-1, 0xA6CAF0)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUICtrlSetData(-1, "Badvolumen")
$Ergebniss = GUICtrlCreateGroup("Ergebnis", 160, 184, 105, 41, $BS_CENTER)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
GUICtrlSetBkColor(-1, 0xA6CAF0)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateLabel("Konzentrationsberechnungen", 82, 16, 280, 28)
GUICtrlSetFont(-1, 14, 800, 4, "MS Sans Serif")
GUICtrlSetColor(-1, 0x0000FF)
GUICtrlSetBkColor(-1, 0xA6CAF0)
GUICtrlCreateLabel("by Dr.Galvany", 350, 258, 80, 17)
GUICtrlSetFont(-1, 4, 400, 0, "MS Sans Serif")
GUICtrlSetBkColor(-1, 0xA6CAF0)
$Start = GUICtrlCreateButton("Start", 48, 192, 73, 33, 0)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$Exit = GUICtrlCreateButton("Exit", 304, 192, 73, 33, 0)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
GUICtrlCreateLabel("Ansatz", 280, 64, 50, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0x800080)
GUICtrlSetBkColor(-1, 0xA6CAF0)
$Combo1 = GUICtrlCreateCombo("HCL", 248, 128, 113, 24, -1, $WS_EX_STATICEDGE)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
GUICtrlSetData(-1,"item2|item3","HCL")
$Combo2 = GUICtrlCreateCombo("31%", 256, 96, 97, 24, -1, $WS_EX_STATICEDGE)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
GUICtrlSetData(-1,"item2|item3","31%")
GUISetState(@SW_SHOW)
While 1
$msg = GuiGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = $Exit
ExitLoop
Case Else
;;;;;;;
EndSelect
WEnd
Exit
Alles anzeigen
peethebee
p.s. Bist ja ein ganz schöner Fremdposter, Dr.Galvany ![]()