关于trayicon的提示hint二次更改的问题~~~~~~~急！

Question

trayicon的提示不能二次更改，好象sztip只能和安装图标的过程写在一起，写在按钮下的Modify根本不起作用，很显然，这个更改hint的消息没有传递过去！我在安装 Icon的过程里使用了下面的两句：
    while(GetMessage(Msg, Handle, 0, 0)) do
    begin
    TranslateMessage(msg);
    DispatchMessage(msg);
    end;    运行之后窗体上的组件除Label其余全部消失了，我只知道这几句是处理消息用的，但是却不知道如何用！请哪位高手指点一下，我确信这几句可以解决我的这个问题，谢谢！

Answer 1

不懂不懂！TrayIcon怎么与按钮和Label扯上关系了，还要用到Message??

Answer 2

    while(GetMessage(Msg, Handle, 0, 0)) do
    begin
           TrayIcon.Hint := Msg;
    end;

Answer 3

if Msg=''
  TrayIcon.Hint:=' ';