Mover un proceso en diagonal de una posición de la pantalla a otra y que siempre permanezca en primer plano | Operating systems, scripting, PowerShell and security

PowerShell

#Abrir Notepad
#¡Cuidado! porque puede desaparecer de la pantalla debido a la resolución de pantalla

Add-Type @"
using System;
using System.Runtime.InteropServices;
public class Win32 {
[DllImport("user32.dll")]
public static extern bool MoveWindow(IntPtr hWnd, int X, int Y, int nWidth, int nHeight, bool bRepaint);
}
"@

for($posicion=0;$posicion -lt 800;$posicion=$posicion+100)
{
$Script=New-Object -ComObject WScript.Shell
$Proceso=(Get-Process notepad)
$Script.AppActivate($Proceso.MainWindowTitle)
[Win32]::MoveWindow(($Proceso).MainWindowHandle, $posicion, $posicion, 500, 400, $true)
Start-Sleep -Seconds 2
}

#Abrir Notepad

#¡Cuidado! porque puede desaparecer de la pantalla debido a la resolución de pantalla

Add-Type @"

using System;

using System.Runtime.InteropServices;

public class Win32 {

[DllImport("user32.dll")]

public static extern bool MoveWindow(IntPtr hWnd, int X, int Y, int nWidth, int nHeight, bool bRepaint);

}

for($posicion=0;$posicion -lt 800;$posicion=$posicion+100)

{

$Script=New-Object -ComObject WScript.Shell

$Proceso=(Get-Process notepad)

$Script.AppActivate($Proceso.MainWindowTitle)

[Win32]::MoveWindow(($Proceso).MainWindowHandle, $posicion, $posicion, 500, 400, $true)

Start-Sleep -Seconds 2

}

Mover un proceso en diagonal de una posición de la pantalla a otra y que siempre permanezca en primer plano (PowerShell)

LIBRO DE POWERSHELL

LO ÚLTIMO

VÍDEOS