Выбираем иконку в зависимости от разрешения экрана

Нужно только проверить текущую разрешающую способность и изменить дескриптор иконки приложения...

Поместите это в файл проекта (.DPR) Вашего приложения:

Application.Initialize; 
Application.CreateForm(TForm1, Form1); 
CASE GetDeviceCaps(GetDC(Form1.Handle), HORZRES) of 
   640 : Application.Icon.Handle := LoadIcon (hInstance, 'ICON640'); 
   800 : Application.Icon.Handle := LoadIcon (hInstance, 'ICON800'); 
  1024 : Application.Icon.Handle := LoadIcon (hInstance, 'ICON1024'); 
  1280 : Application.Icon.Handle := LoadIcon (hInstance, 'ICON1280'); 
END; 
Application.Run;

Это все ! (Совет найден в сообщении Gerry Jacobs. () )