AutoIt Français

Code : Tout sélectionner

#include <ProgressConstants.au3>
#include <GUIConstants.au3>

    $memo22 =MemGetStats ()
$memo233 =$memo22 [1]
#Region ### START Koda GUI section ### Form=c:\program files\koda 2008\koda 2008\forms\memoryread.kxf
$form1_1 = GUICreate("Memory Read by ghost911", 261, 156, 478, 449)

$Input1 = GUICtrlCreateInput("", 16, 24, 105, 21)
$Input2=GUICtrlCreateInput("", 16, 56, 105, 21)
$Input3=GUICtrlCreateInput("", 16, 88, 105, 21)
$Progress1 = GUICtrlCreateProgress(160, 8, 14, 105, BitOR($PBS_SMOOTH,$PBS_VERTICAL))
$Progress2 = GUICtrlCreateProgress(198, 9, 14, 105, BitOR($PBS_SMOOTH,$PBS_VERTICAL))
$Progress3 = GUICtrlCreateProgress(232, 8, 14, 105, BitOR($PBS_SMOOTH,$PBS_VERTICAL))
$Input4 = GUICtrlCreateInput("", 16, 120, 105, 21)

GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
#NoTrayIcon

While 1
    $memo =MemGetStats ()
$memo2 =$memo [0]
$memo3 =$memo [2]
$var = $memo [4]
    Switch $memo2
        case 0 To 100
            GUICtrlSetData ($Input1,$memo2&" %")
            $st=StringRight ($memo3,2)
            $st2=StringRight ($var,2)
                GUICtrlSetData ($Input2,$memo3&" ko")
                GUICtrlSetData ($Input3,$var&" ko")
        GUICtrlSetData ($Progress1,$st)
        GUICtrlSetData ($Progress2,$memo2)
                GUICtrlSetData ($Progress3,$st2)
                GUICtrlSetData ($Input4,@HOUR&":"&@MIN&":"&@SEC)
    
    EndSwitch
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

    EndSwitch
WEnd