为了让form不闪烁,我需要重新form上的所有控件,但是由于我的窗体上有panel、PageControl、ScrollBox,分别对控件进行refresh均

  • 主题发起人 主题发起人 whitelion
  • 开始时间 开始时间
W

whitelion

Unregistered / Unconfirmed
GUEST, unregistred user!
为了让form不闪烁,我需要重新form上的所有控件,但是由于我的窗体上有panel、PageControl、ScrollBox,分别对控件进行refresh均有局部没有重画,有没有办法让窗体上的所有控件全部重画。(50分)<br />如题
 
Form1.DoubleBuffered:=True;//在窗体创建时

Form1.Refresh;
 
我的程序 ; ; ; ;
; ; ; ; HWND myhandle;
; ; ; ; myhandle=main-&gt;Handle;
; ; ; ; SendMessage(myhandle,WM_SETREDRAW,false,0);
; ; ; ; ......
; ; ; ; 界面操作
; ; ; ; ......
; ; ; ; SendMessage(myhandle,WM_SETREDRAW,true,0);
; ; ; ; main-&gt;Refresh();
不能刷新
 
for i := to ComponentCount - 1 do
begin
; if Components is TControl then TControl(Components).Refresh;
end;
 
多人接受答案了。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
后退
顶部