Simula o pressionamento Da Tecla Shift seguido De Tab
Senhores , não estou conseguindo simular o pressionamento da Tecla Shift seguido De Tab.. Algume tem a codificação necessária para isto e também a desabilitação dessas Teclas imediatamente ...;
Obrigado.... :P :P :P :P
Obrigado.... :P :P :P :P
Marco Salles
Curtidas 0
Respostas
Dopi
31/07/2005
Ola Marcos,
Procure no seu CD de Delphi 7, na pasta extras a unit [b:f3f2866836]SndKey32.pas[/b:f3f2866836]. Com ela vc conseguirá facilmente enviar qualquer sequencia de teclas para o Buffer do teclado do Windows...
Veja um trecho do exemplo no fonte:
Procure no seu CD de Delphi 7, na pasta extras a unit [b:f3f2866836]SndKey32.pas[/b:f3f2866836]. Com ela vc conseguirá facilmente enviar qualquer sequencia de teclas para o Buffer do teclado do Windows...
Veja um trecho do exemplo no fonte:
(*
Converts a string of characters and key names to keyboard events and
passes them to Windows.
Example syntax:
SendKeys(´abc123def456{left 6}ghi789´, True);
*)GOSTEI 0
Marco Salles
31/07/2005
Com ela vc conseguirá facilmente ....
Não é tao fácil assim , senão voe mesmo teria respondido como simular O Pressionamento da tecla Shift + Tab
(*
Converts a string of characters and key names to keyboard events and
passes them to Windows.
Example syntax:
SendKeys(´abc123def456{left 6}ghi789´, True);
*)
Este código fonte Faz o que :?: :?: :?: :cry: :cry: :cry:
GOSTEI 0
Dopi
31/07/2005
Acho que vc não se deu nem ao trabalho de abrir a Unit que eu indiquei...
Para sua informação, uso essa unit para simular ALT+TAB, Shift+TAB, e outras sequencias de teclas...
Enviando um ALT+TAB
Acho que com um pouco mais de informação vc se tornará menos cético:
Para sua informação, uso essa unit para simular ALT+TAB, Shift+TAB, e outras sequencias de teclas...
Enviando um ALT+TAB
SendKeys(pchar(´¬´), False);
Acho que com um pouco mais de informação vc se tornará menos cético:
(*
SendKeys routine for 32-bit Delphi.
Written by Ken Henderson
Copyright (c) 1995 Ken Henderson
This unit includes two routines that simulate popular Visual Basic
routines: Sendkeys and AppActivate. SendKeys takes a PChar
as its first parameter and a boolean as its second, like so:
SendKeys(´KeyString´, Wait);
where KeyString is a string of key names and modifiers that you want
to send to the current input focus and Wait is a boolean variable or value
that indicates whether SendKeys should wait for each key message to be
processed before proceeding. See the table below for more information.
AppActivate also takes a PChar as its only parameter, like so:
AppActivate(´WindowName´);
where WindowName is the name of the window that you want to make the
current input focus.
SendKeys supports the Visual Basic SendKeys syntax, as documented below.
Supported modifiers:
+ = Shift
^ = Control
¬ = Alt
Surround sequences of characters or key names with parentheses in order to
modify them as a group. For example, ´+abc´ shifts only ´a´, while ´+(abc)´ shifts
all three characters.
Supported special characters
~ = Enter
( = Begin modifier group (see above)
) = End modifier group (see above)
{ = Begin key name text (see below)
} = End key name text (see below)
Supported characters:
Any character that can be typed is supported. Surround the modifier keys
listed above with braces in order to send as normal text.
Supported key names (surround these with braces):
BKSP, BS, BACKSPACE
BREAK
CAPSLOCK
CLEAR
DEL
DELETE
DOWN
END
ENTER
ESC
ESCAPE
F1
F2
F3
F4
F5
F6
F7
F8
F9
F10
F11
F12
F13
F14
F15
F16
HELP
HOME
INS
LEFT
NUMLOCK
PGDN
PGUP
PRTSC
RIGHT
SCROLLLOCK
TAB
UP
Follow the keyname with a space and a number to send the specified key a
given number of times (e.g., {left 6}).
*)
GOSTEI 0
Marco Salles
31/07/2005
Acho que vc não se deu nem ao trabalho de abrir a Unit que eu indiquei...
Não abri porque o cd não esta comigo aqui..ele esta no meu Trabalho
Para sua informação, uso essa unit para simular ALT+TAB, Shift+TAB, e outras sequencias de teclas...
Não é novidade para mim esta Unit.. ela Ja foi diversas vezes lembrada aqui no forum... Mas sempre resolvi os meus problemas com a função
keybd_event , portanto não vejo muita necessidade em ter esta unit , a não ser que eu não consiga resolver usando esta função...
Vale resaltar que alem da função keybd_event Existe tb a Funçao PostKeyEx32 , que ja foi diversas vezes Postada aqui no Forum
http://forum.devmedia.com.br/viewtopic.php?t=9425&highlight=keybdevent&sid=8eaf6e04bcdadae5ce814e0ad017ee9a
Acho que com um pouco mais de informação vc se tornará menos cético:
Pelo menos para mim , toda informação e sempre válida.. Mas não encaro isto como ceticismo ...
No mais obrigado pela sugestão
GOSTEI 0
Dopi
31/07/2005
[quote:1dcb1e7d1d=´Marco Salles´]
Não é novidade para mim esta Unit.. ela Ja foi diversas vezes lembrada aqui no forum... Mas sempre resolvi os meus problemas com a função
keybd_event , portanto não vejo muita necessidade em ter esta unit , a não ser que eu não consiga resolver usando esta função...
[/quote:1dcb1e7d1d]
A finalidade da [b:1dcb1e7d1d]sndkey32.pas[/b:1dcb1e7d1d] é facilitar o uso da API [b:1dcb1e7d1d]keybd_event[/b:1dcb1e7d1d].. principalmente simulando corretamente teclas modficadoras como ALT, SHIFT e CTRL...
Não é novidade para mim esta Unit.. ela Ja foi diversas vezes lembrada aqui no forum... Mas sempre resolvi os meus problemas com a função
keybd_event , portanto não vejo muita necessidade em ter esta unit , a não ser que eu não consiga resolver usando esta função...
[/quote:1dcb1e7d1d]
A finalidade da [b:1dcb1e7d1d]sndkey32.pas[/b:1dcb1e7d1d] é facilitar o uso da API [b:1dcb1e7d1d]keybd_event[/b:1dcb1e7d1d].. principalmente simulando corretamente teclas modficadoras como ALT, SHIFT e CTRL...
GOSTEI 0
Robson Cardoso
31/07/2005
alo amigos alguem pode criar um macro para similar
F1 + F2 + F3 + F4 com instervalo de 1 Segundo
Ativar no " end " e desaticar no " del" ?
Att; Robson
F1 + F2 + F3 + F4 com instervalo de 1 Segundo
Ativar no " end " e desaticar no " del" ?
Att; Robson
GOSTEI 0