Bonjour,
Je reviens sur une petite chose que j'avais traité il y a peu :
ancien sujet
Ci joint donc le bout de code qui tourne en ce moment :
Et le problème :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
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 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);
Le texte de certains TMenuItems ne se fait pas toujours, ou alors pas tout de suite, il faut alors passer la souris devant afin de le faire apparaitre...le tout de manière assez aléatoire.
Il semble que pour que cela fonctionne proprement, il faille bouger assez doucement la souris sinon, une fois sur deux, il y a un problème a l'affichage...
Si quelqu'un a une idée pour améliorer ce petit soucis d'affichage...
Merci
@ +![]()
Partager