Banner no Mainmenu

30/08/2004

Colegas,

na edição 54 do Clube Delphi tem uma rotina para colocar um banner no Mainmenu. Até aí tudo bem, porém se o item estiver desabilitado (enable = false), o evento Ondrawitem não respeita e não redesenha como desabiltado. Ña verdade ele fica desabiltado, só o desenho é que não mostra isso. Alguém saberia o que deve ser feito para que na hora que ele redesenhasse o item ele o fizesse respeitando a sua condição?

evento ondrawitem :

ACanvas.FillRect(ARect);
ACanvas.TextOut(ARect.Left +
Image2.Width + ImageList1.Width + 5 , ARect.Top + 5,
Image2.Width + ImageList1.Width + 5 , ARect.Top + 5,
StripHotkey((Sender as TMenuItem).Caption));
ACanvas.Draw(0, 0, Image2.Picture.Graphic);
ImageList1.draw(ACanvas, ARect.Left +
Image2.Width, ARect.Top,
(Sender as TMenuItem).ImageIndex);

grato pela a atenção e tenham um bom dia.


Muxagata