qq登录后窗口右下角自动出现一消息框

Question

如何用delphi实现：qq登录后窗口右下角自动出现一消息框这样的效果。

Answer 1

弄一个窗体show出来即可，简单的小要。

Answer 2

弄一个窗体show出来即可，简单的要死。至于位置可以用screen.width来获取。

Answer 3

只要设置好窗体的left,和top就可以了。

Answer 4

1.動畫顯示窗體
unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation{$R *.dfm}procedure TForm1.FormCreate(Sender: TObject);
begin
 AnimateWindow(Handle,2000{速度:2秒},AW_BLEND);
{ AW_HOR_POSITIVE = $00000001;
  AW_HOR_NEGATIVE = $00000002;
  AW_VER_POSITIVE = $00000004;
  AW_VER_NEGATIVE = $00000008;
  AW_CENTER = $00000010;
  AW_HIDE = $00010000;
  AW_ACTIVATE = $00020000;
  AW_SLIDE = $00040000;
  AW_BLEND = $00080000;
}end;end.

Answer 5

2.類似MSN或QQ的消息框...unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ExtCtrls;type
  TForm1 = class(TForm)
    Timer1: TTimer;
    procedure FormCreate(Sender: TObject);
    procedure Timer1Timer(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation{$R *.dfm}procedure TForm1.FormCreate(Sender: TObject);
begin
  Form1.Top:=Screen.Height;
  Form1.Left:=Screen.Width-Form1.Width;
  Timer1.Enabled:=True;
end;procedure TForm1.Timer1Timer(Sender: TObject);
begin
  //Interval設定為10
  Form1.Top:=Form1.Top-1;
  if Form1.Top=Screen.Height-Form1.Height Then
  Timer1.Enabled := False;
end;end.

Answer 6

善用搜索引擎：http://www.2ccc.com/article.asp?articleid=4412

Answer 7

還有一個組件：msnpopup-5.0，直接安裝後，會有一個類似MSN的組件

Answer 8

是在form1.create里加上form2.show吗？不可以的。这样的话会让form2先出现，form1后出现。
如果把form2.show加在别的地方还要人为的调用。

Answer 9

LZ,你不想去人为的控制他弹出，
为什么不用加上时钟控件。在时钟控件里面写代码，让他弹出窗体，弹出窗体的效果可用不着“kye_jufei”所说有效果，即
procedure TForm1.FormCreate(Sender: TObject);
begin
  AnimateWindow(Handle,2000{速度:2秒},AW_BLEND);
{ AW_HOR_POSITIVE = $00000001;
  AW_HOR_NEGATIVE = $00000002;
  AW_VER_POSITIVE = $00000004;
  AW_VER_NEGATIVE = $00000008;
  AW_CENTER = $00000010;
  AW_HIDE = $00010000;
  AW_ACTIVATE = $00020000;
  AW_SLIDE = $00040000;
  AW_BLEND = $00080000;
}
end;