Скопировать часть изображения с экрана и поместить его на форму
Эта программа копирует кусок изображения экрана и выводит его на форму. procedure TForm1.Button1Click(Sender: TObject);var
dc: hDC;
begin
dc := GetDC(0);
BitBlt(Form1.Canvas.Handle, 0, 0,
Form1.ClientWidth, Form1.ClientHeight, dc,
0, 0, SRCCOPY);
ReleaseDc(0, dc);
end;
