IdealGewichtsRechner von KM

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.

;By Ritzelrocker
;Changed by König Mikey

#include <GUIConstants.au3>

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

GENIAL!

du hast so viel von oben kopiert - sogar die leerzeilen!
nichtmal variablen umbenannt... Credits liegen nur bei König Mickey.

Ist cool, dass wenn man 2cm groß ist -88.2 kg wiegen muss

Die GUI ist nun viel ansprechender, allerdings denke ich braucht die nicht
so breit sein.
Da das Idealgewicht nicht vom User eingegeben wird, würde ich für
die Ausgabe ein Label nehmen.

...und nicht vergessen, die Formel überprüfen. [ Plausibilität (2cm) ]

greeting
Frank

Edit:
Dein close Button ist ohne Funktion...
Case $nMsg = $Close
Exit

Und wo für verwendest Du das ExitLoop?

$Zahl1 = ($Zahl - 1000) * 0.9

kann net stimmen.....

Ja Huggy ich habe mich vertippt habe es doch alles geändert was an fehler war

aber wie löst man das problem das der manchmal auf

-zahlen

kommt???

indem man Zu kleine zahlen VERHINDERT!

Nix geht mehr, jetzt is er kaputt.
GUICtrlSetData($Ideal, "" & $Zahl1 & " kg ")

$Ideal ???

Mach doch die GUI mit Koda...

Ja klasse wie soll man die denn verhindern???

Thunder-Man das funtz alles bei mir es gibt keine Probleme und das "$Ideal"
ich hab nur die Variable umbenannt das kann kein Problem bringen.

Ok werd If mal anschauen

Ja klasse denk mal logisch nach??

Ja klasse schau in die Helpfile

Ja klasse, es gibt ne IF <-- funktion!

Zitat

Original von König Mickey
Ja klasse wie soll man die denn verhindern???

If ... then
...Else

Thunder, jetzt hast dus verraten *wein*

Zitat

Original von huggy
Ja klasse denk mal logisch nach??

Ja klasse schau in die Helpfile

Ja klasse, es gibt ne IF <-- funktion!

Warum so ironisch?

@König Mickey
Was hast Du mit der Zeile gemacht?
Baue die mal wieder ein.
Case $nMsg = $GUI_EVENT_CLOSE
Exit

Kleiner Tipp:

If ... < 0 Then
MsgBox(16, "Fehler", "Bitte überprüfen Sie Ihre Eingabe")
Else

Edit2:
Falls Du noch ne Funktion für den Copy Button haben willst,
schaue mal in der Hilfe unter ClipPut

Hi,

If $person=$mann then
; eingabe min. 3, max. 3 zeichen
GUICtrlSetLimit($Eingabe,3,2)
; eingabe min. 2, max. 3 zeichen
Elseif $person=$frau
GUICtrlSetLimit($Eingabe,3,2)
Endif

Ja BugFix ich habe gestern schon mit dem BMI Rechner mich beschäftigt denn ich hatte die selbe Idee wie du.

Aber ich muss erstmal gucken wie ich es machen werde da BMI schwerer ist als das Script oben.

BMI ist auch nicht schwerer als Idealgewicht

Die Formel ist sogar fast einfacher als die oben.
Zu dem gibt es bei dieser Formel kein problem mit Werten <100cm

Eine fertiges programm kopieren und anpassen kann jeder, wie wärs mal mit kompletter eigenentwicklung?

mfg

Ja ich werde denn BMI Rechner doch komplett alleine machen weil er ganz anders wird als das Script.

Also Eigeninitiative.

werd ihn dann reintun wenn er fedig is.

Aber ich weiß noch nicht wie ich die BMI Formel ins Script packen soll so das alles richtig funtz.

Mal en link
http://de.wikipedia.org/wiki/Body-Mass-Index

Tjo mir war grad langweilig hab ich das

"BMI ist auch nicht schwerer als Idealgewicht"

Programm mal gemacht - mit super Koda GUI!