Icono en un Submenu

[albls]

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:

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

espero sus respuestas
de antemano gracias

[cloayza]

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