F
formiss
Unregistered / Unconfirmed
GUEST, unregistred user!
如题:窗体在打开时或切换时,图片会一块块的显示出来,而不是整体全部显示出来。造成一种运行慢的体验。有没有办法,让窗体图片都加载完成后,再整体显示出来。procedure TFormMain.CreateParams(var Params: TCreateParams);begin inherited; Params.ExStyle := WS_EX_COMPOSITED; //0x 02 00 00 00end;这段代码,虽然可以实现整体显示。但是,窗体会处于假死的状态,反应很慢。下面的这段代码也试过了,不能达到效果。 SendMessage(Handle, WM_SETREDRAW, 0, 0); // 切换代码 SendMessage(Handle, WM_SETREDRAW, 1, 0); RedrawWindow(Handle, nil, 0, RDW_INVALIDATE + RDW_ALLCHILDREN + RDW_NOINTERNALPAINT);