как сделать скриншот

[xakkkkker]

как сделать скриншот определенной части экрана

[Карась]

Юзай поиск....
Взято с http://programmersforum.ru/archive/index.php/t-9.html

procedure TForm1.Button1Click(Sender: TObject);
var
bmp: TBitmap;
DC: HDC;

begin

bmp:=TBitmap.Create;

bmp.Height:=Screen.Height;
bmp.Width:=Screen.Width;

DC:=GetDC(0);

bitblt(bmp.Canvas.Handle, 0, 0, Screen.Width, Screen.Height,
DC, 0, 0, SRCCOPY);

bmp.SaveToFile('Screen.bmp');

ReleaseDC(0, DC);

bmp.Free;
end;

Как "снять" определёный участок экрана я думаю и так понятно..