Активный график (постоянно обновляемый)

[VadimKHL]

Всем привет!
Подскажите, как нарисовать график, который можно обновлять каждые 10 мс.
Попробовал сделать при помощи GUICtrlCreateGraphic, но это приводит к постоянному "морганию" всех элементов GUI.
Есть какие либо еще варианты?

Func _DrawXY(Const ByRef $obj)
    ; Удалить старый график.
    GUICtrlDelete($iGrafXY)
    $iGrafXY = GUICtrlCreateGraphic(200, 10, 630, 630)
    ; Выключить объект, что бы за него можно было перетаскивать (отключить клики).
    GUICtrlSetState($iGrafXY, $GUI_DISABLE)
    ; Задать цвет фона.
    GUICtrlSetBkColor($iGrafXY, 0x0000FF)
    ; Задать цвет рамки.
    GUICtrlSetColor($iGrafXY, 0x000000)
    ; Задать цвет для дальнейшего рисования.
    GUICtrlSetGraphic($iGrafXY, $GUI_GR_COLOR, 0x00FF00)

    ; Нарисовать цели.
    For $iDraw = 0 To Ubound($obj, $UBOUND_ROWS) - 1
        GUICtrlSetGraphic($iGrafXY, $GUI_GR_DOT, ($obj[$iDraw][2] - $Bx) / $Kx, ($obj[$iDraw][3] - $By) / $Ky)
    Next

    ; Обновить график.
    GUICtrlSetGraphic($iGrafXY, $GUI_GR_REFRESH)
EndFunc

 

[Prog]

приводит к постоянному "морганию" всех элементов GUI.

Это из-за постоянного пересоздания контрола.

GUICtrlDelete($iGrafXY)
$iGrafXY = GUICtrlCreateGraphic(200, 10, 630, 630)