Mensaje para Apagar Windows - Foros Club Delphi

17-03-2009

roman

Moderador

Registrado: may 2003

Ubicación: Ciudad de México

Posts: 20.269

Poder: 10

Código Delphi [-]uses ComObj;

procedure TForm1.Button1Click(Sender: TObject);
var
  Shell: OleVariant;

begin
  Shell := ComObj.CreateOleObject('shell.application');
  Shell.ShutDownWindows;
end;

Truco visto en el Guille

// Saludos

« Tema Anterior | Próximo Tema »

Herramientas	Buscar en Tema
Mostrar Versión Imprimible Enviar por Correo	Buscar en Tema: Búsqueda Avanzada
Desplegado
Cambiar a Modo Lineal Cambiar a Modo Hibrido Modo Hilado

Normas de Publicación
no Puedes crear nuevos temas no Puedes responder a temas no Puedes adjuntar archivos no Puedes editar tus mensajes El código vB está habilitado Las caritas están habilitado Código [IMG] está habilitado Código HTML está deshabilitado

Saltar a Foro

Temas Similares
Tema	Autor	Foro	Respuestas	Último mensaje
Efecto Apagar Windows XP	MaMu	Varios	3	15-06-2011 14:48:21
Se puede saber cuando se esta por apagar windows?	Martin	API de Windows	4	27-12-2006 14:57:28
apagar windows	unko!	API de Windows	22	03-04-2005 13:00:59
urge. apagar windows XP	mrmanuel	API de Windows	3	06-09-2003 05:09:24

La franja horaria es GMT +2. Ahora son las 16:14:15.