我没碰到你的问题。请确认有imagelist，里面至少有两个图标，并且imagelist已与trayicon关联。然后放一个checkbox，测试代码：procedure TForm1.CheckBox1Click(Sender: TObject);beginTrayIcon1.Animate:=CheckBox1.Checked;end;我测试的结果，一切正常，可以自由控制。
