Das Script ist von Ritzelrocker04 aber ich König Mickey habe es verändert weil ich das einfach nicht schön und Komfortable fand.
Deswegen habe ich eine version gemacht die schöner und Komfortabler ist finde ich persönlich.
Vllt sagt ihr auch eure Meinung welches ihr schöner findet wäre echt nettdamit ich en Feedback habe.
Bevor wieder geredet wird, nein ich will nicht angeben oder so ich möchte es halt nur wissen weile die meinung hier im Forum zu so sachen mich intressiert.
[autoit];By Ritzelrocker
;Changed by König Mikey
#include <GUIConstants.au3>
[/autoit][autoit][/autoit][autoit]GUICreate(" iesis IGR v3.0", 320, 130, -1, -1, -1, $WS_EX_TOOLWINDOW)
$meter = GUICtrlCreateLabel ("Deine Größe in cm:", 10, 5, 100 , 20)
$Feld = GUICtrlCreateInput ( "", 10, 20, 300, 20)
GUICtrlSetState(-1,$GUI_ACCEPTFILES)
$Gewicht = GUICtrlCreateLabel ("Dein Idealgewicht:" , 10, 50, 120)
$Zahlen = GUICtrlCreateInput ("", 10, 65, 300, 20)
$Rechne = GUICtrlCreateButton ("Idealgewicht berechnen", 10, 100, 140, 20)
$Close = GUICtrlCreateButton ("Close", 250, 100, 60, 20)
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
If $nMsg <> 0 Then
$Zahl = GUICtrlRead($Feld)
Select
Case $nMsg = $Rechne
If Not StringIsDigit(GUICtrlRead($Feld)) Then
GUICtrlSetData($Ideal, "Bitte nur Zahlen eingeben")
Else
$Zahl1 = ($Zahl - 100) * 0.9
GUICtrlSetData($Ideal, "" & $Zahl1 & " kg ")
EndIf
Case $nMsg = $Close
Exit
EndSelect
EndIf
WEnd