修改图标资源(50)

自行添加了myres.rc文件ico1 icon ../img/online.icoico2 icon ../img/offline.ico；但是用下面的代码却把我的主界面的图标也修改了，我知道是句柄的问题。后来又修改了为procedure TForm1.CheckBox1Click(Sender: TObject);beginif CheckBox1.Checked thenImage2.Picture.Icon.Handle :=LoadIcon(image2.Picture.Icon.Handle,'ico1')elseImage2.Picture.Icon.Handle :=LoadIcon(image2.Picture.Icon.Handle,'ico2')end;问题来了，之后就不能正确的运行了。大家能否帮我看看？

[]

Image2.Picture.Icon.Handle :=LoadIcon(image2.Picture.Icon.Handle,'ico1')自己玩自己？

自己已经搞定了。