如何清除TextOut输出的字符

[mscrack]

var
hScreen:dword;
begin
hScreen:=GetDC(0);
TextOut(hScreen,0,0,'AAABBB',6);
end;

在屏幕上输出 AAABBB 后, 如何清除这些字符? 用程序代码实现.

[DemonLoveLizzy]

把你自己的窗体MOVE过去就可以擦除了

[ehom]

var
ARect: TRect;

ARect := Screen.DesktopRect;
Windows.InvalidateRect(0, @ARect, True);

不过你犯了个严重错误,你申请的DC资源居然没释放???

[todouwang]

学习

[aiirii]

警告whbo(王红波) :
你所回復的貼子, 都是 up, 學習, 太多! 個別up, 學習是沒問題的, 但大量的無效回復是不准許的, 再發現, 我會刪除!

[budded]

hoho, 老大发飚了，闪~~

[楚人无衣]

RedrawWindow(GetDeskTopWindow, nil, 0, RDW_ERASE or RDW_INVALIDATE or RDW_ALLCHILDREN);

[welllove88]

直接刷新窗体不可以吗？

[mscrack]

Windows.InvalidateRect(0, @ARect, True);
RedrawWindow(GetDeskTopWindow, nil, 0, RDW_ERASE or RDW_INVALIDATE or RDW_ALLCHILDREN);

这样好像都会使屏幕闪一下,能不让屏幕闪动而直接擦除吗?