Gibts ein fertige Funktion (GDI) die ein Diagramm darstellt so wie im Taskmanager

    Hallo zusammen,

    suche gerade eine Funkion wie im Taskmanager der die CPU Auslastung usw darstellt. Bevor ich jetzt selbst anfange wollte ich vorher nachfragen, finden tue ich leider nichts....

    Hoffe mir kann einer weiterhelfen, würde mir zeit ersparen..

    Merci

    Hallo Flitzer,

    @progandy hat eine rmchart.au3 geschrieben, schau am besten hier [ offen ] Liniendiagramm dann weiter zu Post #19. Dazu habe ich mir damals dieses Skript heruntergeladen (Link unbekannt):

    [autoit]

    #cs ----------------------------------------------------------------------------

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

    AutoIt Version: 3.3.1.0 (beta)
    Author: Prog@ndy

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

    Script Function:
    Moving chart

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

    #ce ----------------------------------------------------------------------------

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

    ; Script Start - Add your code below here
    #include<rmchart.au3>

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

    $hGUI = GUICreate("Chart Test", 700,500)
    _RMC_LoadDLL("rmchart.dll")

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

    $ChartID = 2101
    _RMC_CreateChart($hGUI, $ChartID ,10,10,300,200,$ColorBlack,0,0,"","",100)

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

    _RMC_AddRegion($ChartID,0,5,-5,0)

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

    _RMC_AddGrid($ChartID,1, $ColorBlack)
    _RMC_AddDataAxis($ChartID,1,$RMC_DATAAXISLEFT, 0, 100 , 0 , 0, $ColorWhite , $ColorWhite ,$RMC_LINESTYLEDOT,0,"","")
    _RMC_AddLabelAxis($ChartID,1,0, 1, 5, 0, 0, 0, 0, 0, $RMC_LINESTYLENONE,"")

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

    Local $text = Random(1,100,1)
    For $i = 1 To 99
    $text &= "|" & Random(1,100,1)
    Next
    Global $struct
    _RMC_Split2Double($text, $struct)
    _RMC_AddLineSeries($ChartID, 1, $Struct, 100, 0, 0, $RMC_AREA, $RMC_AREA_FLAT , 0, True, $ColorGreen, 0, 0, 0, 0)

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

    _RMC_Draw($ChartID)

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

    GUISetState()

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

    AdlibRegister("_Update",1000)
    Func _Update()
    $ping= Ping("www.Ping.de", 250)
    ConsoleWrite($ping & @CRLF)
    ; $text = StringTrimLeft($text, StringInStr($text, "|")) & "|" & Random(1,100,1)
    $text = StringTrimLeft($text, StringInStr($text, "|")) & "|" & $ping
    _RMC_Split2Double($text, $struct)
    _RMC_SetSeriesData($ChartID, 1, 1, $struct, 100)
    _RMC_Draw($ChartID)
    EndFunc

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

    While 1
    Switch GUIGetMsg()
    Case -3
    Exit

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

    EndSwitch
    WEnd

    [/autoit]

    mfg (Auto)Bert