Image1.Picture.Icon.Handle := LoadImage(HInstance, 'MAINICON', IMAGE_ICON, 256, 256, 0);
Sehr gut, gegenüber dem hier, bei LoadImage() nimmt der tatsächlich bevorzugt die Größe die man eintippt.
Application.Icon.Handle := LoadIcon( hInstance, MAKEINTRESOURCE( 'MAINICON' ) );