Draw application icon in TImage

Posted in Graphics

Use Assign method, like this example:

  Image1.Picture.Icon.Assign(Application.Icon)