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

Question

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

Answer 1

搞个form，timer设置它的top和left就行了

Answer 2

1#说的对，就是一个form窗体,改变它的top和left即可

Answer 3

但是怎样控制他的显示，是不是必须用timer控件，还有别的更好的方法吗？

Answer 4

大体类似如果你不用timer 用线程写死循环也一样。或是 写服务 （那也得写循环）还有一种办法就是 如果你要求的提示没有很强的及时性，可以在每次程序启动的时候提示

Answer 5

1.自己写消息，去控制它的top,left,right等；
2.可以使用msn控件，类似msn消息提示。

Answer 6

//显示位置
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;//其实就是个窗口，里面的内容就可以随便写了