Resolución pantalla

[[escafandra]]

Código Delphi [-]
// Monitor power on
SendNotifyMessage(GetForegroundWindow(), WM_SYSCOMMAND, SC_MONITORPOWER, -1);
for i:= 0 to 4 do
begin
    mouse_event(MOUSEEVENTF_MOVE, 0, 10, 0, 0);
    Sleep(40);
    mouse_event(MOUSEEVENTF_MOVE, 0, DWORD(-10), 0, 0);
end;

Saludos.

[ramonibk]

Hola Casimiro. No puedo dejar la resolución en 800x600 fija. pues debido a las características de win10 si el monitor se cambia. este intentara reconfigurarse a su mejor resolución. y no confió en que todos los técnicos sean capaces de "Entrar en el registro, Modificar claves, reiniciar en escritorio, cambiar resolución, entrar en registro, volver las claves a su posición original, y reiniciar nuevamente el pc"
de echo he intentado generar ficheros de registro y ha sido un caos.

Gracias Escafandra he incrementado tu parte de código y en principio en laboratorio me ha funcionado correctamente.
solo me queda probarlo en campo y ver como va la cosa.

Muchas gracias a todos y os mantengo informados.