Apagar el monitor durante varios segundos

Por Saiyine  el 2001-01-01 00:00:00 - Secciones:  DELPHI  - Enlace permanente: 439

procedure ApagaMonitor(segundos : integer);
begin
  SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, 0);
  sleep(segundos*1000);
  SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, -1);
end;
99 
 Liliana (2005-11-23 21:39:00)

Tu procedimiento de "ApagaMonitor" no furula, simplemente se me queda bloqueado.

106 
 Saiyine (2005-11-25 20:14:00)

El "apaga monitor" se hizo en un windows 98, que se le va a hacer, así de tiempo llevo con la página.

No dispongo de la información necesaria para hacerlo funcionar en windows XP, que imagino es lo que tu necesitas, pero imagino que un buen comienzo es buscar en el google "rundll32 turn off monitor".

107 
 Saiyine (2005-11-25 20:20:00)

Vale, mira lo que he encontrado en el Google, espero que sirva, cambiar el 0 de la primera linea por un 2, de forma que quede así:

SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, 2);

Ahora mismo no tengo a mano un XP para probarlo :huh:


Tu nombre (Nick):

Tu correo (Email):
  Necesario para tu gravatar!

Tu página (URL):

Escribe aqui tu comentario:

       :noworry: :roll: :huh: :push: ¬¬ :OO 8) 8O :( :) :? :D :P :o :x :| ;) ^^ xD



Vista previa activada.

 Vista previa (6/6/6, 6:66)


Patrocinadores

Saiyine recommends the easiest way to earn money with your web: get paid just by having some links! Click this button to check it out.

Text Link Ads

. . .

Secciones

  •  Principal
  •  Delphi
  •  Ideas
  •  Parches para traducir la knoppix al español
  •  Trucos de windows
  •  Trucos de linux
  •  Scripts en perl
  •  Programas en C#
  •  Fondos de pantalla
  •  Letras de canciones
  •  Seti@home

    • . . .

    Etiquetas TAGS

    Linux (105) - Delphi (54) - English (29) - Java (25) - Imagenes (24) - Lyrics (24) - Windows (17) - Videos (17) - Publicidad (15) - Perl (13) - Chorradas (13) - Futbol (12) - Php (11) - Slashdot (10) - Ideas (9) - Trucos (7) - Programas (7) - Frases (6) - Fotos (6) - Cine (6) - Javascript (6)

    . . .

    Descargas

  • ApagaPC
    apagapc241.exe  (2080)
  • LimpiaDocus
    LimpiaDocus001.exe  (1798)
  • RCM
    rcm001.zip  (1666)
  • Popmail
    popmail-0.4-psmn.tar.gz  (1716)
  • Manual de Delphi en PDF
    delphi_pdf.zip  (2214)
  • Evangelio del Perl
    Evangelio_del_perl.pdf  (1833)
  • Excel Simpsons
    Excel Simpsons  (1872)

    • . . .

    Articulos

  •  Algoritmo de Huffman Adaptativo
  •  Mldonkey como servicio en windows

    • . . .

    Utilerias

  • Conversor entre euros y dolares
  • Haciendo gráficas para webs facilmente

    . . .

    • Recomiendo

  •  Mozilla Firefox 
    DIR (572)
  •  Mozilla Thunderbird 
    DIR (544)
  • KLite 
    klmcodec375.exe (99)
  •  Emule 
    DIR (511)
  •  Knoppix 
    DIR (430)
  •  Knoppix en español (DVD) 
    DIR (771)
  •  Mldonkey 
    DIR (489)
  •  Nucleo linux 
    DIR (490)
  •  Parche linux 
    DIR (490)

    . . .

    • Proyectos online

  • Saiyine Store
  • Kunowalls!!!
  • Fondos de pantalla
  • Picaday: imagenes sexys o chocantes.
  • Scarlett: fotos de Scarlett Johansson
  • WhatsmyIP: obtener tu IP pública
  • Uma Thurman: galeria de Uma Thurman
  • FunPics: imagenes graciosas

    • . . .

    Blogs

  • Por lo que más querais, no entreis a estos: Tapanez, Yhandros, Onez.

  • Otros en español: Chavalina, Testosterona, Kirai, Wardog y el mundo, Mundo Geek, Microsiervos.

  • Mis lecturas en guiri: Coding Horror, MySQL Performance, Slashdot.

    . . .

    • Utilidades

  •  Coral  (606), cacheando webs
  •  Spam.la  (696), correo de usar y tirar
  •  Mailinator  (687), correo de usar y tirar
  •  Bug me not  (636), absurdos registros di NO
  •  Trashmail  (627), correo de usar y tirar

    . . .

    • Página web ©2001-2008 Saiyine generada en 0.10312s, con 1669915 visitas en total, hoy 646 (de un total de 1209 previstas).

    . . .