VBNet - Форум - Помогите найти прогру захвата экрана с исходником.

Вопрос: Помогите найти прогру захвата экрана с исходником. Добавлено: 15.01.06 19:53

Автор вопроса: Angel-9989 | ICQ: 214814801

Помогите,пожалуйста девушке найти прогру захвата экрана,выделенной области. никак не могу найти! В инете только один EXE-шники!!
Ответить

Ответы Всего ответов: 13

Номер ответа: 1 Автор ответа: SLAVA Вопросов: 8 Ответов: 22	Профиль \| \| #1	Добавлено: 15.01.06 21:06
	КЛАВИША Prt Scr SusRq тебя не устроит Ответить

Номер ответа: 2 Автор ответа: HACKER Разработчик Offline Client Вопросов: 236 Ответов: 8362	Профиль \| \| #2	Добавлено: 15.01.06 22:58
	Можешь чуть конкретний? Или тебе чисто сырсы готовой проги по захвату выделенной области? Просто может пошагово объяснить, как веделить область, как получить изображение итп? Кста... есть такие проги... пойщи например на этом сайте, неужели нет ничего похожего? Ответить

Номер ответа: 3 Автор ответа: Alexandrus ICQ: 496782368 Вопросов: 18 Ответов: 312	Web-сайт: starsorion.com Профиль \| \| #3	Добавлено: 16.01.06 19:38
	Hi All! Angel-9989: Для начала вот тебе процедура захвата всего экрана c разрешением 1024х768.Дальше конкретней,как и написал HACKER.'Огласите весссь список пжалста'...) Private Declare Function GetDesktopWindow Lib "user32" () As Long Private Declare Function GetDC Lib "user32" (ByVal hWnd As Long) As Long Private Declare Function BitBlt Lib "gdi32" (ByVal hDestDC As Long, ByVal x As Long, ByVal y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal dwRop As Long) As Long Private Declare Function ReleaseDC Lib "user32" (ByVal hWnd As Long, ByVal hdc As Long) As Long Dim hwndSrc As Long Dim dwRop As Long Dim hSrcDC As Long Dim tmpValue As Variant Picture1.ScaleMode = vbPixels dwRop = &HCC0020 hwndSrc = GetDesktopWindow() hSrcDC = GetDC(hwndSrc) tmpValue = BitBlt(Picture2.hdc, 0, 0, 1024, 768, hSrcDC, 0, 0, dwRop) tmpValue = ReleaseDC(hwndSrc, hSrcDC) Pictur1.Picture = Picture2.Image Pictur1.ScaleMode = vbTwips Поэксперементируй со значениями BitBlt... С ув. Alex Ответить

Номер ответа: 4 Автор ответа: Neco ICQ: 247906854 Вопросов: 133 Ответов: 882	Web-сайт: neco.pisem.net Профиль \| \| #4	Добавлено: 17.01.06 04:34
	По-моему с этого сайта я скачивал файл RA.exe (или rar) в котором были заготовки для RAdminа на VB. Ответить

Номер ответа: 5 Автор ответа: HACKER Разработчик Offline Client Вопросов: 236 Ответов: 8362	Профиль \| \| #5	Добавлено: 17.01.06 20:54
	Да, но там целяком экран... а целяком проще всего через SendKeys + Clipboard... alexandrus показал пример копирования, осталось разъяснить, что: tmpValue = BitBlt(Picture2.hdc, x1, y1, x2, y2, hSrcDC, 0, 0, dwRop) где x1,y1 координаты начальной точки x2, y2 соответственно координаты конечной...между ними отрезок, как правело это диагональ, исходя из неё получается квадрат который и копируется (грубо говоря конечно)... Осталось показать девушке пример выделения, и намекнуть что полученные размеры выделения надо подставить именно в BitBlt... Ответить

Номер ответа: 6 Автор ответа: Angel-9989 ICQ: 214814801 Вопросов: 1 Ответов: 3	Профиль \| \| #6	Добавлено: 18.01.06 18:10
	спасибо,но возник еще вопрос: что нужно изменить,чтобы сделать захват выделенной области? тами по-другому описывается или просто меняются координаты? спасибочки Ответить

Номер ответа: 7 Автор ответа: HACKER Разработчик Offline Client Вопросов: 236 Ответов: 8362	Профиль \| \| #7	Добавлено: 18.01.06 19:21
	а это смотря как выделять Например фоткнуть весть экран и показать саму фотку на весь экран, но с возможностью выдиления... Пользователь выделит, и уже потом выделенную область ещё раз BitBlt... Ответить

Номер ответа: 8 Автор ответа: Angel-9989 ICQ: 214814801 Вопросов: 1 Ответов: 3	Профиль \| \| #8	Добавлено: 19.01.06 19:38
	большое спасибо!!! Можно попробовать!!Только не знаю как получится с выделением,но я попробую! еще раз спасибо большое Ответить

Номер ответа: 9 Автор ответа: HACKER Разработчик Offline Client Вопросов: 236 Ответов: 8362	Профиль \| \| #9	Добавлено: 19.01.06 21:24
	Чуть помогу с выделением... Похоже проще всего цыплятся за PictureBox, т.к. его "яж приятно" двигать API'шками ReleaseCapture+SendMessage вообщем вот: http://webfile.ru/757227 Ответить

Номер ответа: 10 Автор ответа: HACKER Разработчик Offline Client Вопросов: 236 Ответов: 8362	Профиль \| \| #10	Добавлено: 19.01.06 22:10
	http://www.vbnet.ru/samples/download.aspx?id=276 Ответить

Номер ответа: 11 Автор ответа: AgentFire ICQ: 192496851 Вопросов: 75 Ответов: 3178	Профиль \| \| #11	Добавлено: 20.01.06 00:29
	Народ, в RAdmin'е юзаится мега ф-я, которую нам фик написать на VB. Сервер передает ТОЛЬКО изменившиеся участки экрана, которые он получает от этой АСМ-функции. Если передавать весь экран - увольте Ответить

Номер ответа: 12 Автор ответа: Angel-9989 ICQ: 214814801 Вопросов: 1 Ответов: 3	Профиль \| \| #12	Добавлено: 26.01.06 19:59
	Вот еще одна загвоздка: как очистить форму и экран от предыдущего сохранения,чтобы не было наложения изображений??? Ответить

Номер ответа: 13 Автор ответа: HACKER Разработчик Offline Client Вопросов: 236 Ответов: 8362	Профиль \| \| #13	Добавлено: 27.01.06 17:45
	me.Refresh ? Ответить

Страница: 1 |