• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

H4IMRICK_PT

simular teclas

2 mensagens neste tópico

boas.......

eu uso o seguite codigo no vb 2005 para simular teclas:

SendKeys.Send(tecla)

alguem conhece outra forma de simular teclas ?

este codigo funciona quase em todo menos numa aplicacão.

sera por usar directX??

obrigado

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Olá,

Podes utilizar outro método, usando a API keybd_event, mas sem mostrares o código ...

Este é um exemplo que coloquei em outro fórum para simular uma tecla pressionada (neste caso F2) em outra aplicação(neste caso o winmine ou campo minado):

Public Class Form1

    Private Declare Function SetForegroundWindow Lib "user32" (ByVal handle As IntPtr) As Integer
    Declare Function keybd_event Lib "user32" Alias "keybd_event" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long) As Long

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim ps() As Process = Process.GetProcessesByName("winmine")

        If ps.Length > 0 Then
            Dim p As Process = ps(0)
            Dim hWnd As IntPtr = p.MainWindowHandle
            SetForegroundWindow(hWnd)
            keybd_event(Keys.F2, 0, 0, 0)
        End If

    End Sub

End Class

PS: Esquece o SetForegroundWindow neste caso B)

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!


Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.


Entrar Agora