Dim Icon2 As Bitmap
Dim ph As Phone
Dim can As Canvas
Dim rc As Rect
icon2.InitializeMutable(48,48)
can.Initialize2(icon2)
rc.Initialize (0,0,47,47)
icon2.InitializeMutable(48,48)
can.DrawDrawable(ph.GetResourceDrawable(17301581), rc) ''ic_menu_rotate
Activity.AddMenuItem2("Kennwort ändern", "mnuChangePasswd", Icon2 )