Habe immer noch keine richtige Lösung gefunden
Ich hab's auch mal probiert die Scrollbox in ein Bild umzuwandeln, aber hier fehlen dann
auch controls wie TEdit, TComboBox, etc.
Delphi-Quellcode:
bmp := TBitmap.Create;
try
bmp.Width := scrollbox.HorzScrollBar.Range;
bmp.Height := scrollbox.VertScrollBar.Range;
bmp.Canvas.Lock;
SetMapMode (bmp.Canvas.Handle, MM_ISOTROPIC);
SetWindowExtEx (bmp.Canvas.Handle, bmp.Width, bmp.Height, nil);
SetViewportExtEx (bmp.Canvas.Handle, bmp.Width, bmp.Height, nil);
scrollbox.Perform (WM_PAINT, bmp.Canvas.Handle, 1);
bmp.SaveToFile ('C:\irgendwas.bmp');
bmp.Canvas.Unlock;
finally
bmp.Free;
end;
Also bin ich immer noch auf der Suche nach einer Lösung