Foros Club Delphi - Icono en un Submenu

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Internet (https://www.clubdelphi.com/foros/forumdisplay.php?f=3)

- - Icono en un Submenu (https://www.clubdelphi.com/foros/showthread.php?t=61746)

Icono en un Submenu

saludos...

Intento poner un icono en un submenu del MainMenu que proporciona
la form de "Windows Form Application" la default TWinForm

Código Delphi [-]Form1: TwinForm;
    campo1,
    campo: TBitmap;

esto en el Load de la Forma

Código Delphi [-] campo1:=TBitmap.Create;
     campo1.LoadFromFile('F:\Archivos de programa\Borland\BDS\3.0\Objrepos\DelphiWin32\About.ICO');
     campo:= TBitmap.Create;
     campo.LoadFromFile('F:\Archivos de programa\Borland\BDS\3.0\Objrepos\DelphiWin32\PASSWORD.ICO');
  SetMenuItemBitmaps(MainMenu1.Handle,0,MF_BYPOSITION,campo.Handle,campo1.Handle);

pero me sale este error:

Código:

[Error] WinForm.pas(171): E2010 Incompatible types: 'HMENU' and 'IntPtr'

espero sus respuestas
de antemano gracias

Creo que seria mejor que hicieras esto:

1) desde la paleta Win32 pincha un TImagelist.
2) Doble click sobre el TImageList, agregale los iconos o bitmap que desees.
3) En la propiedad "Images" del MainMenu, selecciona el imagelist.
4) En el editor del Mainmenu, ubica la opcion a la que deseas asignarle un icono, situate en la propiedad ImageIndex y selecciona el icono que quieras.

Saludos y suerte...

Un abrazo