GDI绘制动态频谱，API可以做到这样的效果吗？

qq342252004

GDI绘制动态频谱，API可以做到这样的效果吗？

netegg

http://www.autoitx.com/thread-14110-1-1.html
这种柱形图的不清楚,那个是官网的,可以参考下

qq342252004

这种柱形图的不清楚,那个是官网的,可以参考下
netegg 发表于 2011-6-20 16:32

你给的连接我看过了，也是GDI。 用API可以做到这样的效果吗？

netegg

回复 3# qq342252004
api好像一般不用来处理图像,不过看你怎么定义了,如果把gdi划到api范畴,个人认为也没什么不妥

浪迹红客

路过。。。

qq342252004

听说GDI绘制图CPU占用高，API绘制图CPU占用低。

netegg

回复 6# qq342252004
大概知道lz的意思了,你指的是gdi+,不是gdi,gdi的东西都在api里,gdi+确实比gdi占资源

xrzmjz

本质上GDI也调用了API

happytc

GDI+学习起来有点难度。

搭车问下下面的问题：

#include <GuiConstantsEx.au3>
#include <GDIPlus.au3>

Opt('MustDeclareVars', 1)

_Main()

Func _Main()
        Local $hGUI, $hGraphic, $hPen
        $hGUI = GUICreate("GDI+", 400, 300)
        GUISetState()

        _GDIPlus_Startup ()
        $hGraphic = _GDIPlus_GraphicsCreateFromHWND ($hGUI)
        $hPen = _GDIPlus_PenCreate ()
        _GDIPlus_GraphicsDrawLine ($hGraphic, 10, 150, 390, 150, $hPen)
        _GDIPlus_GraphicsDrawLine ($hGraphic, 50, 50, 390, 390, $hPen)
        ;这时怎么删掉前面画的那条直线（就是水平的那条）？而后面那条保留（也就保留斜线）
        Do
        Until GUIGetMsg() = $GUI_EVENT_CLOSE

        _GDIPlus_PenDispose ($hPen)
        _GDIPlus_GraphicsDispose ($hGraphic)
        _GDIPlus_Shutdown ()

EndFunc

happytc

一直在问个最简单的GDI+的问题，就是如画图里（mspaint.exe）那样，点了画“直线后，按下左键拖动鼠标，那条直线就跟着鼠标动，但始终只有一条直线，而不象下面的代码那样：鼠标一动，画了无数直线

#Include <ScreenCapture.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>


Global Const $CursorID = MouseGetCursor()
Global $hGUI, $hpen, $hGraphicBg

WhiteBoard()

Func WhiteBoard()
        Local $HBITMAP, $hBmp, $PenSize, $ColorValue
        Opt("GUIOnEventMode", 1)

        _GDIPlus_Startup()

        $HBITMAP = _ScreenCapture_Capture("", 0, 0, @DesktopWidth - 2, @DesktopHeight - 2, 0)
        $hGUI = GUICreate("WhiteBoard-LiveCapture", @DesktopWidth, @DesktopHeight, 0, 0, $WS_POPUP)

        GUISetState(@SW_SHOW, $hGUI)
        $hGraphicBg = _GDIPlus_GraphicsCreateFromHWND($hGUI)
        $hBmp = _GDIPlus_BitmapCreateFromHBITMAP($HBITMAP)
        _GDIPlus_GraphicsDrawImage($hGraphicBg, $hBmp, 0, 0)
        _WinAPI_DeleteObject($HBITMAP)

        $PenSize = 1
        $hPen = _GDIPlus_PenCreate(0xA0FFFF00, $PenSize)

        GUISetOnEvent(-3, "_Exit")
        OnAutoItExitRegister("_Exit")
        GUISetOnEvent($GUI_EVENT_PRIMARYDOWN, "Draw", $hGUI)

        While True
                Sleep(2000)
        WEnd
EndFunc




Func Draw()
    Local $MousePos, $MouseXOri, $MouseYOri
        GUISetCursor(0, 1, $hGUI)
    $MousePos = GUIGetCursorInfo($hGUI)
        $MouseXOri = $MousePos[0]
        $MouseYOri = $MousePos[1]
    Sleep(50)
    Do
        $MousePos = GUIGetCursorInfo($hGUI)
        If $MouseXOri <> $MousePos[0] Or $MouseYOri <> $MousePos[1] Then
            _GDIPlus_GraphicsDrawLine($hGraphicBg, $MousePos[0], $MousePos[1], $MouseXOri, $MouseYOri, $hPen)
;这里该如何写？才能不会搞动如下图那样的“刷子”样的无数直线？
        EndIf
    Until Not $MousePos[2]
EndFunc

Func _Exit()
    GUISetCursor($CursorID, 1, $hGUI)
    GUISetOnEvent($GUI_EVENT_PRIMARYDOWN, "")
    _GDIPlus_PenDispose($hPen)
    _GDIPlus_GraphicsDispose($hGraphicBg)
    _GDIPlus_Shutdown()
    GUIDelete($hGUI)
    Exit
EndFunc

3mile

回复 9# happytc

#include <GuiConstantsEx.au3>
#include <GDIPlus.au3>
 
Opt('MustDeclareVars', 1)
 
_Main()
 
Func _Main()
        Local $hGUI, $hGraphic, $hPen,$hPen1
        $hGUI = GUICreate("GDI+", 400, 300)
        GUISetState()
 
        _GDIPlus_Startup ()
        $hGraphic = _GDIPlus_GraphicsCreateFromHWND ($hGUI)
        $hPen = _GDIPlus_PenCreate ()
        _GDIPlus_GraphicsDrawLine ($hGraphic, 10, 150, 390, 150, $hPen)
                _GDIPlus_PenDispose ($hPen)
                $hPen1=_GDIPlus_PenCreate ()
                _GDIPlus_GraphicsDrawLine ($hGraphic, 50, 50, 390, 390, $hPen)
        Sleep(1000)
                _WinAPI_RedrawWindow($hGUI)
        ;这时怎么删掉前面画的那条直线（就是水平的那条）？而后面那条保留（也就保留斜线）
        Do
                        _GDIPlus_GraphicsDrawLine ($hGraphic, 50, 50, 390, 390, $hPen)
        Until GUIGetMsg() = $GUI_EVENT_CLOSE
 
        _GDIPlus_PenDispose ($hPen1)
        _GDIPlus_GraphicsDispose ($hGraphic)
        _GDIPlus_Shutdown ()
 
EndFunc

happytc

回复 11# 3mile

谢了，但用_WinAPI_RedrawWindow($hGUI)，对十楼的代码不灵了
虽然可以一直是一条直线，但背景图没有了，并且这条直线会不停地闪烁呀

ayumi502

gdi比较难 看来要继续学习