Per Mausklick Formular als BMP abspeichern

[uwi1961]

Hallo Mindforce, hier eine Lösung mit dem Umweg Zwischenablage...

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  FormImage: TBitmap;
begin
  FormImage := GetFormImage;
  try
    Clipboard.Assign(FormImage);
    FormImage.SaveToFile('c:\Test.bmp');
  finally
    FormImage.Free;
  end;
end;

nicht vergessen die Unit "Clipbrd" einzubinden.

Gruß Uwe.