如何在程序运行时更改其图标?

比如当符合条件时图标变成另外一种?

解决方案 »

  1.   

    Application.Icon.LoadFromFile('图标文件');如果还想让用户指定图标的话，则
    Application.Icon.LoadFromFile(OpenPictureDialog1.FileName);搞定了！
      

  2.   

    Form的就可以改
    Exe的就改不了了
      

  3.   

    Exe的也可以改，用Applicaton类就可以了，比如说正常情况下图标为一个笑脸，最小化后可以变为一个哭脸。
      

  4.   

    那要在exe生成之前把这个条件设上去
    procedure TForm1.Button7Click(Sender: TObject);
    begin
    application.Icon.LoadFromFile('c:\online.ico');
    end;procedure TForm1.Button6Click(Sender: TObject);
    begin
    application.Icon.LoadFromFile('c:\offline.ico');
    end;
    利用条件实现上述两个按钮的事件
      

  5.   

    >比如程序判断当前为12:00时图标自动由原来的笑脸变哭脸
    可以使用now函数获得现在的系统时间，然后在使用上面的方法就可以了
      

  6.   

    楼上的才是正解
    [结贴]shiyi:100分