Zitat von
Aenogym:
ich hab schon gesucht, aber nicht mal die schwizer haben einen tipp, wie ich ein control ein- und ausblenden kann.
Hast aber nicht im Microsoft Platform
SDK gesucht. Weil dort steht, warum's nicht geht.
Zitat:
The function will fail in the following situations:
- If the window uses the window region. Windows XP: This does not cause the function to fail.
- If the window is already visible and you are trying to show the window.
- If the window is already hidden and you are trying to hide the window.
- If there is no direction specified for the slide or roll animation.
- When trying to animate a child window with AW_BLEND.
Außerdem steht noch bei der Beschreibung von dwFlags:
Zitat:
AW_BLEND
Uses a fade effect. This flag can be used only if hwnd is a top-level window.
Und dein Panel wird wohl kein TopLevel Fenster sein.
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
begin
Panel1.Visible := False;
end;
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
AnimateWindow(Panel1.Handle, 500, AW_ACTIVATE or AW_HOR_POSITIVE);
AnimateWindow(Panel1.Handle, 500, AW_HIDE or AW_HOR_NEGATIVE);
end;