Windows SystemMessage Icons in 16x16 laden?

[turboPASCAL]

Versuch es mal bitte so:

Delphi-Quellcode:

procedure ...
var Icon: TIcon;
begin
  Icon := TIcon.Create;
  try
    Icon.Handle := LoadImage(0, IDI_ERROR, Image_Icon, 16, 16, LR_SHARED);
    Image4.Picture.Assign(Icon);
  finally
    Icon.Freee;
  end;
end;

Ich glaube aber unter XP / Vista gibt es keine Grössen von 16*16 bei IDI_ERROR & Co.
Die beginnen wohl erst bei 32x32.