Schliessen-Button wie bei BalloonTips von XP selbst gemacht

[Helmi]

Hallo

mit diesem Code erzeug ich den Button in der PaintBox:

Delphi-Quellcode:

  with PaintBox1 do
    begin
      DrawFrameControl(Canvas.Handle, ClientRect, DFC_CAPTION, DFCS_CAPTIONCLOSE + DFCS_FLAT + DFCS_HOT + DFCS_TRANSPARENT);
    end;

Nur wie muss ich das nun machen, dass der Button wechselt? - im Code oben ist ja das DFCS_HOT schon mit dabei.
Wenn ich es rauslasse, dann seh ich erst mal keinen Unterschied.