[..] Aide pour calculette scientifique

[richy]

bien entendu par une boucle
j'espère que vous m'avez compris dans le message précédent
merci

j'ai mon bouton maintenant de racine carré et de racine cubique

[mikell]

Oui on peut, SI le texte des boutons est identique ou SI ce texte peut être défini dans la boucle (exemple btn1, btn2, btn3 etc)
Exemple tiré du forum :

► Afficher le texte

Code : Tout sélectionner

#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>

Opt("MustDeclareVars", 1)
Opt("GUIOnEventMode", 1)

Global $Gui
Global $Labels = 300

$Gui = GUICreate("Random", 530, 310)
GUISetOnEvent($GUI_EVENT_CLOSE, "quit")
RemplirLabels()
GUISetState()

While(True)
    Sleep(10)
WEnd

Func RemplirLabels()
    Local $x
    Local $y
    Local $Palier = 20
    For $i = 0 To $Labels
        $x = 5 + Floor($i/$Palier)*35
        $y = 5 + Mod($i, $Palier)*15
        GUICtrlCreateLabel(Random(0, 999, 1) & @CRLF & $i, $x, $y, 30, 13, $SS_CENTER)
        GUICtrlSetBkColor(-1, 0xFFAAAA)
        GUICtrlSetOnEvent(-1, "LabelClic")
    Next
EndFunc

Func LabelClic()
    Local $text = StringSplit(GUICtrlRead(@GUI_CtrlId), @CRLF, 1)
    ToolTip("Label numero " & $text[2]+1 & " : " & $text[1])
EndFunc

Func quit()
    Exit
EndFunc
 

Mais tu as vraiment besoin de 192 boutons ?!?

[jguinch]

192 boutons ! J'imagine la calculette !


Sérieusement, pourquoi autant de touches ?

[richy]

bonjour tout le monde

merci pour voe réponses

avez vous comment elle se compse bien entendu je peux la passer de 8 à 6 voire 5 par colonne
qui peux faire plus peut faire moins difficilement le contraire voire impossible

je voudrais dans un 2 eme temps l'utiliser en outil de programmation par un langage simple et pourquoi pas de traducteur simple mot

[richy]

re bonjour

j'ai une petite idée mais je ne sais pas si cela esr réalisable
pour cette calculette magique.
je vais descendre à 90 boutons (15*6)
mais la subtilité c'est de faire un cube de 20cm de coté
qui pivoterais verticalement ou horizontalement
me suis je bien fait comprendre,au dessus de ce cube se trouvera
l'écran graphique ou non

[Sydneysyd]

Je confirme les dires ci-dessus concernant l'apprentissage.

Je suis parti de rien et aujourd'hui, j'en ai appris beaucoup grâce à ce forum.

Il ne faut pas hésiter à demander sur ce forum, en plus tu auras toujours de l'aide, c'est vraiment un super forum pour progresser.

Et j'en profite pour remercier encore ceux qui m'ont aidé dans mes difficultés : Mikell, Jguinch, Pandi Panda, Tlem...

[richy]

bonjour tout le monde

j'ai beaucoup fouillé dans ce forum mais j'ai pas trouvé ce que je cherche,mais j'ai compris énormément de chose,il reste encore beaucoup à faire
AutoIT est fort riche en possibilité

voila mes questions
toujours pour ma calculatrice scientifique qui par mainte imagination est devenue aussi un clavier scientifique et traductrice multilangue.
en final pourra servir en tactile

comment affecter 3 commandes à un bouton et l'afficher sur le bouton?
comment faire fonctionner le shift et la correction arrière?

j'ai pas trouvé la programmation d'un clavier en AUTOit

merci pour vos réponse

[scorp84]

Bonjour,

un clavier scientifique et traductrice multilangue.

Quel sera l'intérêt d'utiliser en même temps une calculatrice et un traducteur ?

Ne pars tu pas dans trop de directions à la fois ?

comment affecter 3 commandes à un bouton et l'afficher sur le bouton?

Techniquement il est possible d'affecter 3 fonctions en fonction d'appuis sur une autre touche Alt, Ctrl mais cela risque d'être ergonomiquement difficile à comprendre pour l'utilisateur.

Pour détecter des touches, l'UDF suivant peut peut être t'aider :
http://www.autoitscript.com/forum/topic ... -keypress/

Sinon regarde l'aide de la fonction _IsPressed().

Amicalement.

BM

[richy]

bonjour,

merci pour vos réponses

j'avance sur l'investiguation de Autoit
mon clavier calculette scientifique qui fera aussi traducteur simple commence à prendre forme.
existe t il des macro pour le calcul d'un factoriel et d'une racine carré ou cubique

je n'ai pas trouvé comment affecter plusieurs commandesd à un bouton

merci d'avance pour vos réponse

[scorp84]

Bonjour,

Tu peux par exemple détecter l'appui sur la touche Shift ou Ctrl :

► Afficher le texte

Code : Tout sélectionner

#include <GUIConstantsEx.au3>
#include <Misc.au3>
#Region ### START Koda GUI section ### Form=
Global $Form1 = GUICreate("Form1", 267, 192, 192, 124)
Global $Button1 = GUICtrlCreateButton("Button1", 88, 40, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###


Local $hDLL = DllOpen("user32.dll")

While 1
    If _IsPressed("10", $hDLL) Then
        ConsoleWrite("_IsPressed - Shift Key was pressed." & @CRLF)

    ElseIf _IsPressed("11", $hDLL) Then
        ConsoleWrite("_IsPressed - Ctrl Key was pressed." & @CRLF)
    EndIf

    Sleep(250)
WEnd

A toi de l'adapter pour que quand tu cliques sur ton bouton, suivant que l'une ou l'autre soit appuyée tu puisses lancer la fonction que tu veux.

Par contre, pense à l'ergonomie de ton programme pour que les utilisateurs sachent quelle fonction est affectée à quelle combinaison de touches.

Amicalement.

BM

[TT22]

Salut, voici deux fonctions pour calculer des factorielles et des racines...

► Afficher le texte

Code : Tout sélectionner

Func _factoriel ( $number)
    Local $result = 1
    If Not IsNumber ( $number) Then Return SetError ( 1, Default, False)
    If $number < 1 Then Return SetError ( 2, Default, False)
    For $i = 1 To $number Step 1
        $result *= $i
    Next
    Return $result
EndFunc

Func _NthRoot ( $number, $nth)
    If Not IsNumber ( $number) Then Return SetError ( 1, Default, False)
    If $number < 1 Then Return SetError ( 2, Default, False)
    Return $number^(1/$nth)
EndFunc

; 10!
MsgBox(64, "10!", _factoriel(10))

; Racine cubique de 27
MsgBox(64, "Racine cubique de 27", _NthRoot(27, 3))

Par contre pour la racine carré, je te conseille la fonction sqrt() bien plus performante

[TommyDDR]

<maths>
La racine carré d'un nombre est égale à ce même nombre à la puissance 1/2
La racine cubique d'un nombre est égale à ce même nombre à la puissance 1/3
Plus généralement, la racine y d'un nombre est égale à ce même nom à la puissance 1/y
Donc si vous voulez la racine cubique d'un nombre :

Code : Tout sélectionner

Func RacineCubique($nombre)
    Return $nombre^(1/3)
EndFunc 

</maths>

[richy]

re bonjour,

merci pour vos réponses super sympa

existe t'il une police de caractères comme pae exemple la racine carré ou cubique ou mettre un chiffre en exposant

[TommyDDR]

Dans à peu près toutes les polices vous avez les trois premiers exposants : ¹²³
Et la racine carré : √

[jchd]

Toute police Unicode.
Voir : Table des caractères -> Affichage avancé -> Jeu de caractères = Unicode.

Exposants : ⁰ ¹ ² ³ ⁴ ⁵ ⁶ ⁷ ⁸ ⁹ et aussi ⁱ ⁿ ⁺ ⁻ ⁼ ⁽ ⁾
Indices : ₀ ₁ ₂ ₃ ₄ ₅ ₆ ₇ ₈ ₉ ₊ ₋ ₌ ₍ ₎ ₐ ₑ ₒ ₓ ₕ ₖ ₗ ₘ ₙ ₚ ₛ ₜ
Racines : √∛∜

Note : certains de ces caractères ont une tête bizarre dans certaines fontes, comme celle utilisée par ce forum, mais ce n'est pas le cas général, surtout avec les fontes récentes.

[richy]

bonjour à tous

grace à vous j'ai avancé dans cette aventure .
les racines sont installées
je voudrais dédoubler les touches doubles en faisant changer de couleur les caractères sélectionnés par le shift
j'ai essayé plusieurs possibilités mais cela ne fonctionne pas
avez vous une petite idée sur le sujet

merci d'avance

[Hugues]

Salut,

Pour detecter si la touche SHIFT est pressée ou pas (voir console)

Code : Tout sélectionner

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Misc.au3>

$gui = GUICreate("test")
$Button1 = GUICtrlCreateButton("Pas appuyé", 32, 40, 131, 25)
GuiSetState()

Local $hDLL = DllOpen("user32.dll")

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

    EndSwitch



    If _IsPressed("10", $hDLL) Then
        GUICtrlSetData($Button1, "Appuyé")
        ConsoleWrite("_IsPressed - Shift Key was pressed." & @CRLF)
        ; Wait until key is released.
        While _IsPressed("10", $hDLL)
            Sleep(250)
        WEnd
GUICtrlSetData($Button1, "Pas appuyé")
        ConsoleWrite("_IsPressed - Shift Key was released." & @CRLF)
    ElseIf _IsPressed("1B", $hDLL) Then
        MsgBox(0, "_IsPressed", "The Esc Key was pressed, therefore we will close the application.")
        ExitLoop
    EndIf
    Sleep(250)
WEnd

DllClose($hDLL)



 

[jguinch]

J'ajouterais même If _IsPressed("10", $hDLL) AND WinActive($gui), pour ne prendre en compte que la GUI.

[richy]

bonjour tout le monde

merci pour vos réponses

savoir si il est possible d'afficher dans un bouton comme sur les touches d'un clavier (1 2 voire 3 informations sur la meme touche) si oui comment
merci pour vos réponses
je regarde dans votre tutorial en meme temps

[Hugues]

Oui, après il faut faire une combinaison de touche... Regarde les exemples que l'on t'as fournit ^^