Beiträge von RR04

RR04

Hallo,

jetzt also, ich habe nur die Sample.avi umbenannt in 93.avi. Sollte eigentlich gehen - mehr existiert noch nicht.

Spoiler anzeigen

[autoit]

; AutoIt 3.0.103 example
; 17 Jan 2005 - CyberSlug
; This script shows manual positioning of all controls;
; there are much better methods of positioning...
#include <GuiConstants.au3>

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

; GUI
GuiCreate("Sample GUI", 400, 400)
GuiSetIcon(@SystemDir & "\mspaint.exe", 0)

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

; MENU
GuiCtrlCreateMenu("Menu&One")
GuiCtrlCreateMenu("Menu&Two")
GuiCtrlCreateMenu("MenuTh&ree")
GuiCtrlCreateMenu("Menu&Four")

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

; CONTEXT MENU
$contextMenu = GuiCtrlCreateContextMenu()
GuiCtrlCreateMenuItem("Context Menu", $contextMenu)
GuiCtrlCreateMenuItem("", $contextMenu) ;separator
GuiCtrlCreateMenuItem("&Properties", $contextMenu)

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

; PIC
GuiCtrlCreatePic("logo4.gif",0,0, 169,68)
GuiCtrlCreateLabel("Sample pic", 75, 1, 53, 15)
GuiCtrlSetColor(-1,0xffffff)

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

; AVI
GuiCtrlCreateAvi("93.avi",0, 180, 10, 32, 32, $ACS_AUTOPLAY)
GuiCtrlCreateLabel("Sample avi", 170, 50)

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

; TAB
GuiCtrlCreateTab(240, 0, 150, 70)
GuiCtrlCreateTabItem("One")
GuiCtrlCreateLabel("Sample Tab with tabItems", 250, 40)
GuiCtrlCreateTabItem("Two")
GuiCtrlCreateTabItem("Three")
GuiCtrlCreateTabItem("")

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

; COMBO
GuiCtrlCreatecombo("Sample Combo", 250, 80, 120, 100)

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

; PROGRESS
GuiCtrlCreateProgress(60, 80, 150, 20)
GuiCtrlSetData(-1, 60)
GuiCtrlCreateLabel("Progress:", 5, 82)

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

; EDIT
GuiCtrlCreateEdit(@CRLF & " Sample Edit Control", 10, 110, 150, 70)

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

; LIST
GuiCtrlCreateList("", 5, 190, 100, 90)
GuiCtrlSetData(-1, "a.Sample|b.List|c.Control|d.Here", "b.List")

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

; ICON
GuiCtrlCreateIcon("shell32.dll", 1, 175, 120)
GuiCtrlCreateLabel("Icon", 180, 160, 50, 20)

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

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

; GROUP WITH RADIO BUTTONS
GuiCtrlCreateGroup("Sample Group", 230, 120)
GuiCtrlCreateRadio("Radio One", 250, 140, 80)
GuiCtrlSetState(-1, $GUI_CHECKED)
GuiCtrlCreateRadio("Radio Two", 250, 165, 80)
GUICtrlCreateGroup ("",-99,-99,1,1) ;close group

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

; UPDOWN
GuiCtrlCreateLabel("UpDown", 350, 115)
GuiCtrlCreateInput("42", 350, 130, 40, 20)
GuiCtrlCreateUpDown(-1)

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

; LABEL
GuiCtrlCreateLabel("Green" & @CRLF & "Label", 350, 165, 40, 40)
GuiCtrlSetBkColor(-1, 0x00FF00)

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

; SLIDER
GuiCtrlCreateLabel("Slider:", 235, 215)
GuiCtrlCreateSlider(270, 210, 120, 30)
GuiCtrlSetData(-1, 30)

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

; INPUT
GuiCtrlCreateInput("Sample Input Box", 235, 255, 130, 20)

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

; DATE
GuiCtrlCreateDate("", 5, 280, 200, 20)
GuiCtrlCreateLabel("(Date control expands into a calendar)", 10, 305, 200, 20)

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

; BUTTON
GuiCtrlCreateButton("Sample Button", 10, 330, 100, 30)

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

; CHECKBOX
GuiCtrlCreateCheckbox("Checkbox", 130, 335, 80, 20)
GuiCtrlSetState(-1, $GUI_CHECKED)

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

; TREEVIEW ONE
$treeOne = GuiCtrlCreateTreeView(210, 290, 80, 80)
$treeItem = GuiCtrlCreateTreeViewItem("TreeView", $treeOne)
GuiCtrlCreateTreeViewItem("Item1", $treeItem)
GuiCtrlCreateTreeViewItem("Item2", $treeItem)
GuiCtrlCreateTreeViewItem("Foo", -1)
GuiCtrlSetState($treeItem, $GUI_EXPAND)

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

; TREEVIEW TWO
$treeTwo = GuiCtrlCreateTreeView(295, 290, 103, 80, $TVS_CHECKBOXES)
GuiCtrlCreateTreeViewItem("TreeView", $treeTwo)
GuiCtrlCreateTreeViewItem("With", $treeTwo)
GuiCtrlCreateTreeViewItem("tvs_checkboxes", $treeTwo)
GuiCtrlSetState(-1, $GUI_CHECKED)
GuiCtrlCreateTreeViewItem("Style", $treeTwo)

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

; GUI MESSAGE LOOP
GuiSetState()
While GuiGetMsg() <> $GUI_EVENT_CLOSE
WEnd

[/autoit]

Schönes WE und
Danke
Euer Ritzelrocker04

RR04

Hallo Mignon,

die Avi-Datei ist ja schon da (Ritzelrocker04.avi).
Als Script habe ich bisher immer die Vorlage benutzt.

Spoiler anzeigen

[autoit]

; AutoIt 3.0.103 example
; 17 Jan 2005 - CyberSlug
; This script shows manual positioning of all controls;
; there are much better methods of positioning...
#include <GuiConstants.au3>

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

; GUI
GuiCreate("Sample GUI", 400, 400)
GuiSetIcon(@SystemDir & "\mspaint.exe", 0)

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

; MENU
GuiCtrlCreateMenu("Menu&One")
GuiCtrlCreateMenu("Menu&Two")
GuiCtrlCreateMenu("MenuTh&ree")
GuiCtrlCreateMenu("Menu&Four")

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

; CONTEXT MENU
$contextMenu = GuiCtrlCreateContextMenu()
GuiCtrlCreateMenuItem("Context Menu", $contextMenu)
GuiCtrlCreateMenuItem("", $contextMenu) ;separator
GuiCtrlCreateMenuItem("&Properties", $contextMenu)

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

; PIC
GuiCtrlCreatePic("logo4.gif",0,0, 169,68)
GuiCtrlCreateLabel("Sample pic", 75, 1, 53, 15)
GuiCtrlSetColor(-1,0xffffff)

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

; AVI
GuiCtrlCreateAvi("sampleAVI.avi",0, 180, 10, 32, 32, $ACS_AUTOPLAY)
GuiCtrlCreateLabel("Sample avi", 170, 50)

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

; TAB
GuiCtrlCreateTab(240, 0, 150, 70)
GuiCtrlCreateTabItem("One")
GuiCtrlCreateLabel("Sample Tab with tabItems", 250, 40)
GuiCtrlCreateTabItem("Two")
GuiCtrlCreateTabItem("Three")
GuiCtrlCreateTabItem("")

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

; COMBO
GuiCtrlCreatecombo("Sample Combo", 250, 80, 120, 100)

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

; PROGRESS
GuiCtrlCreateProgress(60, 80, 150, 20)
GuiCtrlSetData(-1, 60)
GuiCtrlCreateLabel("Progress:", 5, 82)

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

; EDIT
GuiCtrlCreateEdit(@CRLF & " Sample Edit Control", 10, 110, 150, 70)

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

; LIST
GuiCtrlCreateList("", 5, 190, 100, 90)
GuiCtrlSetData(-1, "a.Sample|b.List|c.Control|d.Here", "b.List")

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

; ICON
GuiCtrlCreateIcon("shell32.dll", 1, 175, 120)
GuiCtrlCreateLabel("Icon", 180, 160, 50, 20)

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

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

; GROUP WITH RADIO BUTTONS
GuiCtrlCreateGroup("Sample Group", 230, 120)
GuiCtrlCreateRadio("Radio One", 250, 140, 80)
GuiCtrlSetState(-1, $GUI_CHECKED)
GuiCtrlCreateRadio("Radio Two", 250, 165, 80)
GUICtrlCreateGroup ("",-99,-99,1,1) ;close group

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

; UPDOWN
GuiCtrlCreateLabel("UpDown", 350, 115)
GuiCtrlCreateInput("42", 350, 130, 40, 20)
GuiCtrlCreateUpDown(-1)

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

; LABEL
GuiCtrlCreateLabel("Green" & @CRLF & "Label", 350, 165, 40, 40)
GuiCtrlSetBkColor(-1, 0x00FF00)

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

; SLIDER
GuiCtrlCreateLabel("Slider:", 235, 215)
GuiCtrlCreateSlider(270, 210, 120, 30)
GuiCtrlSetData(-1, 30)

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

; INPUT
GuiCtrlCreateInput("Sample Input Box", 235, 255, 130, 20)

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

; DATE
GuiCtrlCreateDate("", 5, 280, 200, 20)
GuiCtrlCreateLabel("(Date control expands into a calendar)", 10, 305, 200, 20)

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

; BUTTON
GuiCtrlCreateButton("Sample Button", 10, 330, 100, 30)

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

; CHECKBOX
GuiCtrlCreateCheckbox("Checkbox", 130, 335, 80, 20)
GuiCtrlSetState(-1, $GUI_CHECKED)

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

; TREEVIEW ONE
$treeOne = GuiCtrlCreateTreeView(210, 290, 80, 80)
$treeItem = GuiCtrlCreateTreeViewItem("TreeView", $treeOne)
GuiCtrlCreateTreeViewItem("Item1", $treeItem)
GuiCtrlCreateTreeViewItem("Item2", $treeItem)
GuiCtrlCreateTreeViewItem("Foo", -1)
GuiCtrlSetState($treeItem, $GUI_EXPAND)

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

; TREEVIEW TWO
$treeTwo = GuiCtrlCreateTreeView(295, 290, 103, 80, $TVS_CHECKBOXES)
GuiCtrlCreateTreeViewItem("TreeView", $treeTwo)
GuiCtrlCreateTreeViewItem("With", $treeTwo)
GuiCtrlCreateTreeViewItem("tvs_checkboxes", $treeTwo)
GuiCtrlSetState(-1, $GUI_CHECKED)
GuiCtrlCreateTreeViewItem("Style", $treeTwo)

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

; GUI MESSAGE LOOP
GuiSetState()
While GuiGetMsg() <> $GUI_EVENT_CLOSE
WEnd

[/autoit]

Schönes WE und
Danke
Euer Ritzelrocker04

RR04

Hallo,

wollte gerade die Avi in einem Script aufrufen und es kam zur Meldung „keine gültige Windows-Datei“.
Also eine Frage des Formats, obwohl MS MediaPlayer es abspielt!

ICQ ist nicht vorhanden.

Schönes WE und
viel Spaß!
Euer Ritzelrocker04

RR04

Hallo,

zum Avi Gif Converter kann ich nichts weiter sagen, ob er gut ist oder es besser währe einen anderen zu nutzen?

Schönes WE und
viel Erfolg!
Euer Ritzelrocker04

RR04

Hallo Mignon,

natürlich einmal Downloadlink kommt sofort:

http://www.file-converters.com/

Schönes WE und
viel Erfolg!
Euer Ritzelrocker04

RR04

Hallo Mignon,

das ist ein Smiley aus einer Sammlung (Freeware). Der Kontext zum Ritzelrocker04 hat mir besonders gefallen. In diesem Zusammenhang ergeben sich noch weitere Möglichkeiten mit Programmen (zB Cool3D) bei denen man gleich eigene Kreationen erstellen und dann in Avi abspeichern kann. Eine derart erstellte GUI wirkt sicherlich lebendiger und gewinnt an Individualität sowie Aufmerksamkeit. Aber der Aufwand zur Erstellung eines solchen Programms ist natürlich größer. Die iconähnliche Größe lässt sich für diese Zwecke gut handhaben.

„Super“ habe ich geladen. Aber da ich damit nicht so viel Erfahrung habe, nutzte ich einfach einen anderen Konverter den „Avi Gif Converter“.

Schönes WE und
viel Spaß!
Euer Ritzelrocker04

RR04

Hi,

ach so,warum nicht mal zeigen?
Siehe Anhang.

Schönes WE und
Danke
Euer Ritzelrocker04

RR04

Hi Mignon,

ja genau, es hatt funktioniert.

Schönes WE und
Danke
Euer Ritzelrocker04

RR04

Hi Mignon,

ich meinte eigentlich, dass ich es vorher hätte testen sollen / können. Manchmal liegt die Antwort doch so nah –

Der Wald und die Bäume, die Bäume und der Wald !

Aber in jeder Hinsicht war seine Antwort „Super“.

Schönes WE und
Danke
Euer Ritzelrocker04 der Eroberer

RR04

Hi gtaspider,

er meint, geht nicht, gibt es nicht – Super.
Doch eigentlich wollte ich nur ein kleines iconartiges animiertes Bild anzeigen. Was würde er an meiner Stelle machen, mir scheint der Vorschlag von Mignon einfacher ?

Schönes WE und
Danke
Euer Ritzelrocker04 der Eroberer

RR04

Hallo Mignon ,

das klingt schon mal Gut und ja Du hast Recht, hast Recht, hast Recht!

Ich werde es mal probieren.

Schönes WE und
Danke
Euer Ritzelrocker04

RR04

Hallo,

im Beispiel der Hilfe unter Examples\GUI wird in dem Script SampleControls.au3 (SampleAVi.avi) die Möglichkeit Avi´s also Filmchen ähnlich einer Animation vorgestellt. Auch Gif´s (logo4.gif) werden hier gezeigt.

Kann man auch animierte Gif´s zeigen ?

Schönes WE und
Danke
Euer Ritzelrocker04

RR04

Hi,

bei mir geht es etwas mehr in Richtung Oldies.

Euer Ritzelrocker04

RR04

Hi Fast2,

ein Syntax Error ist bei Programmiersprachen meist ein „Rechtschreibfehler“, mit dessen Beseitigung ich von Oben beginnen würde. Die weiteren könnten nur Folgefehler sein.

Schönes WE und
viel Erfolg!
Euer Ritzelrocker04

RR04

Hi Fast2,

Er sollte seine Frage/Problem etwas genauer formulieren.

Schönes WE und
viel Erfolg!
Euer Ritzelrocker04

RR04

Hi Huggy,

genau hier wird gerundet „ $_Ergebnis_BMI = Round($_EingabeGew / ($_EingabeGro / 100) ^ 2, 0) “ , aber ob nun 22,7 oder 23 führt immer zu „ Case 20 To 25 ; $_Ergebnis_Klasse = "Sie haben Normalgewicht ," „.

Bei der Recherche
zum BMI bin ich auf viele Faktoren gestoßen, aber auch genauso viele Einschränkungen die zu dem wichtigen Hinweis geführt haben.

Schönes WE und
viel Spaß!
Euer Ritzelrocker04

RR04

Hi Fast2,

in der Tat hat man es hier mit einem freundlichen und höflichen Programm zu tun. Der Nutzer wird mit dem Satz „Willkommen, ich errechne Ihren BMI und das Idealgewicht“ begrüßt (siehe Zeile 29, 31, 35, 39). Auch ein lachendes Smiley zeigt sich zum Auftakt.
Erst nach Eingabe der Daten, also Gewicht in kg und Größe in cm von 100 bis 230, findet eine Berechnung statt. Andernfalls wird man auf falsche oder fehlende Eingaben hingewiesen. Für die Ausgabe der Ergebnisse BMI, Klassifizierung und Idealgewicht werden die Textlabels verwendet (siehe Zeile 106 – 109).
So war es gedacht und sollte auch bei Ihm so sein?

Schönes WE und
viel Spaß!
Euer Ritzelrocker04

RR04

Hi,

in dieser Ausgabe verabschieden wir uns von den beiden Icons Er und Sie. An dessen Stelle können wir gleich fünf Neue begrüßen, die uns dabei behilflich sind die Kategorien Normal- und Übergewicht sowie falsche Eingaben grafisch darzustellen. Auch wenn die GUI die selbe geblieben ist, hat sich unter der Haube doch etwas getan!

Spoiler anzeigen

[autoit]

#include <GUIConstants.au3>

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

Dim $_Ergebnis_BMI
Dim $_EingabeGew , $_EingabeGro
Dim $_Ergebnis_Klasse

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

$ico_Normalgew = "Icons\Normalgew.ico"
$ico_Untergew = "Icons\Untergew.ico"
$ico_Uebergew = "Icons\Uebergew.ico"
$ico_StarkUebergew = "Icons\StarkUebergew.ico"
$ico_Zwink = "Icons\Zwink.ico"

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

$GUI = GUICreate("IGR und BMI v 6.0.08", 258, 322, 193, 115)

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

$gb_Eingaben = GUICtrlCreateGroup("Ihre Eingaben", 16, 16, 225, 121)

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

$tb_Gewicht = GUICtrlCreateInput("Gewicht in kg", 32, 48, 73, 21, $ES_NUMBER)
GUICtrlSetState(-1, $GUI_FOCUS)

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

$tb_Groesse = GUICtrlCreateInput("Größe in cm", 32, 88, 73, 21, $ES_NUMBER)

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

$rb_Maennlich = GUICtrlCreateRadio("&männlich", 144, 56, 65, 17)
GUICtrlSetState($rb_Maennlich, $GUI_CHECKED)

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

$rb_Weiblich = GUICtrlCreateRadio("&weiblich", 144, 88, 65, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)

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

$ico_Icon = GUICtrlCreateIcon($ico_Normalgew, 0, 200, 160, 32, 32, BitOR($SS_NOTIFY,$WS_GROUP))

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

$lb_BMI = GUICtrlCreateLabel("Willkommen,", 16, 176, 108, 20)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0x800000)

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

$lb_Klasse = GUICtrlCreateLabel("ich errechnen Ihren BMI", 16, 208, 210, 20)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0x800000)

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

$lb_IGR = GUICtrlCreateLabel("und das Idealgewicht !", 16, 240, 210, 20)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0x800000)

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

$bn_Rechnen = GUICtrlCreateButton("&Rechnen", 16, 272, 65, 25, 0)
GUICtrlSetState(-1,$GUI_DEFBUTTON)

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

$bn_Hinweis = GUICtrlCreateButton("&Hinweis", 96, 272, 65, 25, 0)

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

$bn_Close = GUICtrlCreateButton("&Beenden", 176, 272, 65, 25, 0)

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

$lb_Version = GUICtrlCreateLabel("V 6.0.08 Build 2007-10-27", 16, 304, 131, 15)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlSetColor(-1, 0x808080)

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

$lb_Author = GUICtrlCreateLabel("Design by Kiesi", 168, 304, 78, 15)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlSetColor(-1, 0x808080)
GUISetState(@SW_SHOW)

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

While 1
$nMsg = GUIGetMsg()
If $nMsg <> 0 Then
$_EingabeGew = GUICtrlRead($tb_Gewicht)
$_EingabeGro = GUICtrlRead($tb_Groesse)
$_Er = GUICtrlRead($rb_Maennlich)
Select
Case $nMsg = $bn_Rechnen
If $_EingabeGro >= 100 And $_EingabeGro <= 230 Then
$_Ergebnis_BMI = Round($_EingabeGew / ($_EingabeGro / 100) ^ 2, 0)

If $_Er = 1 Then
$_Ergebnis_IGR = ($_EingabeGro - 100) * 0.9

Switch $_Ergebnis_BMI
Case 0 To 20
$_Ergebnis_Klasse = "Sie haben Untergewicht ,"
$_Smileys = $ico_Untergew
Case 20 To 25
$_Ergebnis_Klasse = "Sie haben Normalgewicht ,"
$_Smileys = $ico_Normalgew
Case 25 To 30
$_Ergebnis_Klasse = "Sie haben Übergewicht ,"
$_Smileys = $ico_Uebergew
Case 30 To 50
$_Ergebnis_Klasse = "Sie haben starkes Übergewicht ,"
$_Smileys = $ico_StarkUebergew
EndSwitch
Else
$_Ergebnis_IGR = ($_EingabeGro - 100) * 0.85

Switch $_Ergebnis_BMI
Case 0 To 19
$_Ergebnis_Klasse = "Sie haben Untergewicht ,"
$_Smileys = $ico_Untergew
Case 19 To 24
$_Ergebnis_Klasse = "Sie haben Normalgewicht ,"
$_Smileys = $ico_Normalgew
Case 24 To 30
$_Ergebnis_Klasse = "Sie haben Übergewicht ,"
$_Smileys = $ico_Uebergew
Case 30 To 50
$_Ergebnis_Klasse = "Sie haben starkes Übergewicht ,"
$_Smileys = $ico_StarkUebergew
EndSwitch
EndIf
GUICtrlSetImage($ico_Icon, $_Smileys)
GUICtrlSetData($lb_BMI, "Ihr BMI ist " & $_Ergebnis_BMI & " und")
GUICtrlSetData($lb_Klasse, $_Ergebnis_Klasse)
GUICtrlSetData($lb_IGR, "das Idealgewicht beträgt : " & $_Ergebnis_IGR & " kg .")
Else
GUICtrlSetData($lb_BMI, "Sorry ,")
GUICtrlSetData($lb_Klasse, "aber Ihre Größe bitte nur in")
GUICtrlSetData($lb_IGR, "cm von 100 bis 230 eingeben !")
GUICtrlSetImage($ico_Icon, $ico_Zwink)
EndIf
If $_EingabeGew = 0 Then
GUICtrlSetData($lb_BMI, "Sorry ,")
GUICtrlSetData($lb_Klasse, "Sie müssen noch")
GUICtrlSetData($lb_IGR, "Ihr Gewicht in kg eingeben !")
GUICtrlSetImage($ico_Icon, $ico_Zwink)
EndIf
Case $nMsg = $GUI_EVENT_CLOSE Or $nMsg = $bn_Close
Exit
ExitLoop
Case $nMsg = $bn_Hinweis
MsgBox(64, "Wichtiger Hinweis !", "Der BMI unterscheidet nicht zwischen Fett- und Muskelmasse." & @CR & _
"Sportler, Bodybuilder und Schwerstarbeiter, die viele Muskel-Kilos auf die Waage bringen," & @CR & _
"gehören nach dem BMI bereits in die Kategorie „übergewichtig“, obwohl ihr Körperfett-Anteil " & @CR & _
"nur gering ist. " & @CR & _
"Der BMI gilt ebenfalls nicht für Schwangere und stillende Mütter, kranke und alte Menschen " & @CR & _
"und Kinder im Wachstum. Überdies werden sehr kleine Menschen ( kleiner als 150 cm) oft " & @CR & _
"falsch zu hoch eingestuft, sehr große Menschen (größer als 190 cm) dagegen zu niedrig " & @CR & _
"bewertet. Ähnliche Einschränkungen gibt es für Menschen mit schlankem Körperbau, " & @CR & _
"die häufig zu niedrig eingestuft werden, und untersetzte Menschen," & @CR & _
"die zu schnell als zu dick klassifiziert werden." & @CR & _
" " & @CR & _
"Der BMI-Rechner soll nur einen ersten Anhalspunkt geben." & @CR & _
"Wer es genauer wissen will, ob er abspecken sollte, misst besser seinen persönlichen" & @CR & _
"Körperfettanteil, z.B. mit einer speziellen Körperfettwaage!")
EndSelect
EndIf

WEnd

[/autoit]

Schönes WE und
viel Spaß!
Euer Ritzelrocker04

RR04

Hi,

hiermit möchte auch ich Ihn begrüßen!
Ich selbst kann noch nicht auf so einen Erfahrungsreichtum zurückblicken. In meinen jetzigen zwei Monaten habe ich aber feststellen müssen, wenn ich mal gelernt habe das es keine dummen Fragen gibt so gibt es hier im Forum auch keine dummen Antworten – eben ein tolles Team.
Die Mitwirkenden zeigen sehr viel Engagement und liefern schnelle und hochwertige Hilfe.

Herzlich Willkommen und
weiterhin viel Erfolg!
Euer Ritzelrocker04

RR04

Hi BugFix und Xenobiologist,

schon erstaunlich jetzt also die Dritte Möglichkeit, aber Alles irgendwie grenzwertig. Doch es geht.

Schönes WE und
Danke
Euer Ritzelrocker04

Beiträge von RR04

Animierte Gif´s ?

Animierte Gif´s ?

Animierte Gif´s ?

Animierte Gif´s ?

Animierte Gif´s ?

Animierte Gif´s ?

Animierte Gif´s ?

Animierte Gif´s ?

Animierte Gif´s ?

Animierte Gif´s ?

Animierte Gif´s ?

Animierte Gif´s ?

Welchen Musikstil bevorzugt ihr?

Ich hab da ein Problem mit dem Script

Ich hab da ein Problem mit dem Script

IGRv3.0-IdealGewichtsRechner

IGRv3.0-IdealGewichtsRechner

IGRv3.0-IdealGewichtsRechner

Schöne Grüße!

Switch Case <> Syntax ?