delphi制作的程序在左面右上角弹出提示

delphi制作的程序在左面右下角弹出提示
各位大侠，俺有一个问题：就是怎样制作delphi的提示信息，就像金山的提示一样，这是怎样实现的呢，是不是在后台运行的呢？请各位高手给一个详细的方法，或者例子

[解决办法]
搞个form，timer设置它的top和left就行了
[解决办法]
1#说的对，就是一个form窗体,改变它的top和left即可
[解决办法]
大体类似

如果你不用timer 用线程写死循环也一样。或是 写服务 （那也得写循环）

还有一种办法就是 如果你要求的提示没有很强的及时性，可以在每次程序启动的时候提示
[解决办法]

Delphi(Pascal) code

//显示位置procedure TMSNPop.FormCreate(Sender: TObject);begin      self.Left:=POS_Main.Width-self.Width;      self.Top:=POS_Main.Height;end;//从下面升上来procedure TMSNPop.Timer1Timer(Sender: TObject);begin    Self.Top:=Self.Top-5;    if   Self.Top<POS_Main.Height-Self.Height   then    begin        Timer1.Enabled :=False;        Timer2.Enabled:=True; //这个是定时关闭用的    end;end;//其实就是个窗口，里面的内容就可以随便写了