![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
|
Люди у кого есть исходник на DELHI??? срочно нужно
|
|
#2
|
||||
|
||||
|
Понять бы, что автор хотел сказать.
|
|
#3
|
|||
|
|||
|
Цитата:
приложение по выделенной области, делает PrintScreen экрана |
|
#4
|
||||
|
||||
|
MouseDown - выделяем нужный участок.
MouseUp - копируем выделенный RECT в буфер. Код:
function CaptureScreenRect(ARect: TRect): TBitmap;
var
ScreenDC: HDC;
begin
Result := TBitmap.Create;
with Result, ARect do
begin
Width := Right - Left;
Height := Bottom - Top;
ScreenDC := GetDC(0);
try
BitBlt( Canvas.Handle, 0, 0, Width, Height, ScreenDC, Left, Top, SRCCOPY);
finally
ReleaseDC(0, ScreenDC);
end;
end;
end;Последний раз редактировалось angvelem, 13.12.2011 в 22:06. |
|
#5
|
|||
|
|||
|
Ок) спасибо, попробую запустить
|
|
#6
|
|||
|
|||
|
у кого готовая прога есть, тоже ссылки киньте рассмотрю и другие варианты проги
|
|
#7
|
||||
|
||||
|
А что, не смог довести до конца идею?
|
|
#8
|
|||
|
|||
|
нет вник в функцию.. я только начал изучать Delphi
|
|
#9
|
|||
|
|||
|
Цитата:
|
|
#10
|
||||
|
||||
|
Освобожусь немного и сделаю.
|
|
#11
|
|||
|
|||
|
хорошо..буду благодарен
|
|
#12
|
||||
|
||||
|
Как вариант:
|
|
#13
|
|||
|
|||
|
у меня скачать не получается почему то( по новой ссылке отправь
|
|
#14
|
||||
|
||||
|
Нормально скачивается.
|
|
#15
|
|||
|
|||
|
Спасибо большое)) то что мне нужно как раз
|