Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 | 2 |

 

  Вопрос: Несколько вопросиков Добавлено: 05.04.06 17:20  

Автор вопроса:  AsHeS | ICQ: 229759992 
1) Как получить скрин ВСЕГО экрана и запихнуть его в объект image ? Понимаю что тема поднималась , но мне нуно чтоб именно ЦЕЛЫЙ экран и простота залог здоровья.
2) Когда картинка у меня в image как поно получать у неё цвет пикселей ? В QBASIC я это когда-то делал но хоть убей не помню как. Мне нужно проводить анализ картинки.
3) Как управлять мышкой - двигать её и нажимать клавиши (кстати координаты в пикселях ?)

Прошу писать подробно и понятно, а то я не всегда толком понимаю - приходится переспрашивать

Заранее спасибо

PS
Млин, я слепой - где на форуме поиск то ???

Ответить

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

Номер ответа: 1
Автор ответа:
 AsHeS



ICQ: 229759992 

Вопросов: 14
Ответов: 93
 Профиль | | #1 Добавлено: 05.04.06 17:27
Ах да , совсем забыл. Можно ли получать значение переменной в памяти , по принципу работы программы артмани (мне нужно считывать значение переменной одной проги и вести её лог)

Ответить

Номер ответа: 2
Автор ответа:
 LeX



ICQ: 301424893 

Вопросов: 28
Ответов: 277
 Web-сайт: www.vbkoders.info
 Профиль | | #2
Добавлено: 05.04.06 17:38
Поиск в самом низу :-) Посерединке. :-)))

Ответить

Номер ответа: 3
Автор ответа:
 Nj



ICQ: 223663115 

Вопросов: 21
Ответов: 285
 Профиль | | #3 Добавлено: 05.04.06 17:46
Отвечаю, что знаю.
на 2.
Чтобы получить цвет конкретного пиксела используется функция Point(x,y) - но она
с image не работает, а работает например с PictureBox
a=PictureBox.Point(x,y)

Ответить

Номер ответа: 4
Автор ответа:
 AsHeS



ICQ: 229759992 

Вопросов: 14
Ответов: 93
 Профиль | | #4 Добавлено: 05.04.06 17:54
Ну думаю мн ничего не помешает юзать PictureBox
Главное туды скрин впихнуть

Ответить

Номер ответа: 5
Автор ответа:
 AsHeS



ICQ: 229759992 

Вопросов: 14
Ответов: 93
 Профиль | | #5 Добавлено: 05.04.06 18:20
Млина , а как в него картинку то загрузить ???

Ответить

Номер ответа: 6
Автор ответа:
 LeX



ICQ: 301424893 

Вопросов: 28
Ответов: 277
 Web-сайт: www.vbkoders.info
 Профиль | | #6
Добавлено: 05.04.06 18:22
1) Как получить скрин ВСЕГО экрана и запихнуть его в объект image ? Понимаю что тема поднималась , но мне нуно чтоб именно ЦЕЛЫЙ экран и простота залог здоровья.

Вот код:
Private Sub Command1_Click()
image1.Picture = a.CaptureDesktop
End Sub
Private Sub Form_Load()
image1.Width = Screen.Width
image1.Height = Screen.Height
End Sub

a - wincontrol
Если понадобится, пиши и я отправлю на ящик.

Ответить

Номер ответа: 7
Автор ответа:
 AsHeS



ICQ: 229759992 

Вопросов: 14
Ответов: 93
 Профиль | | #7 Добавлено: 05.04.06 19:05
 LeX
Контрол супер - пасибо. Осталось с мышой и памятью выяснить :)

Ответить

Номер ответа: 8
Автор ответа:
 AsHeS



ICQ: 229759992 

Вопросов: 14
Ответов: 93
 Профиль | | #8 Добавлено: 05.04.06 19:09
a=PictureBox.Point(x,y)
постоянно -1 выдает. Что я не так делаю ?

Ответить

Номер ответа: 9
Автор ответа:
 LeX



ICQ: 301424893 

Вопросов: 28
Ответов: 277
 Web-сайт: www.vbkoders.info
 Профиль | | #9
Добавлено: 05.04.06 19:10
Код:

Public Declare Function SetCursorPos Lib "user32" Alias "SetCursorPos" (ByVal x As Long, ByVal y As Long) As Long

sub form_load()
setcursorpos 100,100
end sub

Ответить

Номер ответа: 10
Автор ответа:
 AsHeS



ICQ: 229759992 

Вопросов: 14
Ответов: 93
 Профиль | | #10 Добавлено: 05.04.06 19:30
Ах да
В каком формате
PictureBox.Point(x,y)

Выдает результат ?

Ответить

Номер ответа: 11
Автор ответа:
 [root]



Вопросов: 45
Ответов: 1212
 Web-сайт: bit.pirit.info
 Профиль | | #11
Добавлено: 05.04.06 19:33
выходишь за пределы формы

Ответить

Номер ответа: 12
Автор ответа:
 LeX



ICQ: 301424893 

Вопросов: 28
Ответов: 277
 Web-сайт: www.vbkoders.info
 Профиль | | #12
Добавлено: 05.04.06 20:08
Двигать курсор ещё можно тем же wincontrol'ом. Там есть функция setcursorposition :-)

Ответить

Номер ответа: 13
Автор ответа:
 LeX



ICQ: 301424893 

Вопросов: 28
Ответов: 277
 Web-сайт: www.vbkoders.info
 Профиль | | #13
Добавлено: 05.04.06 20:12
Private Declare Function GetPixel Lib "gdi32" (ByVal hdc As Long, ByVal X As Long, ByVal Y As Long) As Long

Private Sub Form_Load()
    Me.AutoRedraw = True
    msgbox = GetPixel(Picture1.hdc, XX, YY)
End Sub
Эта функция узнает цвет пикселя, но я не уверен, рабочая она или нет.

Ответить

Номер ответа: 14
Автор ответа:
 Tamplier



ICQ: 298742928 

Вопросов: 58
Ответов: 340
 Профиль | | #14 Добавлено: 05.04.06 20:30
По поводу мыши
GetCursorPos
SetCursorPos
Mouse_Event
Для последнего:
· dwFlags
A set of flag bits that specify various aspects of mouse motion and button clicking. The bits in this parameter can be any reasonable combination of the following values:
MOUSEEVENTF_ABSOLUTE
 Specifies that the dx and dy parameters contain normalized absolute coordinates. If not set, those parameters contain relative data: the change in position since the last reported position. This flag can be set, or not set, regardless of what kind of mouse or mouse-like device, if any, is connected to the system. For further information about relative mouse motion, see the following Remarks section.
MOUSEEVENTF_MOVE
 Specifies that movement occurred.
MOUSEEVENTF_LEFTDOWN
 Specifies that the left button changed to down.
MOUSEEVENTF_LEFTUP
 Specifies that the left button changed to up.
MOUSEEVENTF_RIGHTDOWN
 Specifies that the right button changed to down.
MOUSEEVENTF_RIGHTUP
 Specifies that the right button changed to up.
MOUSEEVENTF_MIDDLEDOWN
 Specifies that the middle button changed to down.
MOUSEEVENTF_MIDDLEUP
 Specifies that the middle button changed to up.
MOUSEEVENTF_WHEEL
 Windows NT only: Specifies that the wheel has been moved, if the mouse has a wheel. The amount of movement is given in dwData

The flag bits that specify mouse button status are set to indicate changes in status, not ongoing conditions. For example, if the left mouse button is pressed and held down, MOUSEEVENTF_LEFTDOWN is set when the left button is first pressed, but not for subsequent motions. Similarly, MOUSEEVENTF_LEFTUP is set only when the button is first released.

· dx
Specifies the mouse’s absolute position along the x-axis or its amount of motion since the last mouse event was generated, depending on the setting of MOUSEEVENTF_ABSOLUTE. Absolute data is given as the mouse’s actual x-coordinate; relative data is given as the number of mickeys moved. A mickey is the amount that a mouse has to move for it to report that it has moved.

· dy
Specifies the mouse’s absolute position along the y-axis or its amount of motion since the last mouse event was generated, depending on the setting of MOUSEEVENTF_ABSOLUTE. Absolute data is given as the mouse’s actual y-coordinate; relative data is given as the number of mickeys moved.

· dwData
If dwFlags is MOUSEEVENTF_WHEEL, then dwData specifies the amount of wheel movement. A positive value indicates that the wheel was rotated forward, away from the user; a negative value indicates that the wheel was rotated backward, toward the user. One wheel click is defined as WHEEL_DELTA, which is 120.
If dwFlags is not MOUSEEVENTF_WHEEL, then dwData should be zero.

· dwExtraInfo
Specifies an additional 32-bit value associated with the mouse event. An application calls GetMessageExtraInfo to obtain this extra information.

Ответить

Номер ответа: 15
Автор ответа:
 Sacred Phoenix



ICQ: 304238252 

Вопросов: 52
Ответов: 927
 Профиль | | #15 Добавлено: 05.04.06 20:31
Эта функция узнает цвет пикселя, но я не уверен, рабочая она или нет.
API??? А что мешало юзать .Point(x, y)??? Picture1.Point возвращает значение типа Long. X и Y - координаты в системе, указанной в Picture1.ScaleMode.

Про переменную другой проги - лучше забей, потому что это очень трудно, имхо.

Ответить

Страница: 1 | 2 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам