OnAdvancedDrawItem sur les TMenuItems

Version imprimable

Bonsoir,
Une petite question qui devrait sembler toute bête...
J'ai 5 TMenuItems dans un TPopupMenu, avec la propriété OwnerDraw a true.
Donc dans l'évènement OnAdvancedDrawItem, j'appelle une fonction commune a tous les items :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 void __fastcall TfrmPrincipale::ComunMenuItemDraw(TObject *Sender, TCanvas *ACanvas, TRect &ARect, TOwnerDrawState State) { ACanvas->FillRect(ARect); if (State.Contains(odSelected)) { ACanvas->Font->Color = clRed; ACanvas->Font->Style = TFontStyles()<< fsBold; } else { ACanvas->Font->Color = clNavy; ACanvas->Font->Style = TFontStyles(); } ACanvas->TextRect(ARect, 2, 2, ((TMenuItem *)Sender)->Caption ); }
avec :
Code:

1 2 ComunMenuItemDraw(Sender, ACanvas, ARect, State);
Problème : seul le premier élément est dessiné...
Ca doit être idiot mais, je n'arrive pas a voir ce que je ne fais pas pour que cela fonctionne en totalité...

Merci d'avance,

@+ ;)

Bonjour,
J'ai modifié un peu le bout de code, et j'obtiens un 'truc' amusant...Cette fois ci, le 'Caption' des TMenuItems apparait bien sur le popup - je le vois en survolant la place supposée des éléments de menus - mais tous au même endroit ! (:mouarf: )
Dois-je en déduire que le TCanvas (paramètre de la fonction OnAdvancedDrawItem) représente toute la surface du TPpopupMenu et non pas celle du TMenuItem en cours de dessin ?
Merci...
@ + ;)
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 ACanvas->Brush->Color = clSilver; ACanvas->FillRect(ARect); if (State.Contains(odSelected)) { ACanvas->Font->Color = clRed; ACanvas->Font->Style = TFontStyles()<< fsBold; ACanvas->Rectangle(ARect); } else { ACanvas->Font->Color = clNavy; ACanvas->Font->Style = TFontStyles(); } tagRECT* pRect = new tagRECT(); pRect->left = ACanvas->ClipRect.left; pRect->right = ACanvas->ClipRect.right; pRect->top = ACanvas->ClipRect.top; pRect->bottom = ACanvas->ClipRect.bottom; DrawText(ACanvas->Handle, ((TMenuItem*)Sender)->Caption.c_str(), ((TMenuItem*)Sender)->Caption.Length(), pRect, 2);

02/06/2006, 13h50
bandit boy

Salut Cantrelle,
Je ne sais pas si cela peut t'aider, mis j'ai trouvé ca dans l'aide de Builder:

Citation:

Description

Write an OnAdvancedDrawItem event handler to render the image of a menu item in an owner-draw menu. The ACanvas parameter provides a drawing surface on which to draw the menu item. The ARect parameter indicates the boundaries (in pixels) of the menu item on that canvas. The State parameter is a set indicating various aspects of the menu items state such as whether it is selected, checked, grayed, and so on.

A priorie, le Canvas serait celui complet du menu item. Ca rejoint ton idée.

Salut,
J'ai un peu bricolé, a default de trouver qqchose de très carré.
J'ai changé le prototype de la fonction :

Code:

1
2
 
void __fastcall ComunMenuItemDraw(TObject *Sender, TCanvas *ACanvas, TRect &ARect, TOwnerDrawState State, int Index);

qui est appellée dans l'évènement OnAdvancedDrawItem ainsi:

Code:

1
2
 
ComunMenuItemDraw(Sender, ACanvas, ARect, State, ((TMenuItem*)Sender)->MenuIndex);

Ce qui donne, après qq tests :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
 
ACanvas->Brush->Color = clSilver;
ACanvas->FillRect(ARect);
if (State.Contains(odSelected))
{
ACanvas->Font->Color = clRed;
ACanvas->Font->Style = TFontStyles()<< fsBold;
ACanvas->Rectangle(ARect);
}
else
{
ACanvas->Font->Color = clNavy;
ACanvas->Font->Style = TFontStyles();
}
tagRECT* pRect = new tagRECT();
pRect->left = ACanvas->ClipRect.left;
pRect->right = ACanvas->ClipRect.right;
if (Index > 0)
{
        pRect->top = 20 * Index;
}
else
{
        pRect->top = ACanvas->ClipRect.top;
        pRect->bottom = ACanvas->ClipRect.bottom;
}
DrawText(ACanvas->Handle, ((TMenuItem*)Sender)->Caption.c_str(), ((TMenuItem*)Sender)->Caption.Length(), pRect, DT_CENTER);
//...

Voili...
@ + ;)