Как получить изображение с TCustomControl в TBitmap?
Вот есть, например, TButton. Он определенного цвета, на нем что-то написано и т.д.. Как получить скан-изображение с него, и поместить это изображение в TBitmap?
Модератор: Модераторы
if (cnt is TWinControl) then begin
btm:= TBitmap.Create;
btm.SetSize(cnt.ClientWidth, cnt.ClientHeight);
TWinControl(cnt).PaintTo(btm.Canvas, 0, 0); //External: SIGSEGV
btm.SaveToFile(ParamStr(0)+'.bmp');
FreeAndNil(btm);
end;
if (cnt is TWinControl) then begin
btm:= TBitmap.Create;
btm.SetSize(cnt.Width, cnt.Height);
TWinControl(cnt).PaintTo(btm.Canvas, 0, 0);
btm.SaveToFile(ParamStr(0)+'.bmp');
FreeAndNil(btm);
end;
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 33