1177
社区成员
如何清除TextOut输出的字符
var
hScreen:dword;
begin
hScreen:=GetDC(0);
TextOut(hScreen,0,0,'AAABBB',6);
end;
在屏幕上输出 AAABBB 后, 如何清除这些字符? 用程序代码实现.
hScreen:dword;
begin
hScreen:=GetDC(0);
TextOut(hScreen,0,0,'AAABBB',6);
end;
在屏幕上输出 AAABBB 后, 如何清除这些字符? 用程序代码实现.
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
mscrack 2004-10-13
- 打赏
- 举报
Windows.InvalidateRect(0, @ARect, True);
RedrawWindow(GetDeskTopWindow, nil, 0, RDW_ERASE or RDW_INVALIDATE or RDW_ALLCHILDREN);
这样好像都会使屏幕闪一下,能不让屏幕闪动而直接擦除吗?
RedrawWindow(GetDeskTopWindow, nil, 0, RDW_ERASE or RDW_INVALIDATE or RDW_ALLCHILDREN);
这样好像都会使屏幕闪一下,能不让屏幕闪动而直接擦除吗?
welllove88 2004-10-08
- 打赏
- 举报
直接刷新窗体不可以吗？
楚人无衣 2004-10-08
- 打赏
- 举报
RedrawWindow(GetDeskTopWindow, nil, 0, RDW_ERASE or RDW_INVALIDATE or RDW_ALLCHILDREN);
budded 2004-10-08
- 打赏
- 举报
hoho, 老大发飚了，闪~~
aiirii 2004-10-06
- 打赏
- 举报
警告whbo(王红波) :
你所回復的貼子, 都是 up, 學習, 太多! 個別up, 學習是沒問題的, 但大量的無效回復是不准許的, 再發現, 我會刪除!
你所回復的貼子, 都是 up, 學習, 太多! 個別up, 學習是沒問題的, 但大量的無效回復是不准許的, 再發現, 我會刪除!
todouwang 2004-10-06
- 打赏
- 举报
学习
ehom 2004-10-02
- 打赏
- 举报
var
ARect: TRect;
ARect := Screen.DesktopRect;
Windows.InvalidateRect(0, @ARect, True);
不过你犯了个严重错误,你申请的DC资源居然没释放???
ARect: TRect;
ARect := Screen.DesktopRect;
Windows.InvalidateRect(0, @ARect, True);
不过你犯了个严重错误,你申请的DC资源居然没释放???
DemonLoveLizzy 2004-10-02
- 打赏
- 举报
把你自己的窗体MOVE过去就可以擦除了