MAINICON laden

[Luckie]

Das Anwendungsicon legt Delphi mit der Ressourcen ID MAINICON in der Ressource ab. Wie komme ich jetzt an das Icon über die ID dran?

Delphi-Quellcode:

class procedure TAboutWnd.MsgBox(hParent: THandle; IconID: DWORD);
var
  MsgInfo           : TMsgBoxParams;
  s: String;
begin
  s := Format('%s - %s' + #13#10#13#10 + '%s' + #13#10 + '%s', [TAboutWnd.GetFileInfo(ParamStr(0), 'ProductName'),
    TAboutWnd.GetFileVersion(ParamStr(0)), COPYRIGHT, URI]);

  MsgInfo.cbSize := SizeOf(TMsgBoxParams);
  MsgInfo.hwndOwner := hParent;
  MsgInfo.hInstance := GetWindowLong(hParent, GWL_HINSTANCE);
  MsgInfo.lpszText := PChar(s);
  MsgInfo.lpszCaption := PChar(TAboutWnd.GetFileInfo(ParamStr(0), 'ProductName'));
  MsgInfo.dwStyle := MB_USERICON;
  MsgInfo.lpszIcon := MAKEINTRESOURCE(IconID);
  MessageBoxIndirect(MsgInfo);
end;

Wenn ich bei MAKEINTRESOUORCE 'MAINICON' angebe passiert nichts.