[gelöst] Button, Groupbox etc. fotografieren/Screenshoot

[droppi]

Also beim Button geht das bei mir so:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var bit:tbitmap;
begin
bit:=tbitmap.Create;
bit.Width:=button1.Width;
bit.Height:=button1.Height;
button1.PaintTo(bit.Canvas,0,0);
bit.SaveToFile('c:\test.bmp');
end;

Analog dazu die Groupbox. Auch mit Paintto. Du musst halt nur die Größe des Bitmaps festlegen.