Problemas con un Panel del StatusBar - psOwnerDrw

[[sitrico]]

Tengo un problema con un panel de un tStatusBar en el que muestro un ProgressBar de la siguiente manera:

http://delphi.about.com/library/weekly/aa030805a.htm

La única diferencia es que cuando termino el proceso, oculto el progressBar

Código Delphi [-]
ProgressBar.Visible := False

En Win98 funcionaba perfecto pero en WinXP, al ocultar el ProgressBar Windows (siempre la culpa es de otro ) dibuja un area aleatoria de la pantalla en el espacio que ocupaba el ProgessBar, en lugar de dejarlo vacio.

Traté lo siguiente: (dentro del evento OnDrawPanel)

Código Delphi [-]
StatusBar.Canvas.FillRect(Rect);

Que debería "pintar" y vaciar el área del panel, pero tampoco funciona.

Alguna idea de que otra cosa puedo hacer para que no quede la "basura" en pantalla. Gracias

[paldave]

Prueba esto luego de borrar el StatusBar:

Código Delphi [-]
StatusBar1.Repaint;
StatusBar1.Invalidate;

Suerte.