Screenshot des eigenen Anwendungsfensters erstellen

[marabu]

Diese vielen komplizierten Befehle sind beindruckend, aber ich mache es lieber so:

Delphi-Quellcode:

procedure SaveFormImage(f: TForm; fn: TFileName);
begin
  with f.GetFormImage do
  begin
    SaveToFile(fn);
    Free;
  end;
end;

Freundliche Grüße vom marabu