Speichern: Signal / Anzeige / Alarm wie bei Word

[Luckie]

Erzeuge ein neues Fenster (Formular) und beim Schliessen annimierst du es mit AnimateWindow entsprechend.

Form1:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Form2.ShowModal;
end;

Form2 für den Effekt:

Delphi-Quellcode:

procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  AnimateWindow(Handle, 400, AW_HIDE or AW_BLEND);
end;

procedure TForm2.Timer1Timer(Sender: TObject);
begin
  Close;
end;