(This is the Russian version of the article. The English version is Here).

По непонятным причинам  HP не  публекует информацию о DeviceReplay.

Вы можете познакомитъся сo свойствами DeviceReplay  работая с Java Аппликацией и используя  Java add-in , а тот  кто не  сталкивался с Java скорее всего не предпологает о существовании таких возможностей .

Иногда требуется воссоздать определенное действие , к примеру кликнуть на определенный объект на нашем  Юзер   Интерфейс

правым кликом  или когда  применить Type / Set методы невозможно, а план тестирования этого требует.

Так же если требуется послать определенный стринг  содержащий не 

языковые символы , а  в автоматическом тестировании это случается не редко , лучшии способ - это DeviceReplay.

Применяется для симуляции движений и  кликов  мышки а также  вывода данных  с клавиатуры на экран .Для успешного использования  Device Replay нужно удостовериться , что аппликация поднята и нужное окно активировано . Для  виндоусовских аппликаций можно использовать  Activate  метод :

Window( "W" ).Activate micLeftBtn

Для фокусировки на определенном объекте внутри окна лучший способ это просто кликнуть на этот объект. Веб среда не поддерживает напрямую    “Activate  метод”  , поэтому рекомендуется активировать аппликацию следующим способом :

hwnd = Browser( "B" ).GetROProperty( "hwnd" )

Window( "hwnd:=" & hwnd ).Activate micLeftBtn

Для фокусировки на определенном объекте внутри Веб  окна обычно используется :

WebEdit( "WE" ).object.focus or WebEdit( "WE" ).FireEvent "onfocusin"

Как начать работать с  DeviceReplay ?

Для начала использования device replay метода нужно создать  объект :

Set deviceReplay = CreateObject( "Mercury.DeviceReplay" )

Почему я представляю этот NET class ВМЕСТЕ  с Device Replay  объектом ?

Потому что Device Replay  это  многопрофильный  объект и  удобен в применении,хотя и имеет некоторые ограничения.Например – отсутствие возможности определить была ли нажата определённая кнопка.

До того как послать на экран заглавную букву , требуется определить нажат ли   CAPS-LOCK , иначе мы не получим желаемый результат.

Devices.Keyboard class осуществляет поддержку доступа к статусу клавиатуры в реальном времени и ввода данных на активированное окно.

Примеры статуса :.

       AltKeyDown - Gets a Boolean indicating if the ALT key is down.

       CapsLock - Gets a Boolean indicating if CAPS LOCK is turned on. 

       CtrlKeyDown - Gets a Boolean indicating if a CTRL key is down.

       NumLock - Gets a Boolean indicating if the NUM LOCK key is on. 

       ScrollLock - Gets a Boolean indicating whether the SCROLL LOCK key is on. 

                    ShiftKeyDown - Gets a Boolean indicating if a SHIFT key is down.

Set Keyboard = DotNetFactory.CreateInstance( "Microsoft.VisualBasic.Devices.Keyboard", "Microsoft.VisualBasic" )

Print CBool( Keyboard.AltKeyDown )

Print CBool( Keyboard.CapsLock )

Print CBool( Keyboard.CtrlKeyDown )

Print CBool( Keyboard.NumLock )

Print CBool( Keyboard.ScrollLock )

Print CBool( Keyboard.ShiftKeyDown )

Важно ! Когда используется  DotNetFactory data типы должны быть переведены.

Другое замечательное свойство очень необходимое иногда в работе с  QTP это возможность определить положение курсора на экране .

System.Windows.Forms.Control это основой класс, с помощью которого можно контролировать любое движение курсора на экране.

MousePosition свойство возвращающее  позицию курсора по временным интервалом :

Set ctlr = DotNetFactory.CreateInstance("System.Windows.Forms.Control")

For i = 1 To 10

   Wait 2

   Print "1. X=" & ctlr.MousePosition.X & "; Y=" & ctlr.MousePosition.Y

Next

С помощью  Mercury.Device удобно производить вывод данных  с клавиатуры на экран..

object.SendString( str )

Parameter

Description

object

Always a Mercury.DeviceReplay object

str

the String to be typed

None

Данный пример запустит аппликацию notepad и запишет текст  DeviceReplay  

Set deviceReplay = CreateObject( "Mercury.DeviceReplay" )

SystemUtil.Run "notepad.exe", "", "", "open"

' ** this line always identifies the notepad window.

Window( "nativeclass:=Notepad", "index:=0″ ).Activate micLeftBtn

deviceReplay.SendString( "DeviceReplay" )

Set deviceReplay = Nothing

Симулирование нажтой клавиши ( KEY_DOWN event in Win32 )

object.KeyDown( key )

Parameter

Description

object

Always a Mercury.DeviceReplay object

key

the key numeric code for more information on key codes see Key Codes Reference

None

Данный пример запустит аппликацию notepad и запишет текст в двух строчках – заглавными и маленькими буквами , в добавок shift key будет нажата во время посылки стринга.

Const VK_SHIFT = 42

Const VK_RETURN = 28

Set deviceReplay = CreateObject( "Mercury.DeviceReplay" )

SystemUtil.Run "notepad.exe", "", "", "open"

Window( "nativeclass:=Notepad", "index:=0″ ).Activate micLeftBtn

' ** Typing uppercase

deviceReplay.KeyDown VK_SHIFT

deviceReplay.SendString( "devicereplay" )

deviceReplay.PressKey VK_RETURN

deviceReplay.KeyUp VK_SHIFT

' ** Typing in lower case

deviceReplay.SendString( "devicereplay" )

Set deviceReplay = Nothing

        Since the key remains pressed use always the KeyUp Method.

        The method is just like human presses a key and left it pressed all the time.

Строка  содержавшая KeyUp Method. равносильна  постоянно "нажатой" клавише .

object.KeyUp( key )

Parameter

Description

object

Always a Mercury.DeviceReplay object

key

the key numeric code for more information on key codes see Key Codes Reference

None

Данный  пример активизирует  notepad и использует  hotkey Ctrl+O и закроет notepad с помошью Escape.

Const VK_O = 24

Const VK_CONTROL = 29

Const VK_ESCAPE = 1

Set deviceReplay = CreateObject( "Mercury.DeviceReplay" )

SystemUtil.Run "notepad.exe", "", "", "open"

Window( "nativeclass:=Notepad", "index:=0″ ).Activate micLeftBtn

' ** Typing uppercase

Wait 1

' ** Opening the menu Ctrl + O

deviceReplay.KeyDown VK_CONTROL

deviceReplay.PressKey VK_O

deviceReplay.KeyUp VK_CONTROL

Wait 2

' ** Closing the menu

deviceReplay.PressKey VK_ESCAPE

deviceReplay.SendString "Menu Open, was closed."

Set deviceReplay = Nothing

       Нужно использовать KeyUp Method после KeyDown..

Так же возможно создавать различные комбинации нажатия клавиш.

object.PressKey( key )

Parameter

Description

object

Always a Mercury.DeviceReplay object

key

the key numeric code for more information on key codes see Key Codes Reference

None

Пример нажатия и немедленного освобождения клавиши:

Const VK_O = 24 : Const VK_F = 33

Const VK_CONTROL = 29 : Const VK_ESCAPE = 1 : Const VK_MENU = 56

Set deviceReplay = CreateObject( "Mercury.DeviceReplay" )

SystemUtil.Run "notepad.exe", "", "", "open"

Window( "nativeclass:=Notepad", "index:=0″ ).Activate micLeftBtn

Wait 1

' ** Opening the menu Alt + F + O

deviceReplay.PressKey VK_MENU

deviceReplay.PressKey VK_F

deviceReplay.PressKey VK_O

Wait 2

' ** Closing the menu

deviceReplay.PressKey VK_ESCAPE

deviceReplay.SendString "Open menu was closed."

Set deviceReplay = Nothing

object.PressNKey( key, N ), N -  время нажатия клавиши.

object.PressNKey( key, N )

Parameter

Description

object

Always a Mercury.DeviceReplay object

key

the key numeric code for more information on key codes see Key Codes Reference

N

The number of repetitions.

None

Option Explicit

Const VK_RETURN = 28 : Const VK_F = 33 : Const VK_O = 24

Const VK_TAB = 15 : Const VK_F5 = 63

Const VK_CAPITAL = 58 : Const VK_NUMLOCK = 69

Const VK_SUBTRACT = 74 : Const VK_MULTIPLY = 55

Const VK_MENU = 56

Dim deviceReplay

Private Sub SetupKeyboard()

   Const CLASS_NAME = "Microsoft.VisualBasic.Devices.Keyboard"

   Const ASSEMBLY = "Microsoft.VisualBasic"

   Dim Keyboard

   Set Keyboard = DotNetFactory.CreateInstance( CLASS_NAME, ASSEMBLY )

   If CBool( Keyboard.CapsLock ) Then

      deviceReplay.PressKey VK_CAPITAL

   End If

   If CBool( Keyboard.NumLock ) = False Then

   deviceReplay.PressKey VK_NUMLOCK

   End If

   Set Keyboard = Nothing

End Sub

Private Sub SetupNotepad()

   deviceReplay.PressKey VK_MENU

   deviceReplay.PressKey VK_O

   deviceReplay.PressKey VK_F

   deviceReplay.SendString "Courier New"

   deviceReplay.PressKey VK_TAB

   deviceReplay.PressKey VK_TAB

   deviceReplay.SendString "14″

   deviceReplay.PressKey VK_RETURN

   Wait 1

End Sub

Private Sub PrintRow( ByVal state, ByVal usps, byVal capital )

   deviceReplay.SendString state

   deviceReplay.PressKey VK_TAB

   If Len( state ) < 8 Then

      deviceReplay.PressKey VK_TAB

   End If

   deviceReplay.SendString usps

   deviceReplay.PressKey VK_TAB

   deviceReplay.SendString capital

   deviceReplay.PressKey VK_RETURN

End Sub

Set deviceReplay = CreateObject( "Mercury.DeviceReplay" )

SystemUtil.Run "notepad.exe", "", "", "open", 3

Window( "nativeclass:=Notepad", "index:=0″ ).Activate micLeftBtn

' ** Setup Notepad - Font courier new, size 14,

' ** NUM-LOCK pressed and CAPS-LOCK unpressed

Call SetupKeyboard()

Call SetupNotepad()

' ** inserting date

deviceReplay.PressKey VK_F5

deviceReplay.PressKey VK_RETURN

' ** Inserting Title

deviceReplay.PressNKeys VK_TAB, 3

deviceReplay.SendString " United States of America"

deviceReplay.PressKey VK_RETURN

deviceReplay.PressNKeys VK_TAB, 3

deviceReplay.PressNKeys VK_MULTIPLY, Len( " United States of America" )

deviceReplay.PressNKeys VK_RETURN, 2

' ** Table Headers

deviceReplay.SendString "State"

deviceReplay.PressKey VK_TAB

deviceReplay.PressKey VK_TAB

deviceReplay.SendString "USPS"

deviceReplay.PressKey VK_TAB

deviceReplay.SendString "Capital"

deviceReplay.PressKey VK_RETURN

deviceReplay.PressNKeys VK_SUBTRACT, 31

deviceReplay.PressKey VK_RETURN

' ** Print Data

Call PrintRow( " Alabama", "AL", "Montgomery" )

Call PrintRow( " Alaska", "AK", " Juneau" )

Call PrintRow( " Arizona", "AZ", " Phoenix" )

Call PrintRow( " Arkansas", "AR", " Little Rock" )

Call PrintRow( " California", "CA", " Sacramento" )

Call PrintRow( " Colorado", "CO", " Denver" )

Call PrintRow( " Connecticut", "CT", " Hartford" )

Call PrintRow( " Delaware", "DE", " Dover" )

Call PrintRow( " Florida", "FL", " Tallahassee" )

Call PrintRow( "Georgia", "GA", " Atlanta" )

Call PrintRow( " Hawaii", "HA", " Honolulu" )

Call PrintRow( " Idaho", "ID", " Boise" )

Call PrintRow( " Illinois", "IL", " Springfield" )

Call PrintRow( "Indiana", "IN", " Indianapolis" )

Call PrintRow( " Iowa", "IA", " Des Moines" )

Call PrintRow( " Kansas", "KS", " Topeka" )

Call PrintRow( " Kentucky", "KY", " Frankfort" )

Call PrintRow( " Louisiana", "LA", " Baton Rouge" )

Call PrintRow( " Maine", "ME", "Augusta" )

Call PrintRow( " Maryland", "MD", " Annapolis" )

Call PrintRow( " Massachusetts", "MA", " Boston" )

Call PrintRow( " Michigan", "MI", "Lansing" )

Call PrintRow( " Minnesota", "MN", " Saint Paul" )

Call PrintRow( " Mississippi", "MS", "Jackson" )

Call PrintRow( " Missouri", "MO", " Jefferson City" )

Call PrintRow( " Montana", "MT", "Helena" )

Call PrintRow( " Nebraska", "NE", "Lincoln" )

Call PrintRow( " Nevada", "NV", " Carson City" )

Call PrintRow( " New Hampshire", "NH", " Concord" )

Call PrintRow( " New Jersey", "NJ", " Trenton" )

Call PrintRow( " New Mexico", "NM", " Santa Fe" )

Call PrintRow( " New York", "NY", " Albany" )

Call PrintRow( " North Carolina", "NC", "Raleigh" )

Call PrintRow( " North Dakota", "ND", "Bismarck" )

Call PrintRow( " Ohio", "OH", " Columbus" )

Call PrintRow( " Oklahoma", "OK", " Oklahoma City" )

Call PrintRow( " Oregon", "OR", " Salem" )

Call PrintRow( " Pennsylvania", "PA", " Harrisburg" )

Call PrintRow( " Rhode Island", "RI", " Providence" )

Call PrintRow( " South Carolina", "SC", " Columbia" )

Call PrintRow( " South Dakota", "SD", "Pierre" )

Call PrintRow( " Tennessee", "TN", " Nashville" )

Call PrintRow( " Texas", "TX", "Austin" )

Call PrintRow( " Utah", "UT", " Salt Lake City" )

Call PrintRow( " Vermont", "VT", " Montpelier" )

Call PrintRow( "Virginia", "VA", " Richmond" )

Call PrintRow( "Washington", "WA", " Olympia" )

Call PrintRow( " West Virginia", "WV", " Charleston" )

Call PrintRow( " Wisconsin", "WI", "Madison" )

Call PrintRow( " Wyoming", "WY", " Cheyenne" )

Set deviceReplay = Nothing

Option Explicit

Const VK_NUMPAD0 = 82

Const VK_NUMPAD1 = 79

Const VK_NUMPAD2 = 80

Const VK_NUMPAD3 = 81

Const VK_NUMPAD4 = 75

Const VK_NUMPAD5 = 76

Const VK_NUMPAD6 = 77

Const VK_NUMPAD7 = 71

Const VK_NUMPAD8 = 72

Const VK_NUMPAD9 = 73

Const VK_MENU = 56

Const VK_SHIFT = 42

Const VK_RETURN = 28

Const VK_F = 33

Const VK_O = 24

Const VK_TAB = 15

Const VK_F5 = 63

Const VK_NUMLOCK = 69

Dim deviceReplay

Private Sub SetupKeyboard()

   Const CLASS_NAME = "Microsoft.VisualBasic.Devices.Keyboard"

   Const ASSEMBLY = "Microsoft.VisualBasic"

   Dim Keyboard

   Set Keyboard = DotNetFactory.CreateInstance( CLASS_NAME, ASSEMBLY )

   If CBool( Keyboard.CapsLock ) Then

      deviceReplay.PressKey VK_CAPITAL

   End If

   If CBool( Keyboard.NumLock ) = False Then

   deviceReplay.PressKey VK_NUMLOCK

   End If

   Set Keyboard = Nothing

End Sub

Private Sub SetupNotepad()

   deviceReplay.PressKey VK_MENU

   deviceReplay.PressKey VK_O

   deviceReplay.PressKey VK_F

   deviceReplay.SendString "Courier New"

   deviceReplay.PressKey VK_TAB

   deviceReplay.PressKey VK_TAB

   deviceReplay.SendString "14″

   deviceReplay.PressKey VK_RETURN

   Wait 1

End Sub

Private Sub PrintCharacter( ByVal code )

   Dim i, digit

   deviceReplay.KeyDown VK_MENU

   For i = 1 To Len( code )

      digit = Mid( code, i, 1 )

     Execute "deviceReplay.PressKey VK_NUMPAD" & digit

   Next

   deviceReplay.KeyUp VK_MENU

   deviceReplay.PressKey VK_RETURN

End Sub

Set deviceReplay = CreateObject( "Mercury.DeviceReplay" )

SystemUtil.Run "notepad.exe", "", "", "open", 3

Window( "nativeclass:=Notepad", "index:=0″ ).Activate micLeftBtn

' ** Setup Notepad - Font courier new, size 14,

' ** NUM-LOCK pressed and CAPS-LOCK unpressed

Call SetupKeyboard()

Call SetupNotepad()

' ** inserting date

deviceReplay.PressKey VK_F5

deviceReplay.PressKey VK_RETURN

' ** a grave character

deviceReplay.SendString "A grave: "

Call PrintCharacter( "0192″ )

' ** O circumflex character

deviceReplay.SendString "O circumflex: "

Call PrintCharacter( "0212″ )

' ** s caron character

deviceReplay.SendString "s caron: "

Call PrintCharacter( "0154″ )

' ** n tilde character

deviceReplay.SendString "n tilde: "

Call PrintCharacter( "164″ )

' ** Y umlaut character

deviceReplay.SendString "Y umlaut: "

Call PrintCharacter( "0159″ )

' ** c cedila character

deviceReplay.SendString "c cedila: "

Call PrintCharacter( "0231″ )

' ** O with accent character

deviceReplay.SendString "O with accent: "

Call PrintCharacter( "0211″ )

' ** Inverted question mark character

deviceReplay.SendString "Inverted question mark: "

Call PrintCharacter( "168″ )

' ** Euro character

deviceReplay.SendString "Euro: "

Call PrintCharacter( "0128″ )

' ** i with accent character

deviceReplay.SendString "i with accent : "

Call PrintCharacter( "0237″ )

' ** Male Sign character

deviceReplay.SendString "Male Sign: "

Call PrintCharacter( "11″ )

' ** AE ligature  character

deviceReplay.SendString "AE ligature: "

Call PrintCharacter( "0198″ )

' ** aa  character

deviceReplay.SendString "aa: "

Call PrintCharacter( "0197″ )

' ** oethel  character

deviceReplay.SendString "oethel: "

Call PrintCharacter( "0156″ )

' ** Eth  character

deviceReplay.SendString "Eth: "

Call PrintCharacter( "0208″ )

' ** Uppercase Sigma character

deviceReplay.SendString "Uppercase Sigma: "

Call PrintCharacter( "228″ )

Set deviceReplay = Nothing

Поддерживает  возможность drag and drop action  с  одного места на экране в другое.

object.DragAndDrop( dragX, dragY, dropX, dropY, Button )

Parameter

Description

object

Always a Mercury.DeviceReplay object

dragX

the x absolute coordinate in a screen for start dragging

dragY

the y absolute coordinate in a screen for start dragging

dropX

the x absolute coordinate in a screen to drop

dropY

the y absolute coordinate in a screen to drop

button

possible values

LEFT_MOUSE_BUTTON = 0

MIDDLE_MOUSE_BUTTON = 1

RIGHT_MOUSE_BUTTON = 2

None

        you can use also a combination of MouseDown, MouseMove and MouseUp methods

Можно так же комбинировать MouseDown, MouseMove and MouseUp  методы 

object.MouseClick( x, y, Button )

Parameter

Description

object

Always a Mercury.DeviceReplay object

x

the x absolute coordinate in a screen for perform the click

y

the y absolute coordinate in a screen for perform the click

button

possible values

LEFT_MOUSE_BUTTON = 0

MIDDLE_MOUSE_BUTTON = 1

RIGHT_MOUSE_BUTTON = 2

None

Данный  пример требует небольшой подготовки и навыков работы с  Quick Test Professional . Цель примера выполнить  метод DragAndDrop на  www.advancedqtp.com сайте . Если вы попытаетесь  записать  в свой  тест движения  DragAndDrop то ничего не получится , а этот пример  покажет как можно это сделать:

Open QTP ( with web add-in ), Open a new test, open the object repository and add The Browser and Page to the local object repository.

Rename the objects…

Option Explicit

Const LEFT_MOUSE_BUTTON = 0

Dim oWebElemDesc1, oWebElemDesc2

Dim oWebElem1, oWebElem2

Dim devRep

Dim nX1, nX2, nY1, nY2, nH1, nH2, hwnd

Dim point1, point2

' ** This class holds a point coordinate

Class Point

   Private mX, mY

   Property Let X( ByVal value )

      mX = value

   End Property

   Property Get X()

     X  = mX

   End Property 

   Property Let Y( ByVal value )

      mY = value

   End Property

   Property Get Y()

      Y  = mY

   End Property     

End Class

' ** Retrieving the handle of the browser

hwnd = Browser("QTP").GetROProperty( "hwnd" )

Window( "hwnd:=" & hwnd ).Activate

' ** Create a description for 'Program Professionally’

Set oWebElemDesc1 = Description.Create()

oWebElemDesc1( "micclass" ).Value = "WebElement"

oWebElemDesc1( "html tag" ).Value = "H3″

oWebElemDesc1( "innertext" ).Value = "Program Professionally"

oWebElemDesc1( "class" ).Value = "dbx-handle dbx-handle-cursor"

' ** Create a description for 'Links’

Set oWebElementDesc2 = Description.Create()

oWebElemDesc2( "micclass" ).Value = "WebElement"

oWebElemDesc2( "html tag" ).Value = "H3″

oWebElemDesc2( "innertext" ).Value = "Links"

oWebElemDesc2( "class" ).Value = "dbx-handle dbx-handle-cursor"

' ** Searching for the elements

With Browser( "QTP" ).Page( "QTP" )

   If .ChildObjects( oWebElemDesc1 ).Count = 1 Then

      Set oWebElem1 = .WebElement( oWebElemDesc1 )

     If .ChildObjects( oWebElemDesc2 ).Count = 1 Then

         Set oWebElem2 = .WebElement( oWebElemDesc2 )

     Else

         Print "Web Element 'Program Professionally’ was not found."

         ExitTest( micFail )

     End If

   Else

      Print "Web Element 'Program Professionally’ was not found."

     ExitTest( micFail )

   End If

End With

' ** Retrieve elements dimensions

nX1 = oWebElem1.GetROProperty( "abs_x" )

nH1 = oWebElem1.GetROProperty( "height" )

nY1 = oWebElem1.GetROProperty( "abs_y" )

nX2 = oWebElem2.GetROProperty( "abs_x" )

nH2 = oWebElem2.GetROProperty( "height" )

nY2 = oWebElem2.GetROProperty( "abs_y" )

Set point1 = New Point

point1.X = nX1 + 10

point1.Y = nY1 + nH1 - 10

Set point2 = New Point

' ** Dragging up

If nY1 > nY2 Then

   point2.X = nX2 + 20

   point2.Y = nY2 + nH2 - 20

Else

   ' ** Dragging down

   point2.X = nX2 + 20

   point2.Y = nY2 + nH2 + 20

End If

Set devRep = CreateObject( "Mercury.DeviceReplay" )

devRep.DragAndDrop point1.X, point1.Y, _

       point2.X, point2.Y, LEFT_MOUSE_BUTTON

Симуляция двойного левого/правого клика на экране.

object.MouseDblClick( x, y, Button )

Parameter

Description

object

Always a Mercury.DeviceReplay object

x

the x absolute coordinate in a screen for perform the double-click

y

the y absolute coordinate in a screen for perform the double-click

button

possible values

LEFT_MOUSE_BUTTON = 0

MIDDLE_MOUSE_BUTTON = 1

RIGHT_MOUSE_BUTTON = 2

None

Симуляция (постоянногo)левого/правого клика на экране.

object.MouseDown( x, y, Button )

Parameter

Description

object

Always a Mercury.DeviceReplay object

x

the x absolute coordinate in a screen for perform the click

y

the y absolute coordinate in a screen for perform the click

button

possible values

LEFT_MOUSE_BUTTON = 0

MIDDLE_MOUSE_BUTTON = 1

RIGHT_MOUSE_BUTTON = 2

None

        Use always MouseUp Method after the MouseDown.

Метод  освобождения :

object.MouseDown( x, y, Button )

Parameter

Description

object

Always a Mercury.DeviceReplay object

x

the x absolute coordinate in a screen for perform the mouse release

y

the y absolute coordinate in a screen for perform the mouse release

button

possible values

LEFT_MOUSE_BUTTON = 0

MIDDLE_MOUSE_BUTTON = 1

RIGHT_MOUSE_BUTTON = 2

None

        Use always MouseUp Method after the MouseDown.

Метод освобождения от предыдущего действия

object.MouseDown( x, y )

Parameter

Description

object

Always a Mercury.DeviceReplay object

x

the x absolute coordinate in a screento mve the mouse to.

y

the y absolute coordinate in a screento mve the mouse to.

None

        Debug your scripts when retrieving coordinated in run time.

        Move the mouse to a specific location to set the focus on an item, or before executing a keyboard action.

Синхронизация времени действия

object.MouseDown( x, y )

Parameter

Description

object

Always a Mercury.DeviceReplay object

nSyncTimeout

the synchronization timeout

is_sec

Boolean value that indicates the nSyncTimeout is in seconds

None

        Not recommended to modify the value.

Figure 1 - United States Dvorak

Const

#

Description

VK_ESCAPE

1

Primarily used to cancel a command (instead of pressing Enter) or to escape from a process which may be in an odd state.

VK_1

2

        Numeric Key 1. combined with VK_SHIFT will display
        an exclamation mark depend on your keyboard layout 

VK_2

3

        Numeric Key 1. combined with VK_SHIFT will display
        an at sign depend on your keyboard layout

VK_3

4

        Numeric Key 3. combined with VK_SHIFT will display
        a number sign depend on your keyboard layout

VK_4

5

        Numeric Key 4. combined with VK_SHIFT will display
        a dollar sign depend on your keyboard layout

VK_5

6

        Numeric Key 5. combined with VK_SHIFT will display
        a percent sign depend on your keyboard layout

VK_6

7

        Numeric Key 6. combined with VK_SHIFT will display
        a caret sign depend on your keyboard layout

VK_7

8

        Numeric Key 7. combined with VK_SHIFT will display
        an ampersand sign depend on your keyboard layout

VK_8

9

        Numeric Key 8. combined with VK_SHIFT will display
        an asterik sign depend on your keyboard layout

VK_9

10

        Numeric Key 9. combined with VK_SHIFT will display
        an open round bracket sign depend on your keyboard layout

VK_0

11

        Numeric Key 0. combined with VK_SHIFT will display
        a close round bracket sign depend on your keyboard layout

VK_MINUS

12

        Minus Key ( - )  and underscore ( _ ) with VK_SHIFT.   
        depends on your keyboard layout.

VK_EQUAL

13

         Equal Key ( = ) Or Plus key ( + ) with VK_SHIFT.   
         Depends on your keyboard layout.

VK_BACKSPACE

14

             Used to delete one character at a time to the left
             of the cursor. You can also click and drag to highlight text and then press the Backspace key to delete text.

VK_TAB

15

           Used to set tab positions in a document. Setting
           tab positions allows you to move the cursor to defined positions, for instance when typing figures in columns. Used in conjunction with the Shift key you can jump to the previous tab position.

VK_Q

16

       Capital Q combined with Shift or CAPS-LOCK pressed

VK_W

17

       Capital W combined with Shift or CAPS-LOCK pressed

VK_E

18

       Capital E combined with Shift or CAPS-LOCK pressed

VK_R

19

       Capital R combined with Shift or CAPS-LOCK pressed

VK_TAB

20

Used to set tab positions in a document. Setting tab positions allows you to move the cursor to defined positions, for instance when typing figures in columns. Used in conjunction with the Shift key you can jump to the previous tab position.

VK_Y

21

       Capital Y combined with Shift or CAPS-LOCK pressed

VK_U

22

       Capital U combined with Shift or CAPS-LOCK pressed

VK_I

23

        Capital I combined with Shift or CAPS-LOCK pressed

VK_O

24

       Capital O combined with Shift or CAPS-LOCK pressed

VK_P

25

       Capital P combined with Shift or CAPS-LOCK pressed

VK_OBRACKET

26

        Open Square bracket key ( [ ) or Open qurly bracket  
        key ( { ) with VK_SHIFT. depend on your keyboard layout

VK_CBRACKET

27

         Close Square bracket ( ] ) or Close qurly bracket key
         ( } ) with VK_SHIFT. depend on your keyboard layout

VK_RETURN

28

              This key is used to send the cursor to the
              beginning of the next line (for instance when typing text in a word processing package). It is also used to finish a command and tell the computer to execute the command just typed. There are usually two of these keys.

VK_CONTROL

29

           Cannot be used on its own. Used in conjunction with
           other keys to carry out a specific function eg Ctrl/Alt/Del performs a system restart. There are usually two of these keys.

VK_A

30

        Capital A combined with Shift or CAPS-LOCK pressed

VK_S

31

        Capital S combined with Shift or CAPS-LOCK pressed

VK_D

32

        Capital D combined with Shift or CAPS-LOCK pressed

VK_F

33

        Capital F combined with Shift or CAPS-LOCK pressed

VK_G

34

        Capital G combined with Shift or CAPS-LOCK pressed

VK_H

35

        Capital H combined with Shift or CAPS-LOCK pressed

VK_J

36

        Capital H combined with Shift or CAPS-LOCK pressed

VK_K

37

        Capital K combined with Shift or CAPS-LOCK pressed
z

VK_L

38

         Capital L combined with Shift or CAPS-LOCK pressed

VK_SEMICOLON

39

       Semicolon sign ( ; ) or Colon sign ( : ) with
       VK_SHIFT. depend on your keyboard layout

VK_SINGLE_QUOTE

40

        Single Quote sign ( ' ) or double quote sign ( " ) with
        VK_SHIFT. depend on your keyboard layout

VK_APOSTROPHE

41

        apostrophe sign ( ` ) or tiled sign ( ~ ) with 
        VK_SHIFT. depend on your keyboard

VK_SHIFT

42

               Changes lower case letters to upper case, and
               numbers to symbols. There are usually two of
  these keys.

VB_PIPE

43

        Backslash sign ( \ ) or pipe sign ( | ) with VK_SHIFT.  
        depend on your keyboard layout.

VK_Z

44

        Capital Z combined with Shift or CAPS-LOCK pressed

VK_X

45

        Capital X combined with Shift or CAPS-LOCK pressed

VK_C

46

        Capital C combined with Shift or CAPS-LOCK pressed

VK_V

47

        Capital V combined with Shift or CAPS-LOCK pressed

VK_B

48

        Capital B combined with Shift or CAPS-LOCK pressed
 

VK_N

49

        Capital B combined with Shift or CAPS-LOCK pressed

VK_M

50

        Capital M combined with Shift or CAPS-LOCK pressed

VK_COMMA

51

        Comma sign ( , ) Or Left chevron ( < ). depend on
        your keyboard layout.

VK_DOT

52

        Dot sign ( . ) or Right chevron sign ( > ). depend on
        your keyboard layout.

VK_SLASH

53

        Slash sign ( / ) or question mark ( ? ) with
        VK_SHIFT. depend on your keyboard layout.

VK_RSHIFT

54

                Changes lower case letters to upper case, and
                numbers to symbols.

VK_MULTIPLY

55

Multiple sign ( * )

VK_MENU

56

          Used in conjunction with other keys to enter
          keywords. Also used to enter ASCII codes by holding
down the Alt key and entering the number from the numeric keypad.

VK_SPACE

57

Space Key

VK_CAPITAL

58

            CAPS LOCK key

VK_F1

59

As a throwback to DOS days, you will find that the F1 key will often bring up a help menu. If you press F1 while working in a program, help for that program will usually appear. If you press F1 while at the Windows desktop or when the Windows Explorer is open, a Windows help screen will pop up. If you happen to be working in a program and would like to see the Windows help screen, simply press the Windows key (the key with the Windows logo on the bottom row of keys) on your keyboard and press F1 at the same time.

VK_F2

60

You can use the F2 key to rename an item when working in Windows. Highlight any folder or file, and press F2. You will then be able to type a new name for the object. After you type the new name, just click outside the name box or press the enter key to make the name change. This works just like right-clicking a file or folder and selecting Rename.

VK_F3

61

When you are working in Windows, the F3 key will open the Find Files window.

VK_F4

62

The F4 key has some very useful functionality. You can press F4 to open the Address bar when working in Internet Explorer. This will allow you to type the address of a Web page for quick access.

You can also press the Alt key and the F4 key at the same time to close the open Window that you are currently working on

VK_F5

63

The F5 key is the refresh key. You can press F5 when viewing a Web page to make sure that you have the most current version of that Web page. You can also use F5 when in Windows to refresh the screen. This can be a handy shortcut. If perhaps you are viewing the contents of a floppy disk and you insert a new floppy, your screen will still show the contents of the first floppy. Just press F5 to refresh the screen and see the contents of the floppy you just inserted.

VK_F6

64

This key is often used to move the cursor around the structure of the program. Pressing it will often cycle you from window to window.

VK_F7

65

The F7 key does not have any functionality in Windows. It may, however be used in some individual programs. To find out if it is available in the program you are using, bring up the program’s help screen and type in the words function key.

VK_F8

66

The F8 key can be used to access Safe Mode if pressed during the computer’s boot up process. This is a trouble-shooting mode which will start the computer with minimal drivers.

VK_F9

67

The F9 key does not have any functionality in Windows. It may, however be used in some individual programs. To find out if it is available in the program you are using, bring up the program’s help screen and type in the words function key.

VK_F10

68

F10 is the key that is used to activate the menu bar in many programs. You can use F10 to highlight the first menu choice, and then use the arrow keys to move around the menus. Pressing the Shift key while pressing F10 will bring up the shortcut menu. This is similar to right-clicking on an object.

VK_NUMLOCK

69

Allows the numeric keys to be used on the numeric keypad, rather than the cursor control keys. NumLock mode is activated by pressing the key once and is indicated by a light on the panel above the numeric keypad. Press the key again to return to normal mode.

VK_SCROLL

70

Can control the way the cursor control keys operate in some programs. Many applications ignore this setting. ScrollLock mode is activated by pressing the key once and is indicated by a light on the panel above the numeric keypad. Press the key again to return to normal mode.

VK_HOME

71

Moves your cursor to the beginning of the current line of typed characters.

VK_NUMPAD7

71

Only when VK_NUMLOCK is pressed.

VK_UP

72

Up arrow key

VK_NUMPAD8

72

Only when VK_NUMLOCK is pressed.

VK_PRIOR

73

Moves your cursor up one page of information.

VK_NUMPAD9

73

Only when VK_NUMLOCK is pressed.

VK_SUBTRACT

74

Subtract Key. ( - )

VK_LEFT

75

Left Arrow key

VK_NUMPAD4

75

Only when VK_NUMLOCK is pressed.

VK_CLEAR

76

VK_NUMPAD5

76

Only when VK_NUMLOCK is pressed.

VK_RIGHT

77

Right Arrow key

VK_NUMPAD6

77

Only when VK_NUMLOCK is pressed.

VK_ADD

78

Plus sign

VK_END

79

Moves your cursor to the end of the current line of typed characters.

VK_NUMPAD1

79

Only when VK_NUMLOCK is pressed.

VK_DOWN

80

Down arroy key.

VK_NUMPAD2

80

Only when VK_NUMLOCK is pressed.

VK_NEXT

81

Moves your cursor down one page of information.

VK_NUMPAD3

81

Only when VK_NUMLOCK is pressed.

VK_INSERT

82

Inserts characters in a line of text. The remaining text moves one cursor position to the right for each character inserted.

VK_NUMPAD0

82

Only when VK_NUMLOCK is pressed.

VK_DELETE

83

Deletes the character to the right of the cursor position. The remaining text moves one cursor position to the left, for each character deleted. You can also click and drag to highlight text and then press the Delete key to delete text.

VK_SNAPSHOT

84

Prints everything displayed on the screen to an attached printer.

VK_BACKSLASH

86

Backslash sign ( \ )

VK_F11

87

Press F11 when you are working in Internet Explorer and the window will open to full screen mode. This will make all the toolbars disappear and can be useful to see more information on the screen.  Press F11 when you are in full screen mode will toggle you back to your normal view.

VK_F12

88

The F12 key does not have any functionality in Windows. It may, however be used in some individual programs. To find out if it is available in the program you are using, bring up the program’s help screen and type in the words function key.

VK_NUMPAD5

89

VK_ZOOM

98

VK_HELP

99

VK_F13

100

VK_F14

101

VK_F15

102

VK_F16

103

VK_F17

104

VK_F18

105

VK_F19

106

VK_F20

107

VK_F21

108

VK_F22

109

VK_F23

110