Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Items en popupmenu (https://www.clubdelphi.com/foros/showthread.php?t=65656)

amerika111 04-01-2010 11:48:18

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.

cocute 04-01-2010 13:41:29

muy facil
en el AutoHotkeys del TPopupMenu (no de los items) ponlo en maManual

amerika111 04-01-2010 20:42:46

ooo ya gracias tienes toda la razon nada mas lo puse en manual y ya quedo..

gracias.....:):):)


La franja horaria es GMT +2. Ahora son las 08:06:27.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi