关于animatewindow（）的使用

[lxl]

用以下代码，为什么在动画时看不到图片？
procedure Tsplashfrm.FormShow(Sender: TObject);
begin
image1.picture.loadfromfile(extractfilepath(application.exename)+'bmp\splash.bmp');
animatewindow(splashfrm.handle,1200,AW_HOR_POSITIVE);
image1.picture.loadfromfile(extractfilepath(application.exename)+'bmp\splash.bmp');
end;

[coolfilm]

你为何不用IMAGE.HANDLE哪!

[naughtyboy]

直接加上消息处理就行了
private
{ Private declarations }
procedure WMPrintClient(var msg: TMessage);message wm_printclient;

procedure TForm1.WMPrintClient(var msg: TMessage);
begin
PaintTo(HDC(msg.WParam),0,0);
end;

[lxl]

NAUGHTYBOY：好久没看到你啦，加了代码，还是一样的，看不到图片

[naughtyboy]

应该不会
我这里运行的好好的
2000 pro
D6

[lxl]

呵呵不好意思
另外的地方有点小问题
解决了谢谢各位

[liuhelin]

The window procedures for the window and its child windows may need to handle any WM_PRINT or WM_PRINTCLIENT messages. Dialog boxes, controls, and common controls already handle WM_PRINTCLIENT. The default window procedure already handles WM_PRINT.

[lxl]

是因为WM—PRINT和WM—PRINTCLIENT的关系？
没明白，请再赐教

[Xleep]

可能需要在该窗口的窗口过程和它的子窗口的窗口过程中处理WM_PRINT或WM_PRINTCLIENT消息。对话框，控制，及共用控制已处理WM_PRINTCLIENT消息，缺省窗口过程也已处理WM_PRINT消息。