请问谁知道msn那个提示窗口（从右下脚弹出的）是怎么实现的/

Question

如题

Answer 1

就是移动窗口呗，如：
procedure TForm1.FormCreate(Sender: TObject);
begin
  form1.BorderStyle := bsDialog;
  form1.Width := 200;
  form1.Height := 160;
  form1.Left := screen.Width - form1.Width;
  form1.Top := screen.Height;
  timer1.Interval := 10;
  timer1.Enabled := true;
end;procedure TForm1.Timer1Timer(Sender: TObject);
begin
  if form1.Top > (screen.Height - form1.Height) then
    form1.Top := form1.Top - 1
  else
    timer1.Enabled := false;
end;

Answer 2

这个可以实现移动窗口，但是你发现没，msn的那个窗口是没有输入焦点的，
也就是说当你在干别的，例如写程序时，收到消息弹出窗口，焦点并没有转移到弹出窗口那里，你还可以照样敲代码。不影响你的工作。
而一般的弹出窗口是会获得焦点的。
望指教！

Answer 3

给我你的邮箱，我给你一个绝对ok的例子我的QQ：17042473

Answer 4

我也想要一个例子，麻烦你了！[email protected]

Answer 5

非常感谢shadowfish的热心帮助。

Answer 6

Goldteerfei(卖海豚的女孩) :给你也发了