如何清除TextOut输出的字符

Question

var
  hScreen:dword;
begin
  hScreen:=GetDC(0);
  TextOut(hScreen,0,0,'AAABBB',6);
end;在屏幕上输出 AAABBB 后, 如何清除这些字符? 用程序代码实现.

Answer 1

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

Answer 2

var
  ARect: TRect;ARect := Screen.DesktopRect;
Windows.InvalidateRect(0, @ARect, True);不过你犯了个严重错误,你申请的DC资源居然没释放???

Answer 3

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

Answer 4

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

Answer 5

Windows.InvalidateRect(0, @ARect, True);
RedrawWindow(GetDeskTopWindow, nil, 0, RDW_ERASE or RDW_INVALIDATE or RDW_ALLCHILDREN);这样好像都会使屏幕闪一下,能不让屏幕闪动而直接擦除吗?