Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   API de Windows (https://www.clubdelphi.com/foros/forumdisplay.php?f=7)
-   -   Disparar tecla de windows por codigo. (https://www.clubdelphi.com/foros/showthread.php?t=94946)

Tcmn 16-11-2020 23:54:52

Disparar tecla de windows por codigo.
 
Hola, estoy programando con Delphi 6 en una computadora con Windows 7 Ultimate y ocupo por codigo abrir el menu inicio de Windows, pero no sé como "presionar" por codigo la tecla de Windows para que se abrá el menú inicio. Cualquier sugerencia será bien recibida.

ecfisa 17-11-2020 10:28:40

Hola.

Intenta de este modo:
Código Delphi [-]
...
var
  Ip: TInput;
begin
  ZeroMemory(@Ip, Sizeof(TInput));
  Ip.Itype          := INPUT_KEYBOARD;
  Ip.ki.wVk         := VK_LWIN;
  Ip.ki.wScan       := 0;
  // Key Win down
  Ip.ki.dwFlags     := KEYEVENTF_EXTENDEDKEY;
  SendInput(1, Ip, SizeOf(TInput));
  // Key Win up
  ip.ki.dwFlags     := KEYEVENTF_KEYUP;
  SendInput(1, Ip, SizeOf(TInput));
end;

Saludos :)

Tcmn 12-02-2021 06:19:35

Funciona perfecto. Muchisimas gracias.


La franja horaria es GMT +2. Ahora son las 08:27:31.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi