Wallpaper Calendar这样的效果如何实现

Question

就是Wallpaper Calendar这样的效果，在桌面上显示程序界面，能直接在上面超作
下面的地址是介绍Wallpaper Calendar 的http://www.yesky.com/SoftChannel/72350089900720128/20030710/1713338.shtml

Answer 1

先得到Desktop的句柄，然后直接TextOut或者Draw就是了

Answer 2

将窗体设置为bsnone，在上面做你想做的东西就可以了

Answer 3

你可以利用窗体的alphablend实现半透明的效果

Answer 4

忘了一点需要覆盖createparam来将窗体设置为topmost
procedure TDragForm.CreateParams(var Params: TCreateParams);
begin
  inherited CreateParams(Params);
  Params.ExStyle := Params.ExStyle or WS_EX_TOPMOST or WS_EX_TOOLWINDOW;
  Params.WndParent:=0;
end;

Answer 5

to hkbarton(宁静至远||淡泊明志)
应该不是这么简单，窗体是在桌面图标的下面，可以说和桌面背景一样的，当时可以在上面操作
有人给我说用Windows Shell，不知道行不，我也不懂Windows Shell

Answer 6

覆盖窗体的createparam使窗体为topmost就可以在最上面了
procedure TForm1.CreateParams(var Params: TCreateParams);
begin
  inherited CreateParams(Params);
  Params.ExStyle := Params.ExStyle or WS_EX_TOPMOST or WS_EX_TOOLWINDOW;
  Params.WndParent:=0;
end;