Taskleiste taucht plötzlich auf

[TurboMartin]

Zitat von -=cats=-:

Delphi-Quellcode:

procedure TForm1.FormPaint(Sender: TObject);
begin
  if WindowState = wsMaximized then
  begin
   Button1.Visible := false;
   SpeedButton1.Visible := true;
   SpeedButton2.Visible := true;
   SpeedButton3.Visible := true;
   SpeedButton4.Visible := true;
    SetWindowLong(Handle, GWL_STYLE, GetWindowLong(Handle, GWL_STYLE) AND NOT WS_CAPTION);
  end;
end;

Weiß vielleicht jemand woran das liegt ?

Hatte ich gestern nicht das mit FormResize???

procedure TForm1.FormResize(Sender: TObject);
begin
if WindowState = wsMaximized then
begin
Button1.Visible := false;
SpeedButton1.Visible := true;
SpeedButton2.Visible := true;
SpeedButton3.Visible := true;
SpeedButton4.Visible := true;
SetWindowLong(Handle, GWL_STYLE, GetWindowLong(Handle, GWL_STYLE) AND NOT WS_CAPTION);
end;
end;
[/delphi]