Transparenter Frame?!

[Flodding]

sorry fürs doppelpost, aber irgendwie haut das doch nicht so richtig hin...

wenn der frame geladen wird, dann ist es genauso, wie es sein soll... aber ich habe ja durchsichtige buttons auf dem "semi-frame" und wenn ich jetzt mit der maus über die buttons fahre, dann wird der bereich in dem der button ist nach dem verlassen weiss und bleibt es auch... selbst wenn ich das mit timer wieder neu machen lasse...

Delphi-Quellcode:

constructor TFrame3.Create(AOwner: TComponent);
begin
  inherited;
  Brush.Style := bsClear;
end;

procedure TFrame3.CreateParams(var Params: TCreateParams);
begin
  inherited;
  Params.ExStyle := Params.ExStyle or WS_EX_TRANSPARENT;
end;

procedure TFrame3.PaintWindow(DC: HDC);
begin
// Muss stehen bleiben :D
end;

procedure TFrame3.Timer1Timer(Sender: TObject);
var Params: TCreateParams;
begin
  inherited;
  Brush.Style := bsClear;
  Params.ExStyle := Params.ExStyle or WS_EX_TRANSPARENT;
end;