Delphi Inhalt des Forms als Bild speichern

Thema durchsuchen

Ansicht

Themen-Optionen

Inhalt des Forms als Bild speichern

Ein Thema von eisblock · begonnen am 29. Aug 2006 · letzter Beitrag vom 29. Aug 2006

Vorheriger Beitrag

Nächster Beitrag

Martin K

Registriert seit: 20. Okt 2005
919 Beiträge

Turbo Delphi für Win32

Re: Inhalt des Forms als Bild speichern

29. Aug 2006, 15:14

Müsste so gehen:

zusammenfalten · markieren

Delphi-Quellcode:

			procedure TForm1.Button1Click(Sender: TObject);

var BMP: TBitmap;

begin

  BMP := TBitmap.Create;

  try

    BMP.Width := ClientWidth;

    BMP.Height := ClientHeight;

    BMP.Canvas.CopyRect(Rect(0, 0, BMP.Width, BMP.Height), Canvas, Rect(0, 0, ClientWidth, ClientHeight));

    BMP.SaveToFile('C:\test.bmp');

  finally

    BMP.Free;

  end;

end;

Habs aber nich getestet...