Ver Mensaje Individual
  #1  
Antiguo 04-01-2010
amerika111 amerika111 is offline
Miembro
 
Registrado: nov 2009
Posts: 168
Reputación: 0
amerika111 cantidad desconocida en este momento
Items en popupmenu

hola,, a todos,, tengo un problemilla con los caption de mis items de un popupmenu.

queria personalizarlos y ponerle color de fondo y letra bold, y size 9, font arial
y eso si lo logro colocando en la propiedad del popupmenu ownerdraw true y en cada item en el evento OndrawItem tengo el sig.cod


if Selected then
ACanvas.Brush.Color := clHighlight
else
ACanvas.Brush.Color := clSilver;
ACanvas.Font.Name := 'Arial';
ACanvas.Font.Size := 9;
ACanvas.Font.Style:=[fsBold];
ACanvas.FillRect(ARect);
ACanvas.TextOut(ARect.Left + 4,ARect.Top + 3, TMenuIte(Sender).Caption);

y si hace todo lo del color, la letra y todo eso nada mas que en el resultado
que muestra en los items como caption pone este simbolo & es:


&opcion1
&opcion2
&opcion3
&opcion4

y no tengo idea de como quitarlo, no se si alguien tenga alguna idea, de ser asi se los agradeceria.
Responder Con Cita