Méthode Dormant d'un TBitmap
Je travailles sur un composant de type TGroupCategory avec des cases à cocher, mais j'ai un scintillement lors du dessin de mon composant. Pour l'instant j'utilise pour dessiner ma coche une procédure :
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
| with originBounds do
begin
tpColor:=canvas.Font.Color;
Canvas.Pixels[left+8,top+3]:=clBlack;
Canvas.Pixels[left+9,top+3]:=clBlack;
Canvas.Pixels[left+3,top+4]:=clBlack;
Canvas.Pixels[left+8,top+4]:=clBlack;
Canvas.Pixels[left+3,top+5]:=clBlack;
Canvas.Pixels[left+7,top+5]:=clBlack;
Canvas.Pixels[left+8,top+5]:=clBlack;
Canvas.Pixels[left+3,top+6]:=clBlack;
Canvas.Pixels[left+4,top+6]:=clBlack;
Canvas.Pixels[left+7,top+6]:=clBlack;
Canvas.Pixels[left+4,top+7]:=clBlack;
Canvas.Pixels[left+6,top+7]:=clBlack;
Canvas.Pixels[left+7,top+7]:=clBlack;
canvas.Font.Color:=clblack;
canvas.MoveTo(left+4,top+8);
canvas.LineTo(left+7,top+8);
Canvas.Pixels[left+5,top+9]:=clBlack;
Canvas.Pixels[left+6,top+9]:=clBlack;
Canvas.Pixels[left+5,top+10]:=clBlack;
canvas.Font.Color:=tpColor;
end; |
En lisant les forums, j'ai eu l'idée de copier un bitmap plutot que d'utilsier cette méthode, et en regardant l'aide de Delphi je susi tombé sur Dormant mais je trouve que l'aide n'est pas suffisament explicite. Quelqu'un pourrait me dire si après avoir créer et dessiné mon Bitmap je peux utiliser Dormant pour libérer la ressource et continuer a dessiner mon itmap sur le canevas de mon composant ?
