[AutoIt] Calculatrice à virgule flottante.

par **M.Pong** Sam 25 Jan 2014 - 19:10

Salut

Voici une petite calculatrice:

Code Source:

Code:: #include <ButtonConstants.au3>[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] #include <GUIConstantsEx.au3>[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] #include <WindowsConstants.au3>[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] [color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] ; // Centrage de la GUI à l'écran //[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $Pos_Largeur = (@DesktopWidth - 168)/2[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $Pos_Hauteur = (@DesktopHeight - 238)/2[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] [color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Local $CalcText1 = ""[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Local $CalcText2 = ""[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Local $Nombre = 1[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Local $Operation = ""[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] [color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $GUI = GUICreate("Calculatrice", 168, 238, $Pos_Largeur, $Pos_Hauteur)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUISetBkColor(0x33CCFF, $GUI)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $NoFocus = GUICtrlCreateLabel("", 0, 0, 0, 0)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] ; // Bouton Difference //[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $ButtonDifference = GUICtrlCreateButton("-", 128, 160, 32, 32)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetFont(-1, 16, 1, "Arial")[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetColor(-1, 0x000080)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetState($NoFocus, $GUI_FOCUS)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] ; // Bouton Addition //[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $ButtonAddition = GUICtrlCreateButton("+", 128, 200, 32, 32)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetFont(-1, 16, 1, "Arial")[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetColor(-1, 0x000080)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] ; // Bouton Division //[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $ButtonDivision = GUICtrlCreateButton("/", 128, 80, 32, 32)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetFont(-1, 16, 1, "Arial")[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetColor(-1, 0x000080)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] ; // Bouton Multiplication //[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $ButtonMultiplication = GUICtrlCreateButton("*", 128, 120, 32, 32)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetFont(-1, 16, 1, "Arial")[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetColor(-1, 0x000080)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] ; // Bouton 08 //[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $Button08 = GUICtrlCreateButton("8", 48, 80, 32, 32)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetFont(-1, 16, 1, "Arial")[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetColor(-1, 0x0000FF)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] ; // Bouton 09 //[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $Button09 = GUICtrlCreateButton("9", 88, 80, 32, 32)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetFont(-1, 16, 1, "Arial")[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetColor(-1, 0x0000FF)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] ; // Bouton 04 //[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $Button04 = GUICtrlCreateButton("4", 8, 120, 32, 32)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetFont(-1, 16, 1, "Arial")[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetColor(-1, 0x0000FF)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] ; // Bouton 05 //[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $Button05= GUICtrlCreateButton("5", 48, 120, 32, 32)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetFont(-1, 16, 1, "Arial")[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetColor(-1, 0x0000FF)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] ; // Bouton 06 //[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $Button06 = GUICtrlCreateButton("6", 88, 120, 32, 32)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetFont(-1, 16, 1, "Arial")[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetColor(-1, 0x0000FF)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] ; // Bouton 07 //[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $Button07 = GUICtrlCreateButton("7", 8, 80, 32, 32)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetFont(-1, 16, 1, "Arial")[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetColor(-1, 0x0000FF)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] ; // Bouton 00 //[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $Button00 = GUICtrlCreateButton("0", 8, 200, 32, 32)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetFont(-1, 16, 1, "Arial")[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetColor(-1, 0x0000FF)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] ; // Bouton 01 //[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $Button01 = GUICtrlCreateButton("1", 8, 160, 32, 32)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetFont(-1, 16, 1, "Arial")[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetColor(-1, 0x0000FF)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] ; // Bouton 02 //[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $Button02 = GUICtrlCreateButton("2", 48, 160, 32, 32)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetFont(-1, 16, 1, "Arial")[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetColor(-1, 0x0000FF)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] ; // Bouton 03 //[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $Button03 = GUICtrlCreateButton("3", 88, 160, 32, 32)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetFont(-1, 16, 1, "Arial")[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetColor(-1, 0x0000FF)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] ; // Bouton Virgule[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $ButtonVirgule = GUICtrlCreateButton(".", 48, 200, 32, 32)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetFont(-1, 16, 1, "Arial")[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetColor(-1, 0x0000FF)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] ; // Bouton Egale //[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $ButtonEqual = GUICtrlCreateButton("=", 88, 200, 32, 32)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetFont(-1, 16, 1, "Arial")[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetColor(-1, 0x000080)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] ; // Bouton AC //[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $ButtonAC = GUICtrlCreateButton("AC", 8, 40, 72, 32)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetFont(-1, 16, 1, "Arial")[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetColor(-1, 0x000080)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] ; // Boutton OFF //[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $ButtonOff = GUICtrlCreateButton("OFF", 88, 40, 72, 32)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetFont(-1, 16, 1, "Arial")[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetColor(-1, 0x000080)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] ; // Zone de Texte //[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $TextBox = GUICtrlCreateInput("", 8, 8, 152, 26, 2)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetFont(-1, 16, 1, "Arial")[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetState(-1, $GUI_DISABLE)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] [color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUISetState(@SW_SHOW)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] [color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] While 1[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $Controle = GUIGetMsg()[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Switch $Controle[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Case $GUI_EVENT_CLOSE[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Exit[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Case $ButtonOff[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Exit[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Case $Button00[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetState($NoFocus, $GUI_FOCUS)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] If $Nombre = 1 Then[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $CalcText1 = $CalcText1 & "0"[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetData($TextBox, $CalcText1)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Else[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $CalcText2 = $CalcText2 & "0"[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetData($TextBox, $CalcText2)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] EndIf[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Case $Button01[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetState($NoFocus, $GUI_FOCUS)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] If $Nombre = 1 Then[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $CalcText1 = $CalcText1 & "1"[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetData($TextBox, $CalcText1)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Else[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $CalcText2 = $CalcText2 & "1"[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetData($TextBox, $CalcText2)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] EndIf[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Case $Button02[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetState($NoFocus, $GUI_FOCUS)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] If $Nombre = 1 Then[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $CalcText1 = $CalcText1 & "2"[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetData($TextBox, $CalcText1)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Else[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $CalcText2 = $CalcText2 & "2"[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetData($TextBox, $CalcText2)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] EndIf[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Case $Button03[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetState($NoFocus, $GUI_FOCUS)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] If $Nombre = 1 Then[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $CalcText1 = $CalcText1 & "3"[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetData($TextBox, $CalcText1)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Else[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $CalcText2 = $CalcText2 & "3"[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetData($TextBox, $CalcText2)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] EndIf[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Case $Button04[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetState($NoFocus, $GUI_FOCUS)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] If $Nombre = 1 Then[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $CalcText1 = $CalcText1 & "4"[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetData($TextBox, $CalcText1)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Else[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $CalcText2 = $CalcText2 & "4"[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetData($TextBox, $CalcText2)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] EndIf[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Case $Button05[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetState($NoFocus, $GUI_FOCUS)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] If $Nombre = 1 Then[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $CalcText1 = $CalcText1 & "5"[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetData($TextBox, $CalcText1)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Else[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $CalcText2 = $CalcText2 & "5"[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetData($TextBox, $CalcText2)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] EndIf[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Case $Button06[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetState($NoFocus, $GUI_FOCUS)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] If $Nombre = 1 Then[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $CalcText1 = $CalcText1 & "6"[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetData($TextBox, $CalcText1)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Else[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $CalcText2 = $CalcText2 & "6"[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetData($TextBox, $CalcText2)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] EndIf[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Case $Button07[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetState($NoFocus, $GUI_FOCUS)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] If $Nombre = 1 Then[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $CalcText1 = $CalcText1 & "7"[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetData($TextBox, $CalcText1)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Else[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $CalcText2 = $CalcText2 & "7"[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetData($TextBox, $CalcText2)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] EndIf[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Case $Button08[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetState($NoFocus, $GUI_FOCUS)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] If $Nombre = 1 Then[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $CalcText1 = $CalcText1 & "8"[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetData($TextBox, $CalcText1)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Else[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $CalcText2 = $CalcText2 & "8"[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetData($TextBox, $CalcText2)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] EndIf[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Case $Button09[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetState($NoFocus, $GUI_FOCUS)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] If $Nombre = 1 Then[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $CalcText1 = $CalcText1 & "9"[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetData($TextBox, $CalcText1)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Else[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $CalcText2 = $CalcText2 & "9"[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetData($TextBox, $CalcText2)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] EndIf[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Case $Button00[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetState($NoFocus, $GUI_FOCUS)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] If $Nombre = 1 Then[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $CalcText1 = $CalcText1 & "0"[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetData($TextBox, $CalcText1)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Else[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $CalcText2 = $CalcText2 & "0"[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetData($TextBox, $CalcText2)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] EndIf[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Case $ButtonVirgule[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetState($NoFocus, $GUI_FOCUS)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] If $Nombre = 1 Then[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $CalcText1 = $CalcText1 & "."[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetData($TextBox, $CalcText1)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Else[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] $CalcText2 = $CalcText2 & "."[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetData($TextBox, $CalcText2)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] EndIf[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Case $ButtonAC[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetState($NoFocus, $GUI_FOCUS)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetData($TextBox, "")[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Local $CalcText1 = ""[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Local $CalcText2 = ""[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Local $Nombre = 1[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Local $Operation = ""[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Case $ButtonAddition[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetState($NoFocus, $GUI_FOCUS)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Local $Operation = 1[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Local $Nombre = 2[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetData($TextBox, "")[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Case $ButtonDifference[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetState($NoFocus, $GUI_FOCUS)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Local $Operation = 2[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Local $Nombre = 2[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetData($TextBox, "")[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Case $ButtonMultiplication[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetState($NoFocus, $GUI_FOCUS)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Local $Operation = 3[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Local $Nombre = 2[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetData($TextBox, "")[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Case $ButtonDivision[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetState($NoFocus, $GUI_FOCUS)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Local $Operation = 4[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Local $Nombre = 2[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetData($TextBox, "")[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Case $ButtonEqual[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetState($NoFocus, $GUI_FOCUS)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] If $Operation = 1 Then Local $Resultat = $CalcText1 + $CalcText2[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] If $Operation = 2 Then Local $Resultat = $CalcText1 - $CalcText2[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] If $Operation = 3 Then Local $Resultat = $CalcText1 * $CalcText2[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] If $Operation = 4 Then Local $Resultat = $CalcText1 / $CalcText2[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] Local $Arround = Round($Resultat, 2)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] GUICtrlSetData($TextBox, $Arround)[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] EndSwitch[color=#2e8b57][font=Courier, CourierNew, sans-serif][/font][/color] WEnd

Téléchargement: http://www.sendspace.com/file/w93sbp

C'est une version très minimaliste, car il y a encore beaucoup de chose à améliorer:

- Gérer plus de 2 nombres.
- Gérer les expression numériques.
- Ajouter des fonctions mathématiques. (Mode Scientifique)
- Ajouter un menu Options. (Les couleurs, le nombre de chiffres après la virgule...)

[AutoIt] Calculatrice à virgule flottante. 13120904301382796

[AutoIt] Calculatrice à virgule flottante. 13120904301382796

Dylan.